package core_kernel

  1. Overview
  2. Docs
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file stable_internal.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
open! Import
include Bin_prot.Std
include Hash.Builtin

include (
  Base :
  sig
    type nonrec 'a array = 'a array [@@deriving sexp, sexp_grammar]
    type nonrec bool = bool [@@deriving sexp, sexp_grammar]
    type nonrec char = char [@@deriving sexp, sexp_grammar]
    type nonrec exn = exn [@@deriving sexp_of]
    type nonrec float = float [@@deriving sexp, sexp_grammar]
    type nonrec int = int [@@deriving sexp, sexp_grammar]
    type nonrec int32 = int32 [@@deriving sexp, sexp_grammar]
    type nonrec int64 = int64 [@@deriving sexp, sexp_grammar]
    type nonrec 'a list = 'a list [@@deriving sexp, sexp_grammar]
    type nonrec nativeint = nativeint [@@deriving sexp, sexp_grammar]
    type nonrec 'a option = 'a option [@@deriving sexp, sexp_grammar]
    type nonrec 'a ref = 'a ref [@@deriving sexp, sexp_grammar]
    type nonrec string = string [@@deriving sexp, sexp_grammar]
    type nonrec bytes = bytes [@@deriving sexp, sexp_grammar]
    type nonrec unit = unit [@@deriving sexp, sexp_grammar]
  end
  with type 'a array := 'a array
  with type bool := bool
  with type char := char
  with type exn := exn
  with type float := float
  with type int := int
  with type int32 := int32
  with type int64 := int64
  with type 'a list := 'a list
  with type nativeint := nativeint
  with type 'a option := 'a option
  with type 'a ref := 'a ref
  with type string := string
  with type bytes := bytes
  with type unit := unit)

include (
struct
  type 'a sexp_option = ('a Std_internal.sexp_option[@ocaml.warning "-3"])
  [@@deriving bin_io, compare, hash]

  type 'a sexp_list = ('a Std_internal.sexp_list[@ocaml.warning "-3"])
  [@@deriving bin_io, compare, hash]
end :
sig
  type 'a sexp_option = ('a Std_internal.sexp_option[@ocaml.warning "-3"])
  [@@deriving bin_io, compare, hash]

  type 'a sexp_list = ('a Std_internal.sexp_list[@ocaml.warning "-3"])
  [@@deriving bin_io, compare, hash]
end
with type 'a sexp_option := ('a Std_internal.sexp_option[@ocaml.warning "-3"])
with type 'a sexp_list := ('a Std_internal.sexp_list[@ocaml.warning "-3"]))

type 'a sexp_option = ('a Std_internal.sexp_option[@ocaml.warning "-3"])
[@@deprecated "[since 2019-03] use [@sexp.option] instead"]

type 'a sexp_list = ('a Std_internal.sexp_list[@ocaml.warning "-3"])
[@@deprecated "[since 2019-03] use [@sexp.list] instead"]
OCaml

Innovation. Community. Security.