summaryrefslogtreecommitdiff
path: root/mnv/runtime/syntax/testdir/input/leex.xrl
diff options
context:
space:
mode:
Diffstat (limited to 'mnv/runtime/syntax/testdir/input/leex.xrl')
-rw-r--r--mnv/runtime/syntax/testdir/input/leex.xrl28
1 files changed, 28 insertions, 0 deletions
diff --git a/mnv/runtime/syntax/testdir/input/leex.xrl b/mnv/runtime/syntax/testdir/input/leex.xrl
new file mode 100644
index 0000000000..c901b8b87d
--- /dev/null
+++ b/mnv/runtime/syntax/testdir/input/leex.xrl
@@ -0,0 +1,28 @@
+% Header comment
+%% Header comment
+%%% Header comment
+
+Definitions.
+floats = (\+|-)?[0-9]+\.[0-9]+((E|e)(\+|-)?[0-9]+)?
+D = [0-9]
+A = ({D}|_|@)
+WS = ([\000-\s]|%.*) % whitespace
+
+Rules.
+{D}+ :
+ % Comment
+ {token,{integer,TokenLine,list_to_integer(TokenChars)}}.
+{D}+\.{D}+((E|e)(\+|\-)?{D}+)? :
+ % Coment with period.
+ {token,{float,TokenLine,list_to_float(TokenChars)}}.
+{A} : ErlangCode. % comment
+{WS} : ErlangCode.
+:= :{token,{':=',TokenLine}}.
+
+Erlang code.
+
+-export([reserved_word/1]).
+
+%% reserved_word(Atom) -> Bool
+reserved_word('reserved') -> true;
+reserved_word(_) -> false.