PutApprovalResult (smaws-clients.Smaws_Client_CodePipeline.PutApprovalResult)

val error_to_string : 
  [ Smaws_Lib.Protocols.AwsJson.error
  | `ActionNotFoundException of Types.action_not_found_exception
  | `ApprovalAlreadyCompletedException of
    Types.approval_already_completed_exception
  | `InvalidApprovalTokenException of Types.invalid_approval_token_exception
  | `PipelineNotFoundException of Types.pipeline_not_found_exception
  | `StageNotFoundException of Types.stage_not_found_exception
  | `ValidationException of Types.validation_exception ] ->
  string

val request : 
  'http_type Smaws_Lib.Context.t ->
  Types.put_approval_result_input ->
  (Types.put_approval_result_output,
    [> Smaws_Lib.Protocols.AwsJson.error
    | `ActionNotFoundException of Types.action_not_found_exception
    | `ApprovalAlreadyCompletedException of
      Types.approval_already_completed_exception
    | `InvalidApprovalTokenException of Types.invalid_approval_token_exception
    | `PipelineNotFoundException of Types.pipeline_not_found_exception
    | `StageNotFoundException of Types.stage_not_found_exception
    | `ValidationException of Types.validation_exception ])
    Stdlib.result

val request_with_metadata : 
  'http_type Smaws_Lib.Context.t ->
  Types.put_approval_result_input ->
  (Types.put_approval_result_output Smaws_Lib.Response.t,
    [> Smaws_Lib.Protocols.AwsJson.error
    | `ActionNotFoundException of Types.action_not_found_exception
    | `ApprovalAlreadyCompletedException of
      Types.approval_already_completed_exception
    | `InvalidApprovalTokenException of Types.invalid_approval_token_exception
    | `PipelineNotFoundException of Types.pipeline_not_found_exception
    | `StageNotFoundException of Types.stage_not_found_exception
    | `ValidationException of Types.validation_exception ]
    * Smaws_Lib.Response.metadata)
    Stdlib.result