comment_token : lexcode ref
# comment_token := Ident "--";; val it : unit = ()
# `let wordsize = 32 -- may change to 64 later
and radix = 2 -- only care about binary
in radix EXP wordsize`;;
val it : term = `let wordsize = 32 and radix = 2 in radix EXP wordsize`