`sig
val mk :
?loc:Ast_helper.loc -> Parsetree.constant_desc -> Parsetree.constant
val char : ?loc:Ast_helper.loc -> char -> Parsetree.constant
val string :
?quotation_delimiter:string ->
?loc:Location.t -> string -> Parsetree.constant
val integer :
?loc:Ast_helper.loc -> ?suffix:char -> string -> Parsetree.constant
val int : ?loc:Ast_helper.loc -> ?suffix:char -> int -> Parsetree.constant
val int32 :
?loc:Ast_helper.loc -> ?suffix:char -> int32 -> Parsetree.constant
val int64 :
?loc:Ast_helper.loc -> ?suffix:char -> int64 -> Parsetree.constant
val nativeint :
?loc:Ast_helper.loc -> ?suffix:char -> nativeint -> Parsetree.constant
val float :
?loc:Ast_helper.loc -> ?suffix:char -> string -> Parsetree.constant
end`