type sign = NumTok.sign = | SPlus| SMinus
val sign_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> signval sexp_of_sign : sign -> Ppx_sexp_conv_lib.Sexp.ttype num_class = NumTok.num_class = | CDec| CHex
val num_class_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> num_classval sexp_of_num_class : num_class -> Ppx_sexp_conv_lib.Sexp.ttype 'a exp = 'a NumTok.exp = | EDec of 'a| EBin of 'a
val exp_of_sexp :
'a. (Ppx_sexp_conv_lib.Sexp.t -> 'a) ->
Ppx_sexp_conv_lib.Sexp.t ->
'a expval sexp_of_exp :
'a. ('a -> Ppx_sexp_conv_lib.Sexp.t) ->
'a exp ->
Ppx_sexp_conv_lib.Sexp.t