From 6f1a927f1320ab134287db65747be58edc5b0c11 Mon Sep 17 00:00:00 2001 From: c-cube Date: Sat, 11 Jun 2022 03:38:53 +0000 Subject: [PATCH] deploy: 259edb965b13064243f5e91541d98e2cac0a25a0 --- dev/containers-data/CCMixtbl/index.html | 14 +++++++------- dev/containers/Containers_bencode/.dummy | 0 .../Containers_bencode/Decode/index.html | 2 ++ .../Containers_bencode/Encode/index.html | 2 ++ .../Containers_bencode/Str_map/index.html | 6 ++++++ dev/containers/Containers_bencode/index.html | 2 ++ dev/containers/index.html | 2 +- 7 files changed, 20 insertions(+), 8 deletions(-) create mode 100644 dev/containers/Containers_bencode/.dummy create mode 100644 dev/containers/Containers_bencode/Decode/index.html create mode 100644 dev/containers/Containers_bencode/Encode/index.html create mode 100644 dev/containers/Containers_bencode/Str_map/index.html create mode 100644 dev/containers/Containers_bencode/index.html diff --git a/dev/containers-data/CCMixtbl/index.html b/dev/containers-data/CCMixtbl/index.html index 2aafffc1..e562a5b2 100644 --- a/dev/containers-data/CCMixtbl/index.html +++ b/dev/containers-data/CCMixtbl/index.html @@ -3,20 +3,20 @@ let tbl = CCMixtbl.create 10 ;; -OUnit.assert_equal None (CCMixtbl.get ~inj:inj_int tbl "a");; +OUnit2.assert_equal None (CCMixtbl.get ~inj:inj_int tbl "a");; CCMixtbl.set inj_int tbl "a" 1;; -OUnit.assert_equal (Some 1) (CCMixtbl.get ~inj:inj_int tbl "a");; +OUnit2.assert_equal (Some 1) (CCMixtbl.get ~inj:inj_int tbl "a");; let inj_string = CCMixtbl.create_inj () ;; CCMixtbl.set inj_string tbl "b" "Hello"; -OUnit.assert_equal (Some "Hello") (CCMixtbl.get inj_string tbl "b");; -OUnit.assert_equal None (CCMixtbl.get inj_string tbl "a");; -OUnit.assert_equal (Some 1) (CCMixtbl.get inj_int tbl "a");; +OUnit2.assert_equal (Some "Hello") (CCMixtbl.get inj_string tbl "b");; +OUnit2.assert_equal None (CCMixtbl.get inj_string tbl "a");; +OUnit2.assert_equal (Some 1) (CCMixtbl.get inj_int tbl "a");; CCMixtbl.set inj_string tbl "a" "Bye";; -OUnit.assert_equal None (CCMixtbl.get inj_int tbl "a");; -OUnit.assert_equal (Some "Bye") (CCMixtbl.get inj_string tbl "a");;
type 'a t

A hash table containing values of different types. The type parameter 'a represents the type of the keys.

type 'b injection

An accessor for values of type 'b in any table. Values put in the table using a key can only be retrieved using this very same key.

val create : int -> 'a t

create n creates a hash table of initial size n.

val create_inj : unit -> 'b injection

Return a value that works for a given type of values. This function is normally called once for each type of value. Several keys may be created for the same type, but a value set with a given setter can only be retrieved with the matching getter. The same key can be reused across multiple tables (although not in a thread-safe way).

val get : inj:'b injection -> 'a t -> 'a -> 'b option

Get the value corresponding to this key, if it exists and belongs to the same key.

val set : inj:'b injection -> 'a t -> 'a -> 'b -> unit

Bind the key to the value, using inj.

val find : inj:'b injection -> 'a t -> 'a -> 'b

Find the value for the given key, which must be of the right type.

  • raises Not_found

    if either the key is not found, or if its value doesn't belong to the right type.

val length : 'a t -> int

Number of bindings.

val clear : 'a t -> unit

Clear content of the hashtable.

val remove : 'a t -> 'a -> unit

Remove the binding for this key.

val copy : 'a t -> 'a t

Copy of the table.

val mem : inj:_ injection -> 'a t -> 'a -> bool

Is the given key in the table, with the right type?

val iter_keys : 'a t -> ( 'a -> unit ) -> unit

Iterate on the keys of this table.

val fold_keys : 'a t -> 'b -> ( 'b -> 'a -> 'b ) -> 'b

Fold over the keys.

Iterators

type 'a iter = ( 'a -> unit ) -> unit
val keys_iter : 'a t -> 'a iter

All the keys.

