type constant = | ConstInt of Number.int_constant| ConstReal of Number.real_constant| ConstStr of stringval int_const_of_int : int -> constantval string_const : string -> constantval default_escape : escape_mapval unsupported_escape : escape_mapval escape : escape_map -> string -> stringval print_string_constant : escape_map -> Format.formatter -> string -> unitval print_string_def : Format.formatter -> string -> unitval print :
Number.number_support ->
escape_map ->
Format.formatter ->
constant ->
unitval print_def : Format.formatter -> constant -> unit