sig
type t =
Ast_403.Parsetree.constant =
Pconst_integer of string * char option
| Pconst_char of char
| Pconst_string of string * string option
| Pconst_float of string * char option
val of_constant :
Ast_403.Parsetree.constant -> Ast_convenience_403.Constant.t
val to_constant :
Ast_convenience_403.Constant.t -> Ast_403.Parsetree.constant
end