package awso-async
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
AWS client for Async (400+ services, auto-generated from botocore)
Install
dune-project
Dependency
Authors
Maintainers
Sources
awso-0.9.0.tbz
sha256=47224890900b1f5d2bd717000a02fa8918f92eafa99f702f7d59a1b053ff8e95
sha512=e187288f7c8fccb221f5417671732c8c8de95cdbacba1514db592b5700df2293468bde07956539bd44f3d460f6c75d38bd66ca161d0eae68a8b1b4e081882367
doc/src/awso-async.datapipeline/io.ml.html
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(* 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_datapipeline 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 activate_pipeline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ActivatePipeline input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.AddTags input let create_pipeline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreatePipeline input let deactivate_pipeline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeactivatePipeline input let delete_pipeline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePipeline input let describe_objects ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeObjects input let describe_pipelines ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribePipelines input let evaluate_expression ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.EvaluateExpression input let get_pipeline_definition ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetPipelineDefinition input let list_pipelines ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPipelines input let poll_for_task ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PollForTask input let put_pipeline_definition ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutPipelineDefinition input let query_objects ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.QueryObjects input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.RemoveTags input let report_task_progress ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ReportTaskProgress input let report_task_runner_heartbeat ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ReportTaskRunnerHeartbeat input let set_status ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetStatus input let set_task_status ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetTaskStatus input let validate_pipeline_definition ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ValidatePipelineDefinition input
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>