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 67 68 69 70 71 72 73 74 75 76(* 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_devops_guru 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 add_notification_channel ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.AddNotificationChannel input let delete_insight ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteInsight input let describe_account_health ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAccountHealth input let describe_account_overview ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAccountOverview input let describe_anomaly ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAnomaly input let describe_event_sources_config ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeEventSourcesConfig input let describe_feedback ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeFeedback input let describe_insight ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeInsight input let describe_organization_health ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeOrganizationHealth input let describe_organization_overview ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeOrganizationOverview input let describe_organization_resource_collection_health ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeOrganizationResourceCollectionHealth input let describe_resource_collection_health ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeResourceCollectionHealth input let describe_service_integration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeServiceIntegration input let get_cost_estimation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetCostEstimation input let get_resource_collection ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetResourceCollection input let list_anomalies_for_insight ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAnomaliesForInsight input let list_anomalous_log_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAnomalousLogGroups input let list_events ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListEvents input let list_insights ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListInsights input let list_monitored_resources ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListMonitoredResources input let list_notification_channels ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListNotificationChannels input let list_organization_insights ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListOrganizationInsights input let list_recommendations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRecommendations input let put_feedback ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutFeedback input let remove_notification_channel ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.RemoveNotificationChannel input let search_insights ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SearchInsights input let search_organization_insights ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SearchOrganizationInsights input let start_cost_estimation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartCostEstimation input let update_event_sources_config ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateEventSourcesConfig input let update_resource_collection ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateResourceCollection input let update_service_integration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateServiceIntegration input