\
\(\*
\*\)
\b[-]?[0-9][0-9_]*[lL]?\b
\b[-]?0[xX][0-9A-Fa-f][0-9A-Fa-f_]*[lL]?\b
\b[-]?0[oO][0-7][0-7_]*[lL]?\b
\b[-]?0[bB][01][01_]*[lL]?\b
\b[-]?[0-9][0-9_]*(\.[0-9_]*)?([Ee][+-]?[0-9][0-9_]*)?
'
'
"
"
true
false
\b[A-Z][A-Za-z0-9_']*
[~?][a-z][A-Za-z0-9_']*
asm
break
case
continue
default
do
else
for
fortran
goto
if
return
sizeof
switch
while
and
as
assert
asr
begin
class
constraint
do
done
downto
else
end
exception
external
for
fun
function
functor
if
in
include
inherit
initializer
land
lazy
let
lor
lsl
lsr
lxor
match
method
mod
module
mutable
new
object
of
open
or
private
rec
sig
struct
then
to
try
type
val
virtual
when
while
with