package rpc_parallel
Type-safe parallel library built on top of Async_rpc
Install
Dune Dependency
Authors
Maintainers
Sources
rpc_parallel-v0.16.0.tar.gz
sha256=1e6e85e9f7cf3c1c221ceaa8c0d7a2370d402ae2ee12d68aefb6ebe47ef33016
doc/src/rpc_parallel.krb/mode.ml.html
Source file mode.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
open! Core open Async module Kerberized = struct type t = { conn_type : Krb_public.Conn_type.Stable.V1.t ; server_key_source : Krb_public.Server_key_source.Stable.V2.t } [@@deriving bin_io, sexp] let krb_server_mode t = let conn_type_preference = Krb_public.Conn_type_preference.accept_only t.conn_type in let key_source = t.server_key_source in Krb_public.Mode.Server.kerberized ~conn_type_preference ~key_source |> return ;; let krb_client_mode t = let conn_type_preference = Krb_public.Conn_type_preference.accept_only t.conn_type in Krb_public.Mode.Client.kerberized ~conn_type_preference () ;; end type t = | Kerberized of Kerberized.t | For_unit_test [@@deriving bin_io, sexp] let kerberized ~key_source ~conn_type () = Kerberized { conn_type; server_key_source = key_source } ;; let for_unit_test = For_unit_test
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>