CreateACL (smaws-clients.Smaws_Client

val error_to_string : 
  [ Smaws_Lib.Protocols.AwsJson.error
  | `ACLAlreadyExistsFault of Types.acl_already_exists_fault
  | `ACLQuotaExceededFault of Types.acl_quota_exceeded_fault
  | `DefaultUserRequired of Types.default_user_required
  | `DuplicateUserNameFault of Types.duplicate_user_name_fault
  | `InvalidParameterValueException of Types.invalid_parameter_value_exception
  | `TagQuotaPerResourceExceeded of Types.tag_quota_per_resource_exceeded
  | `UserNotFoundFault of Types.user_not_found_fault ] ->
  string

val request : 
  'http_type Smaws_Lib.Context.t ->
  Types.create_acl_request ->
  (Types.create_acl_response,
    [> Smaws_Lib.Protocols.AwsJson.error
    | `ACLAlreadyExistsFault of Types.acl_already_exists_fault
    | `ACLQuotaExceededFault of Types.acl_quota_exceeded_fault
    | `DefaultUserRequired of Types.default_user_required
    | `DuplicateUserNameFault of Types.duplicate_user_name_fault
    | `InvalidParameterValueException of
      Types.invalid_parameter_value_exception
    | `TagQuotaPerResourceExceeded of Types.tag_quota_per_resource_exceeded
    | `UserNotFoundFault of Types.user_not_found_fault ])
    Stdlib.result

val request_with_metadata : 
  'http_type Smaws_Lib.Context.t ->
  Types.create_acl_request ->
  (Types.create_acl_response Smaws_Lib.Response.t,
    [> Smaws_Lib.Protocols.AwsJson.error
    | `ACLAlreadyExistsFault of Types.acl_already_exists_fault
    | `ACLQuotaExceededFault of Types.acl_quota_exceeded_fault
    | `DefaultUserRequired of Types.default_user_required
    | `DuplicateUserNameFault of Types.duplicate_user_name_fault
    | `InvalidParameterValueException of
      Types.invalid_parameter_value_exception
    | `TagQuotaPerResourceExceeded of Types.tag_quota_per_resource_exceeded
    | `UserNotFoundFault of Types.user_not_found_fault ]
    * Smaws_Lib.Response.metadata)
    Stdlib.result