inttest/erlc/src/first_xrl.xrl


1
2
3
4
5
6
7
8
9
10
11
12
13

Definitions.

D = [0-9]

Rules.

{D}+ :
  {token,{integer,TokenLine,list_to_integer(TokenChars)}}.

{D}+\.{D}+((E|e)(\+|\-)?{D}+)? :
  {token,{float,TokenLine,list_to_float(TokenChars)}}.

Erlang code.