Lam_constanttype pointer_info = | None| Pt_constructor of {name: string,const: int,non_const: int,attributes: Melange_compiler_libs.Parsetree.attributes,}| Pt_assertfalse| Some(string);let string_of_pointer_info: pointer_info => option(string);type t = | Const_js_null| Const_js_undefined| Const_js_true| Const_js_false| Const_int of {i: int32,comment: pointer_info,}| Const_char(char)| Const_string of {}| Const_float(string)| Const_int64(int64)| Const_pointer(string)| Const_block(int, Lam_tag_info.t, list(t))| Const_float_array(list(string))| Const_some(t)| Const_module_alias;let lam_none: t;