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 57 58 59 60 61 62 63 64 65 66(* 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_managedblockchain 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_accessor ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateAccessor input let create_member ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateMember input let create_network ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateNetwork input let create_node ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateNode input let create_proposal ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateProposal input let delete_accessor ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAccessor input let delete_member ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteMember input let delete_node ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteNode input let get_accessor ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAccessor input let get_member ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMember input let get_network ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetNetwork input let get_node ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetNode input let get_proposal ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetProposal input let list_accessors ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAccessors input let list_invitations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListInvitations input let list_members ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListMembers input let list_networks ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListNetworks input let list_nodes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListNodes input let list_proposal_votes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListProposalVotes input let list_proposals ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListProposals input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let reject_invitation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.RejectInvitation 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_member ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateMember input let update_node ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateNode input let vote_on_proposal ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.VoteOnProposal input