package awso-async
Source file io.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56(* generated by: awso-codegen generate-all --botocore-data vendor/botocore/botocore/data -o aws --runtime-dir lib/runtime/awso --cli-dir awso-cli *) open Awso_emr_serverless open Awso_async module Io = Http.Io let eval ?endpoint_url ?cfg endpoint input = Io.bind (Io.resolve_cfg cfg) (fun cfg -> let meth = Endpoints.method_of_endpoint endpoint in let uri = Endpoints.uri_of_endpoint endpoint input in Io.map (Io.call ?endpoint_url ~cfg ~service:Values.service meth (Endpoints.to_request endpoint input) uri) (fun resp_result -> Endpoints.of_response endpoint resp_result)) let cancel_job_run ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CancelJobRun input let create_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateApplication input let delete_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteApplication input let get_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetApplication input let get_dashboard_for_job_run ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetDashboardForJobRun input let get_job_run ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetJobRun input let get_resource_dashboard ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetResourceDashboard input let get_session ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSession input let get_session_endpoint ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSessionEndpoint input let list_applications ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListApplications input let list_job_run_attempts ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListJobRunAttempts input let list_job_runs ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListJobRuns input let list_sessions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSessions input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let start_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartApplication input let start_job_run ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartJobRun input let start_session ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartSession input let stop_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StopApplication input let tag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TagResource input let terminate_session ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TerminateSession input let untag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UntagResource input let update_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateApplication input