sig
type constant =
Asttypes.constant =
Const_int of int
| Const_char of char
| Const_string of string * string option
| Const_float of string
| Const_int32 of int32
| Const_int64 of int64
| Const_nativeint of nativeint
type rec_flag = Asttypes.rec_flag = Nonrecursive | Recursive
type direction_flag = Asttypes.direction_flag = Upto | Downto
type private_flag = Asttypes.private_flag = Private | Public
type mutable_flag = Asttypes.mutable_flag = Immutable | Mutable
type virtual_flag = Asttypes.virtual_flag = Virtual | Concrete
type override_flag = Asttypes.override_flag = Override | Fresh
type closed_flag = Asttypes.closed_flag = Closed | Open
type label = string
type arg_label =
Asttypes.arg_label =
Nolabel
| Labelled of string
| Optional of string
type 'a loc = 'a Location.loc = { txt : 'a; loc : Location.t; }
type variance = Asttypes.variance = Covariant | Contravariant | Invariant
end