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 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(* 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_bedrock_agent 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 associate_agent_collaborator ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.AssociateAgentCollaborator input let associate_agent_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.AssociateAgentKnowledgeBase input let create_agent ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateAgent input let create_agent_action_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateAgentActionGroup input let create_agent_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateAgentAlias input let create_data_source ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateDataSource input let create_flow ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateFlow input let create_flow_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateFlowAlias input let create_flow_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateFlowVersion input let create_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateKnowledgeBase input let create_prompt ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreatePrompt input let create_prompt_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreatePromptVersion input let delete_agent ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAgent input let delete_agent_action_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAgentActionGroup input let delete_agent_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAgentAlias input let delete_agent_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteAgentVersion input let delete_data_source ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteDataSource input let delete_flow ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteFlow input let delete_flow_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteFlowAlias input let delete_flow_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteFlowVersion input let delete_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteKnowledgeBase input let delete_knowledge_base_documents ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteKnowledgeBaseDocuments input let delete_prompt ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePrompt input let disassociate_agent_collaborator ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisassociateAgentCollaborator input let disassociate_agent_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisassociateAgentKnowledgeBase input let get_agent ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgent input let get_agent_action_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentActionGroup input let get_agent_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentAlias input let get_agent_collaborator ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentCollaborator input let get_agent_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentKnowledgeBase input let get_agent_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentVersion input let get_data_source ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetDataSource input let get_flow ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetFlow input let get_flow_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetFlowAlias input let get_flow_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetFlowVersion input let get_ingestion_job ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetIngestionJob input let get_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetKnowledgeBase input let get_knowledge_base_documents ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetKnowledgeBaseDocuments input let get_prompt ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetPrompt input let ingest_knowledge_base_documents ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.IngestKnowledgeBaseDocuments input let list_agent_action_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAgentActionGroups input let list_agent_aliases ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAgentAliases input let list_agent_collaborators ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAgentCollaborators input let list_agent_knowledge_bases ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAgentKnowledgeBases input let list_agent_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAgentVersions input let list_agents ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAgents input let list_data_sources ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListDataSources input let list_flow_aliases ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListFlowAliases input let list_flow_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListFlowVersions input let list_flows ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListFlows input let list_ingestion_jobs ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListIngestionJobs input let list_knowledge_base_documents ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListKnowledgeBaseDocuments input let list_knowledge_bases ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListKnowledgeBases input let list_prompts ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPrompts input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let prepare_agent ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PrepareAgent input let prepare_flow ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PrepareFlow input let start_ingestion_job ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StartIngestionJob input let stop_ingestion_job ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.StopIngestionJob 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_agent ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateAgent input let update_agent_action_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateAgentActionGroup input let update_agent_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateAgentAlias input let update_agent_collaborator ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateAgentCollaborator input let update_agent_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateAgentKnowledgeBase input let update_data_source ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateDataSource input let update_flow ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateFlow input let update_flow_alias ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateFlowAlias input let update_knowledge_base ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateKnowledgeBase input let update_prompt ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdatePrompt input let validate_flow_definition ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ValidateFlowDefinition input