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(* 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_codeartifact 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_external_connection ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.AssociateExternalConnection input let copy_package_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CopyPackageVersions input let create_domain ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateDomain input let create_package_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreatePackageGroup input let create_repository ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateRepository input let delete_domain ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteDomain input let delete_domain_permissions_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteDomainPermissionsPolicy input let delete_package ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePackage input let delete_package_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePackageGroup input let delete_package_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePackageVersions input let delete_repository ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRepository input let delete_repository_permissions_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRepositoryPermissionsPolicy input let describe_domain ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeDomain input let describe_package ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribePackage input let describe_package_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribePackageGroup input let describe_package_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribePackageVersion input let describe_repository ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeRepository input let disassociate_external_connection ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisassociateExternalConnection input let dispose_package_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DisposePackageVersions input let get_associated_package_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAssociatedPackageGroup input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAuthorizationToken input let get_domain_permissions_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetDomainPermissionsPolicy input let get_package_version_asset ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetPackageVersionAsset input let get_package_version_readme ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetPackageVersionReadme input let get_repository_endpoint ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRepositoryEndpoint input let get_repository_permissions_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRepositoryPermissionsPolicy input let list_allowed_repositories_for_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAllowedRepositoriesForGroup input let list_associated_packages ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAssociatedPackages input let list_domains ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListDomains input let list_package_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPackageGroups input let list_package_version_assets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPackageVersionAssets input let list_package_version_dependencies ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPackageVersionDependencies input let list_package_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPackageVersions input let list_packages ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPackages input let list_repositories ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRepositories input let list_repositories_in_domain ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRepositoriesInDomain input let list_sub_package_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSubPackageGroups input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let publish_package_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PublishPackageVersion input let put_domain_permissions_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutDomainPermissionsPolicy input let put_package_origin_configuration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutPackageOriginConfiguration input let put_repository_permissions_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutRepositoryPermissionsPolicy 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_package_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdatePackageGroup input let update_package_group_origin_configuration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdatePackageGroupOriginConfiguration input let update_package_versions_status ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdatePackageVersionsStatus input let update_repository ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateRepository input