12 lines
249 B
Erlang
12 lines
249 B
Erlang
%% number
|
|
[0-9]+ : {token,
|
|
{ number,
|
|
TokenLine,
|
|
list_to_integer(TokenChars)
|
|
}
|
|
}.
|
|
%% left paren
|
|
\( : {token, {'(', TokenLine}}.
|
|
%% ... other tokens
|
|
%% skip white spaces
|
|
[\s\n\r\t]+ : skip_token.
|