CreateCloudFrontOriginAccessIdentityResult (p.awso.0.9.0.doc.awso.cloudfront.Awso_cloudfront.Values.CreateCloudFrontOriginAccessIdentityResult)

Sourcetype nonrec t = {

cloudFrontOriginAccessIdentity : CloudFrontOriginAccessIdentity.t option;
(*
The origin access identity's information.
*)
location : String_.t option;
(*
The fully qualified URI of the new origin access identity just created.
*)
eTag : String_.t option;
(*
The current version of the origin access identity created.
*)

}

Sourcetype nonrec error = [

| `CloudFrontOriginAccessIdentityAlreadyExists of CloudFrontOriginAccessIdentityAlreadyExists.t
| `InconsistentQuantities of InconsistentQuantities.t
| `InvalidArgument of InvalidArgument.t
| `MissingBody of MissingBody.t
| `TooManyCloudFrontOriginAccessIdentities of TooManyCloudFrontOriginAccessIdentities.t
| `Unknown_operation_error of string * string option

]

val make : 
  ?cloudFrontOriginAccessIdentity:??? ->
  ?location:??? ->
  ?eTag:??? ->
  unit ->
  t

Source

val error_of_json : 
  string ->
  Yojson.Safe.t ->
  [> `CloudFrontOriginAccessIdentityAlreadyExists of
       CloudFrontOriginAccessIdentityAlreadyExists.t
  | `InconsistentQuantities of InconsistentQuantities.t
  | `InvalidArgument of InvalidArgument.t
  | `MissingBody of MissingBody.t
  | `TooManyCloudFrontOriginAccessIdentities of
    TooManyCloudFrontOriginAccessIdentities.t
  | `Unknown_operation_error of string * string option ]

Source

val error_of_xml : 
  string ->
  Awso.Xml.t ->
  [> `CloudFrontOriginAccessIdentityAlreadyExists of
       CloudFrontOriginAccessIdentityAlreadyExists.t
  | `InconsistentQuantities of InconsistentQuantities.t
  | `InvalidArgument of InvalidArgument.t
  | `MissingBody of MissingBody.t
  | `TooManyCloudFrontOriginAccessIdentities of
    TooManyCloudFrontOriginAccessIdentities.t
  | `Unknown_operation_error of string * string option ]

Sourceval error_to_json : error -> Yojson.Safe.t

Source

val of_header_and_body : 
  ((string, String_.t) Awso.Import.List.Assoc.t
   * CloudFrontOriginAccessIdentity.t) ->
  t

Source

val to_value : 
  t ->
  [> `Structure of
       (string
        * [> `String of String_.t
          | `Structure of
            (string
             * [> `String of String_.t
               | `Structure of (string * [> `String of String_.t ]) list ])
              list ])
         list ]

Sourceval to_query : t -> Awso.Client.Query.t

Sourceval of_xml : Awso.Xml.t -> t

Sourceval of_string : string -> t

Sourceval of_json : Yojson.Safe.t -> t

Sourceval to_json : t -> Yojson.Safe.t