*.sml;*.sig
(*
*)
\b([~]?[0-9]+)
\b(0x[~]?[0-9A-Fa-f]+)
\b(0w[0-9]+)
\b(0wx[0-9A-Fa-f]+)
\b([~]?[0-9]+).([0-9]+)([Ee]?([~]?[0-9]+)?)
\b[A-Z][0-9A-Za-z_']*\b
\\.
#"
"
"
"
\%{integer}
\%{integer-hex}
\%{word}
\%{word-hex}
\%{real}
true
false
\%{upper-case}
and
abstype
as
case
datatype
else
end
eqtype
exception
do
fn
fun
functor
funsig
handle
if
in
include
infix
infixr
lazy
let
local
nonfix
of
op
open
overload
raise
rec
sharing
sig
signature
struct
structure
then
type
val
where
while
with
withtype
orelse
andalso
unit
int
word
real
char
string
substring
exn
array
vector
ref
bool
option
order
list