val bindings_of : inj:'b injection -> 'a t -> ('a * 'b) iter

All the bindings that come from the corresponding injection.

type value =
| Value : ( 'b injection -> 'b option ) -> value
val bindings : 'a t -> ('a * value) iter

Iterate on all bindings.

\ No newline at end of file +OUnit2.assert_equal None (CCMixtbl.get inj_int tbl "a");; +OUnit2.assert_equal (Some "Bye") (CCMixtbl.get inj_string tbl "a");;
type 'a t

A hash table containing values of different types. The type parameter 'a represents the type of the keys.

type 'b injection

An accessor for values of type 'b in any table. Values put in the table using a key can only be retrieved using this very same key.

val create : int -> 'a t

create n creates a hash table of initial size n.

val create_inj : unit -> 'b injection

Return a value that works for a given type of values. This function is normally called once for each type of value. Several keys may be created for the same type, but a value set with a given setter can only be retrieved with the matching getter. The same key can be reused across multiple tables (although not in a thread-safe way).

val get : inj:'b injection -> 'a t -> 'a -> 'b option

Get the value corresponding to this key, if it exists and belongs to the same key.

val set : inj:'b injection -> 'a t -> 'a -> 'b -> unit

Bind the key to the value, using inj.

val find : inj:'b injection -> 'a t -> 'a -> 'b

Find the value for the given key, which must be of the right type.

  • raises Not_found

    if either the key is not found, or if its value doesn't belong to the right type.

val length : 'a t -> int

Number of bindings.

val clear : 'a t -> unit

Clear content of the hashtable.

val remove : 'a t -> 'a -> unit

Remove the binding for this key.

val copy : 'a t -> 'a t

Copy of the table.

val mem : inj:_ injection -> 'a t -> 'a -> bool

Is the given key in the table, with the right type?

val iter_keys : 'a t -> ( 'a -> unit ) -> unit

Iterate on the keys of this table.

val fold_keys : 'a t -> 'b -> ( 'b -> 'a -> 'b ) -> 'b

Fold over the keys.

Iterators

type 'a iter = ( 'a -> unit ) -> unit
val keys_iter : 'a t -> 'a iter

All the keys.

val bindings_of : inj:'b injection -> 'a t -> ('a * 'b) iter

All the bindings that come from the corresponding injection.

type value =
| Value : ( 'b injection -> 'b option ) -> value
val bindings : 'a t -> ('a * value) iter

Iterate on all bindings.

\ No newline at end of file diff --git a/dev/containers/Containers_bencode/.dummy b/dev/containers/Containers_bencode/.dummy new file mode 100644 index 00000000..e69de29b diff --git a/dev/containers/Containers_bencode/Decode/index.html b/dev/containers/Containers_bencode/Decode/index.html new file mode 100644 index 00000000..c52ac601 --- /dev/null +++ b/dev/containers/Containers_bencode/Decode/index.html @@ -0,0 +1,2 @@ + +Decode (containers.Containers_bencode.Decode)

Module Containers_bencode.Decode

Decoding

val of_string : string -> t option
val of_string_exn : string -> t

Parse string.

  • raises Failure

    if the string is not valid bencode.

\ No newline at end of file diff --git a/dev/containers/Containers_bencode/Encode/index.html b/dev/containers/Containers_bencode/Encode/index.html new file mode 100644 index 00000000..9ac79886 --- /dev/null +++ b/dev/containers/Containers_bencode/Encode/index.html @@ -0,0 +1,2 @@ + +Encode (containers.Containers_bencode.Encode)

Module Containers_bencode.Encode

Encoding

val to_string : t -> string
val to_buffer : Stdlib.Buffer.t -> t -> unit
val to_chan : Stdlib.out_channel -> t -> unit
val to_fmt : Stdlib.Format.formatter -> t -> unit
\ No newline at end of file diff --git a/dev/containers/Containers_bencode/Str_map/index.html b/dev/containers/Containers_bencode/Str_map/index.html new file mode 100644 index 00000000..bd40775d --- /dev/null +++ b/dev/containers/Containers_bencode/Str_map/index.html @@ -0,0 +1,6 @@ + +Str_map (containers.Containers_bencode.Str_map)

Module Containers_bencode.Str_map

type key = Stdlib.String.t
type !'a t = 'a Stdlib__Map.Make(Stdlib.String).t
val empty : 'a t
val is_empty : 'a t -> bool
val mem : key -> 'a t -> bool
val add : key -> 'a -> 'a t -> 'a t
val update : key -> ( 'a option -> 'a option ) -> 'a t -> 'a t
val singleton : key -> 'a -> 'a t
val remove : key -> 'a t -> 'a t
val merge : + ( key -> 'a option -> 'b option -> 'c option ) -> + 'a t -> + 'b t -> + 'c t
val union : ( key -> 'a -> 'a -> 'a option ) -> 'a t -> 'a t -> 'a t
val compare : ( 'a -> 'a -> int ) -> 'a t -> 'a t -> int
val equal : ( 'a -> 'a -> bool ) -> 'a t -> 'a t -> bool
val iter : ( key -> 'a -> unit ) -> 'a t -> unit
val fold : ( key -> 'a -> 'b -> 'b ) -> 'a t -> 'b -> 'b
val for_all : ( key -> 'a -> bool ) -> 'a t -> bool
val exists : ( key -> 'a -> bool ) -> 'a t -> bool
val filter : ( key -> 'a -> bool ) -> 'a t -> 'a t
val filter_map : ( key -> 'a -> 'b option ) -> 'a t -> 'b t
val partition : ( key -> 'a -> bool ) -> 'a t -> 'a t * 'a t
val cardinal : 'a t -> int
val bindings : 'a t -> (key * 'a) list
val min_binding : 'a t -> key * 'a
val min_binding_opt : 'a t -> (key * 'a) option
val max_binding : 'a t -> key * 'a
val max_binding_opt : 'a t -> (key * 'a) option
val choose : 'a t -> key * 'a
val choose_opt : 'a t -> (key * 'a) option
val split : key -> 'a t -> 'a t * 'a option * 'a t
val find : key -> 'a t -> 'a
val find_opt : key -> 'a t -> 'a option
val find_first : ( key -> bool ) -> 'a t -> key * 'a
val find_first_opt : ( key -> bool ) -> 'a t -> (key * 'a) option
val find_last : ( key -> bool ) -> 'a t -> key * 'a
val find_last_opt : ( key -> bool ) -> 'a t -> (key * 'a) option
val map : ( 'a -> 'b ) -> 'a t -> 'b t
val mapi : ( key -> 'a -> 'b ) -> 'a t -> 'b t
val to_seq : 'a t -> (key * 'a) Stdlib.Seq.t
val to_rev_seq : 'a t -> (key * 'a) Stdlib.Seq.t
val to_seq_from : key -> 'a t -> (key * 'a) Stdlib.Seq.t
val add_seq : (key * 'a) Stdlib.Seq.t -> 'a t -> 'a t
val of_seq : (key * 'a) Stdlib.Seq.t -> 'a t
\ No newline at end of file diff --git a/dev/containers/Containers_bencode/index.html b/dev/containers/Containers_bencode/index.html new file mode 100644 index 00000000..b2c314e1 --- /dev/null +++ b/dev/containers/Containers_bencode/index.html @@ -0,0 +1,2 @@ + +Containers_bencode (containers.Containers_bencode)

Module Containers_bencode

Basic Bencode decoder/encoder.

See https://en.wikipedia.org/wiki/Bencode .

module Str_map : sig ... end
type t =
| Int of int64
| String of string
| List of t list
| Map of t Str_map.t
val equal : t -> t -> bool
val hash : t -> int
val pp_debug : Stdlib.Format.formatter -> t -> unit

Printer for diagnostic/human consumption

val to_string_debug : t -> string
val int : int -> t
val int64 : int64 -> t
val string : string -> t
val list : t list -> t
val map_of_list : (string * t) list -> t
val map : t Str_map.t -> t
module Encode : sig ... end

Encoding

module Decode : sig ... end

Decoding

\ No newline at end of file diff --git a/dev/containers/index.html b/dev/containers/index.html index 8ed94a71..17ee5bf0 100644 --- a/dev/containers/index.html +++ b/dev/containers/index.html @@ -1,2 +1,2 @@ -index (containers.index)

containers index

Library containers

This library exposes the following toplevel modules:

Library containers.codegen

The entry point of this library is the module: Containers_codegen.

Library containers.monomorphic

The entry point of this library is the module: CCMonomorphic.

Library containers.top

The entry point of this library is the module: Containers_top.

Library containers.unix

The entry point of this library is the module: CCUnix.

\ No newline at end of file +index (containers.index)

containers index

Library containers

This library exposes the following toplevel modules:

Library containers.bencode

The entry point of this library is the module: Containers_bencode.

Library containers.codegen

The entry point of this library is the module: Containers_codegen.

Library containers.monomorphic

The entry point of this library is the module: CCMonomorphic.

Library containers.top

The entry point of this library is the module: Containers_top.

Library containers.unix

The entry point of this library is the module: CCUnix.

\ No newline at end of file