sig
type t =
Abstract
| Structure of Unmarshal.structure
| Transform of Unmarshal.t * (Stdlib.Obj.t -> Stdlib.Obj.t)
| Return of Unmarshal.t * (unit -> Stdlib.Obj.t)
| Dynamic of (unit -> Unmarshal.t)
and structure =
Sum of Unmarshal.t array array
| Dependent_pair of Unmarshal.t * (Stdlib.Obj.t -> Unmarshal.t)
| Array of Unmarshal.t
val input_val : Stdlib.in_channel -> Unmarshal.t -> 'a
val null : Stdlib.Obj.t
val id : Stdlib.Obj.t -> Stdlib.Obj.t
val t_unit : Unmarshal.t
val t_int : Unmarshal.t
val t_string : Unmarshal.t
val t_float : Unmarshal.t
val t_bool : Unmarshal.t
val t_int32 : Unmarshal.t
val t_int64 : Unmarshal.t
val t_nativeint : Unmarshal.t
val t_record : Unmarshal.t array -> Unmarshal.t
val t_tuple : Unmarshal.t array -> Unmarshal.t
val t_list : Unmarshal.t -> Unmarshal.t
val t_ref : Unmarshal.t -> Unmarshal.t
val t_option : Unmarshal.t -> Unmarshal.t
val t_array : Unmarshal.t -> Unmarshal.t
val t_queue : Unmarshal.t -> Unmarshal.t
val t_hashtbl_unchangedhashs : Unmarshal.t -> Unmarshal.t -> Unmarshal.t
val t_hashtbl_changedhashs :
(int -> 'table) ->
('table -> 'key -> 'value -> unit) ->
Unmarshal.t -> Unmarshal.t -> Unmarshal.t
val t_set_unchangedcompares : Unmarshal.t -> Unmarshal.t
val t_map_unchangedcompares : Unmarshal.t -> Unmarshal.t -> Unmarshal.t
val register_custom : string -> (Stdlib.in_channel -> Stdlib.Obj.t) -> unit
val arch_sixtyfour : bool
val arch_bigendian : bool
val getword : Stdlib.in_channel -> Stdlib.Int32.t
val read8s : Stdlib.in_channel -> int
val read16s : Stdlib.in_channel -> int
val read32s : Stdlib.in_channel -> int
val read64s : Stdlib.in_channel -> int
val read8u : Stdlib.in_channel -> int
val read16u : Stdlib.in_channel -> int
val read32u : Stdlib.in_channel -> int
val read64u : Stdlib.in_channel -> int
val readblock : Stdlib.in_channel -> Stdlib.Obj.t -> int -> int -> unit
val readblock_rev : Stdlib.in_channel -> Stdlib.Obj.t -> int -> int -> unit
end