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
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
type t
external none : unit -> t = "caml_binaryen_type_none"
let none = none ()
external int32 : unit -> t = "caml_binaryen_type_int32"
let int32 = int32 ()
external int64 : unit -> t = "caml_binaryen_type_int64"
let int64 = int64 ()
external float32 : unit -> t = "caml_binaryen_type_float32"
let float32 = float32 ()
external float64 : unit -> t = "caml_binaryen_type_float64"
let float64 = float64 ()
external vec128 : unit -> t = "caml_binaryen_type_vec128"
let vec128 = vec128 ()
external funcref : unit -> t = "caml_binaryen_type_funcref"
let funcref = funcref ()
external anyref : unit -> t = "caml_binaryen_type_anyref"
let anyref = anyref ()
external eqref : unit -> t = "caml_binaryen_type_eqref"
let eqref = eqref ()
external i31ref : unit -> t = "caml_binaryen_type_i31ref"
let i31ref = i31ref ()
external structref : unit -> t = "caml_binaryen_type_structref"
let structref = structref ()
external arrayref : unit -> t = "caml_binaryen_type_arrayref"
let arrayref = arrayref ()
external stringref : unit -> t = "caml_binaryen_type_stringref"
let stringref = stringref ()
external nullref : unit -> t = "caml_binaryen_type_nullref"
let nullref = nullref ()
external null_externref : unit -> t = "caml_binaryen_type_null_externref"
let null_externref = null_externref ()
external null_funcref : unit -> t = "caml_binaryen_type_null_funcref"
let null_funcref = null_funcref ()
external unreachable : unit -> t = "caml_binaryen_type_unreachable"
let unreachable = unreachable ()
external auto : unit -> t = "caml_binaryen_type_auto"
let auto = auto ()
external create : t array -> t = "caml_binaryen_type_create"
external expand : t -> t array = "caml_binaryen_type_expand"
external is_nullable : t -> bool = "caml_binaryen_type_is_nullable"
external from_heap_type : Heap_type.t -> t = "caml_binaryen_type_from_heap_type"
external get_heap_type : t -> Heap_type.t = "caml_binaryen_type_get_heap_type"