diff --git a/guardian/Guardian_backend/MariaDb/Make/argument-4-Database/index.html b/guardian/Guardian_backend/MariaDb/Make/argument-4-Database/index.html index 1dfa813..2236426 100644 --- a/guardian/Guardian_backend/MariaDb/Make/argument-4-Database/index.html +++ b/guardian/Guardian_backend/MariaDb/Make/argument-4-Database/index.html @@ -1,8 +1,9 @@ -Database (guardian.Guardian_backend.MariaDb.Make.Database)

Parameter Make.Database

val initialize : unit -> unit
val fetch_pool : +Database (guardian.Guardian_backend.MariaDb.Make.Database)

Parameter Make.Database

val initialize : ?additinal_pools:(string * string) list -> unit -> unit
val fetch_pool : ?ctx:(string * string) list -> + ?retries:int -> unit -> - (Caqti_lwt.connection, Caqti_error.t) Caqti_lwt_unix.Pool.t
val add_pool : ?pool_size:int -> string -> string -> unit
val drop_pool : string -> unit Lwt.t
val find : + (Caqti_lwt.connection, Caqti_error.t) Caqti_lwt_unix.Pool.t Lwt.t
val add_pool : ?required:bool -> string -> string -> unit
val drop_pool : string -> unit Lwt.t
val connect : string -> (unit, string) Stdlib.result
val disconnect : ?error:Caqti_error.t -> string -> unit Lwt.t
val find : ?ctx:(string * string) list -> ('a, 'b, [< `One ]) Caqti_request.t -> 'a -> @@ -18,17 +19,18 @@ ?ctx:(string * string) list -> ('a, unit, [< `Zero ]) Caqti_request.t -> 'a -> - unit Lwt.t
val transaction : - ?ctx:(string * string) list -> - (Caqti_lwt.connection -> 'a) -> - 'a Lwt.t
val exec_with_connection : - ('a, unit, [< `Zero ]) Caqti_request.t -> - 'a -> - (module Caqti_lwt.CONNECTION) -> unit Lwt.t
val populate : ?ctx:(string * string) list -> string -> string list -> 'a Caqti_type.t -> 'a list -> + unit Lwt.t
val transaction : + ?ctx:(string * string) list -> + ?setup:(Caqti_lwt.connection -> (unit, Caqti_error.t) Lwt_result.t) list -> + ?cleanup:(Caqti_lwt.connection -> (unit, Caqti_error.t) Lwt_result.t) list -> + (Caqti_lwt.connection -> ('a, Caqti_error.t) Lwt_result.t) -> + 'a Lwt.t
val transaction_iter : + ?ctx:(string * string) list -> + (Caqti_lwt.connection -> (unit, Caqti_error.t) Stdlib.result Lwt.t) list -> unit Lwt.t
diff --git a/guardian/Guardian_backend/Pools/DefaultConfig/index.html b/guardian/Guardian_backend/Pools/DefaultConfig/index.html index 08e4a94..d8aa504 100644 --- a/guardian/Guardian_backend/Pools/DefaultConfig/index.html +++ b/guardian/Guardian_backend/Pools/DefaultConfig/index.html @@ -1,2 +1,2 @@ -DefaultConfig (guardian.Guardian_backend.Pools.DefaultConfig)

Module Pools.DefaultConfig

val database : connection_type
val database_pool_size : int
+DefaultConfig (guardian.Guardian_backend.Pools.DefaultConfig)

Module Pools.DefaultConfig

val database : string * string
val database_pool_size : int
val expected_databases : int
diff --git a/guardian/Guardian_backend/Pools/Make/argument-1-Config/index.html b/guardian/Guardian_backend/Pools/Make/argument-1-Config/index.html index c730f16..d0a1433 100644 --- a/guardian/Guardian_backend/Pools/Make/argument-1-Config/index.html +++ b/guardian/Guardian_backend/Pools/Make/argument-1-Config/index.html @@ -1,2 +1,2 @@ -Config (guardian.Guardian_backend.Pools.Make.Config)

Parameter Make.Config

val database : connection_type
val database_pool_size : int
+Config (guardian.Guardian_backend.Pools.Make.Config)

Parameter Make.Config

val database : string * string
val database_pool_size : int
val expected_databases : int
diff --git a/guardian/Guardian_backend/Pools/Make/index.html b/guardian/Guardian_backend/Pools/Make/index.html index 80430eb..16d803f 100644 --- a/guardian/Guardian_backend/Pools/Make/index.html +++ b/guardian/Guardian_backend/Pools/Make/index.html @@ -1,8 +1,9 @@ -Make (guardian.Guardian_backend.Pools.Make)

Module Pools.Make

Parameters

module Config : ConfigSig

Signature

include Sig
val initialize : unit -> unit
val fetch_pool : +Make (guardian.Guardian_backend.Pools.Make)

Module Pools.Make

Parameters

module Config : ConfigSig

Signature

include Sig
val initialize : ?additinal_pools:(string * string) list -> unit -> unit
val fetch_pool : ?ctx:(string * string) list -> + ?retries:int -> unit -> - (Caqti_lwt.connection, Caqti_error.t) Caqti_lwt_unix.Pool.t
val add_pool : ?pool_size:int -> string -> string -> unit
val drop_pool : string -> unit Lwt.t
val find : + (Caqti_lwt.connection, Caqti_error.t) Caqti_lwt_unix.Pool.t Lwt.t
val add_pool : ?required:bool -> string -> string -> unit
val drop_pool : string -> unit Lwt.t
val connect : string -> (unit, string) Stdlib.result
val disconnect : ?error:Caqti_error.t -> string -> unit Lwt.t
val find : ?ctx:(string * string) list -> ('a, 'b, [< `One ]) Caqti_request.t -> 'a -> @@ -18,26 +19,21 @@ ?ctx:(string * string) list -> ('a, unit, [< `Zero ]) Caqti_request.t -> 'a -> - unit Lwt.t
val transaction : - ?ctx:(string * string) list -> - (Caqti_lwt.connection -> 'a) -> - 'a Lwt.t
val exec_with_connection : - ('a, unit, [< `Zero ]) Caqti_request.t -> - 'a -> - (module Caqti_lwt.CONNECTION) -> unit Lwt.t
val populate : ?ctx:(string * string) list -> string -> string list -> 'a Caqti_type.t -> 'a list -> - unit Lwt.t
val transaction' : + unit Lwt.t
val transaction : ?ctx:(string * string) list -> - (Caqti_lwt.connection -> ('a, [< Caqti_error.t ]) Stdlib.result) -> - 'a Lwt.t
val query : + ?setup:(Caqti_lwt.connection -> (unit, Caqti_error.t) Lwt_result.t) list -> + ?cleanup:(Caqti_lwt.connection -> (unit, Caqti_error.t) Lwt_result.t) list -> + (Caqti_lwt.connection -> ('a, Caqti_error.t) Lwt_result.t) -> + 'a Lwt.t
val transaction_iter : ?ctx:(string * string) list -> - (Caqti_lwt.connection -> 'a Lwt.t) -> - 'a Lwt.t
val query' : + (Caqti_lwt.connection -> (unit, Caqti_error.t) Stdlib.result Lwt.t) list -> + unit Lwt.t
val query : ?ctx:(string * string) list -> - (Caqti_lwt.connection -> ('a, [< Caqti_error.t ]) Stdlib.result Lwt.t) -> + (Caqti_lwt.connection -> ('a, Caqti_error.t) Stdlib.result Lwt.t) -> 'a Lwt.t
diff --git a/guardian/Guardian_backend/Pools/index.html b/guardian/Guardian_backend/Pools/index.html index 2cede80..98a5ef3 100644 --- a/guardian/Guardian_backend/Pools/index.html +++ b/guardian/Guardian_backend/Pools/index.html @@ -1,9 +1,2 @@ -Pools (guardian.Guardian_backend.Pools)

Module Guardian_backend.Pools

exception Exception of string
val get_or_raise : - ?ctx:(string * string) list -> - ?tags:Logs.Tag.set -> - ?log_level:Logs.level -> - ?msg_prefix:string -> - unit -> - ('a, [< Caqti_error.t ]) Stdlib.result -> - 'a
type connection_type =
  1. | SinglePool of string
  2. | MultiPools of (string * string) list
module type ConfigSig = sig ... end
module type Sig = sig ... end
module Make (Config : ConfigSig) : sig ... end
+Pools (guardian.Guardian_backend.Pools)

Module Guardian_backend.Pools

exception Exception of string
module type ConfigSig = sig ... end
module type Sig = sig ... end
module Make (Config : ConfigSig) : sig ... end
diff --git a/guardian/Guardian_backend/Pools/module-type-ConfigSig/index.html b/guardian/Guardian_backend/Pools/module-type-ConfigSig/index.html index 222afc4..c598f0e 100644 --- a/guardian/Guardian_backend/Pools/module-type-ConfigSig/index.html +++ b/guardian/Guardian_backend/Pools/module-type-ConfigSig/index.html @@ -1,2 +1,2 @@ -ConfigSig (guardian.Guardian_backend.Pools.ConfigSig)

Module type Pools.ConfigSig

val database : connection_type
val database_pool_size : int
+ConfigSig (guardian.Guardian_backend.Pools.ConfigSig)

Module type Pools.ConfigSig

val database : string * string
val database_pool_size : int
val expected_databases : int
diff --git a/guardian/Guardian_backend/Pools/module-type-Sig/index.html b/guardian/Guardian_backend/Pools/module-type-Sig/index.html index f49b5c1..72095df 100644 --- a/guardian/Guardian_backend/Pools/module-type-Sig/index.html +++ b/guardian/Guardian_backend/Pools/module-type-Sig/index.html @@ -1,8 +1,9 @@ -Sig (guardian.Guardian_backend.Pools.Sig)

Module type Pools.Sig

val initialize : unit -> unit
val fetch_pool : +Sig (guardian.Guardian_backend.Pools.Sig)

Module type Pools.Sig

val initialize : ?additinal_pools:(string * string) list -> unit -> unit
val fetch_pool : ?ctx:(string * string) list -> + ?retries:int -> unit -> - (Caqti_lwt.connection, Caqti_error.t) Caqti_lwt_unix.Pool.t
val add_pool : ?pool_size:int -> string -> string -> unit
val drop_pool : string -> unit Lwt.t
val find : + (Caqti_lwt.connection, Caqti_error.t) Caqti_lwt_unix.Pool.t Lwt.t
val add_pool : ?required:bool -> string -> string -> unit
val drop_pool : string -> unit Lwt.t
val connect : string -> (unit, string) Stdlib.result
val disconnect : ?error:Caqti_error.t -> string -> unit Lwt.t
val find : ?ctx:(string * string) list -> ('a, 'b, [< `One ]) Caqti_request.t -> 'a -> @@ -18,17 +19,18 @@ ?ctx:(string * string) list -> ('a, unit, [< `Zero ]) Caqti_request.t -> 'a -> - unit Lwt.t
val transaction : - ?ctx:(string * string) list -> - (Caqti_lwt.connection -> 'a) -> - 'a Lwt.t
val exec_with_connection : - ('a, unit, [< `Zero ]) Caqti_request.t -> - 'a -> - (module Caqti_lwt.CONNECTION) -> unit Lwt.t
val populate : ?ctx:(string * string) list -> string -> string list -> 'a Caqti_type.t -> 'a list -> + unit Lwt.t
val transaction : + ?ctx:(string * string) list -> + ?setup:(Caqti_lwt.connection -> (unit, Caqti_error.t) Lwt_result.t) list -> + ?cleanup:(Caqti_lwt.connection -> (unit, Caqti_error.t) Lwt_result.t) list -> + (Caqti_lwt.connection -> ('a, Caqti_error.t) Lwt_result.t) -> + 'a Lwt.t
val transaction_iter : + ?ctx:(string * string) list -> + (Caqti_lwt.connection -> (unit, Caqti_error.t) Stdlib.result Lwt.t) list -> unit Lwt.t