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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
(* 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_qconnect
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_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ActivateMessageTemplate input
let create_a_i_agent ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAIAgent input
let create_a_i_agent_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAIAgentVersion input
let create_a_i_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAIGuardrail input
let create_a_i_guardrail_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAIGuardrailVersion input
let create_a_i_prompt ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAIPrompt input
let create_a_i_prompt_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAIPromptVersion input
let create_assistant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAssistant input
let create_assistant_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAssistantAssociation input
let create_content ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateContent input
let create_content_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateContentAssociation input
let create_knowledge_base ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateKnowledgeBase input
let create_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMessageTemplate input
let create_message_template_attachment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMessageTemplateAttachment input
let create_message_template_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMessageTemplateVersion input
let create_quick_response ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateQuickResponse input
let create_session ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateSession input
let deactivate_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeactivateMessageTemplate input
let delete_a_i_agent ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAIAgent input
let delete_a_i_agent_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAIAgentVersion input
let delete_a_i_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAIGuardrail input
let delete_a_i_guardrail_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAIGuardrailVersion input
let delete_a_i_prompt ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAIPrompt input
let delete_a_i_prompt_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAIPromptVersion input
let delete_assistant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAssistant input
let delete_assistant_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAssistantAssociation input
let delete_content ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteContent input
let delete_content_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteContentAssociation input
let delete_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteImportJob input
let delete_knowledge_base ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteKnowledgeBase input
let delete_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMessageTemplate input
let delete_message_template_attachment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMessageTemplateAttachment input
let delete_quick_response ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteQuickResponse input
let get_a_i_agent ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAIAgent input
let get_a_i_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAIGuardrail input
let get_a_i_prompt ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAIPrompt input
let get_assistant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAssistant input
let get_assistant_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAssistantAssociation input
let get_content ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetContent input
let get_content_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetContentAssociation input
let get_content_summary ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetContentSummary input
let get_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetImportJob input
let get_knowledge_base ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetKnowledgeBase input
let get_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMessageTemplate input
let get_next_message ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetNextMessage input
let get_quick_response ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetQuickResponse input
let get_recommendations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetRecommendations input
let get_session ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetSession input
let list_a_i_agent_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAIAgentVersions input
let list_a_i_agents ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAIAgents input
let list_a_i_guardrail_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAIGuardrailVersions input
let list_a_i_guardrails ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAIGuardrails input
let list_a_i_prompt_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAIPromptVersions input
let list_a_i_prompts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAIPrompts input
let list_assistant_associations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAssistantAssociations input
let list_assistants ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAssistants input
let list_content_associations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListContentAssociations input
let list_contents ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListContents input
let list_import_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListImportJobs input
let list_knowledge_bases ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListKnowledgeBases input
let list_message_template_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMessageTemplateVersions input
let list_message_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMessageTemplates input
let list_messages ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMessages input
let list_models ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListModels input
let list_quick_responses ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListQuickResponses input
let list_spans ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListSpans input
let list_tags_for_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let notify_recommendations_received ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.NotifyRecommendationsReceived input
let put_feedback ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutFeedback input
let query_assistant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.QueryAssistant input
let remove_assistant_a_i_agent ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RemoveAssistantAIAgent input
let remove_knowledge_base_template_uri ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RemoveKnowledgeBaseTemplateUri input
let render_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RenderMessageTemplate input
let retrieve ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.Retrieve input
let search_content ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SearchContent input
let search_message_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SearchMessageTemplates input
let search_quick_responses ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SearchQuickResponses input
let search_sessions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SearchSessions input
let send_message ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SendMessage input
let start_content_upload ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartContentUpload input
let start_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartImportJob 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_a_i_agent ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAIAgent input
let update_a_i_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAIGuardrail input
let update_a_i_prompt ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAIPrompt input
let update_assistant_a_i_agent ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAssistantAIAgent input
let update_content ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateContent input
let update_knowledge_base_template_uri ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateKnowledgeBaseTemplateUri input
let update_message_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMessageTemplate input
let update_message_template_metadata ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMessageTemplateMetadata input
let update_quick_response ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateQuickResponse input
let update_session ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateSession input
let update_session_data ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateSessionData input