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 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104(* 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_cloudwatch 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 delete_alarm_mute_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAlarmMuteRule input let delete_alarms ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAlarms input let delete_anomaly_detector ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAnomalyDetector input let delete_dashboards ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteDashboards input let delete_insight_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteInsightRules input let delete_metric_stream ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteMetricStream input let describe_alarm_contributors ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAlarmContributors input let describe_alarm_history ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAlarmHistory input let describe_alarms ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAlarms input let describe_alarms_for_metric ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAlarmsForMetric input let describe_anomaly_detectors ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeAnomalyDetectors input let describe_insight_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeInsightRules input let disable_alarm_actions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisableAlarmActions input let disable_insight_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisableInsightRules input let enable_alarm_actions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.EnableAlarmActions input let enable_insight_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.EnableInsightRules input let get_alarm_mute_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAlarmMuteRule input let get_dashboard ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetDashboard input let get_insight_rule_report ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetInsightRuleReport input let get_metric_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMetricData input let get_metric_statistics ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMetricStatistics input let get_metric_stream ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMetricStream input let get_metric_widget_image ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMetricWidgetImage input let get_o_tel_enrichment ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetOTelEnrichment input let list_alarm_mute_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAlarmMuteRules input let list_dashboards ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListDashboards input let list_managed_insight_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListManagedInsightRules input let list_metric_streams ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListMetricStreams input let list_metrics ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListMetrics input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let put_alarm_mute_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutAlarmMuteRule input let put_anomaly_detector ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutAnomalyDetector input let put_composite_alarm ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutCompositeAlarm input let put_dashboard ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutDashboard input let put_insight_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutInsightRule input let put_managed_insight_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutManagedInsightRules input let put_metric_alarm ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutMetricAlarm input let put_metric_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutMetricData input let put_metric_stream ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutMetricStream input let set_alarm_state ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetAlarmState input let start_metric_streams ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartMetricStreams input let start_o_tel_enrichment ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartOTelEnrichment input let stop_metric_streams ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StopMetricStreams input let stop_o_tel_enrichment ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StopOTelEnrichment 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