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
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 dataref : unit -> t = "caml_binaryen_type_dataref"
let dataref = dataref ()
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"