package awso-async
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
AWS client for Async (400+ services, auto-generated from botocore)
Install
dune-project
Dependency
Authors
Maintainers
Sources
awso-0.9.0.tbz
sha256=47224890900b1f5d2bd717000a02fa8918f92eafa99f702f7d59a1b053ff8e95
sha512=e187288f7c8fccb221f5417671732c8c8de95cdbacba1514db592b5700df2293468bde07956539bd44f3d460f6c75d38bd66ca161d0eae68a8b1b4e081882367
doc/src/awso-async.payment-cryptography-data/io.ml.html
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(* 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_payment_cryptography_data 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 decrypt_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DecryptData input let encrypt_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.EncryptData input let generate_as2805_kek_validation ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GenerateAs2805KekValidation input let generate_card_validation_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GenerateCardValidationData input let generate_mac ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GenerateMac input let generate_mac_emv_pin_change ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GenerateMacEmvPinChange input let generate_pin_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GeneratePinData input let re_encrypt_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ReEncryptData input let translate_key_material ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TranslateKeyMaterial input let translate_pin_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TranslatePinData input let verify_auth_request_cryptogram ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.VerifyAuthRequestCryptogram input let verify_card_validation_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.VerifyCardValidationData input let verify_mac ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.VerifyMac input let verify_pin_data ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.VerifyPinData input
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>