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.controltower/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 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68(* 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_controltower 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 create_landing_zone ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateLandingZone input let delete_landing_zone ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteLandingZone input let disable_baseline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisableBaseline input let disable_control ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisableControl input let enable_baseline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.EnableBaseline input let enable_control ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.EnableControl input let get_baseline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetBaseline input let get_baseline_operation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetBaselineOperation input let get_control_operation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetControlOperation input let get_enabled_baseline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetEnabledBaseline input let get_enabled_control ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetEnabledControl input let get_landing_zone ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetLandingZone input let get_landing_zone_operation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetLandingZoneOperation input let list_baselines ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListBaselines input let list_control_operations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListControlOperations input let list_enabled_baselines ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListEnabledBaselines input let list_enabled_controls ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListEnabledControls input let list_landing_zone_operations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListLandingZoneOperations input let list_landing_zones ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListLandingZones input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let reset_enabled_baseline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ResetEnabledBaseline input let reset_enabled_control ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ResetEnabledControl input let reset_landing_zone ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ResetLandingZone input let tag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TagResource input let untag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UntagResource input let update_enabled_baseline ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateEnabledBaseline input let update_enabled_control ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateEnabledControl input let update_landing_zone ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateLandingZone input
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>