Permalink
Browse files

Update naked Leex tokens/skip_tokens records to use the same format a…

…s the Leex that ships with parsetools
  • Loading branch information...
1 parent 38bb2af commit b77abc1bad745f952e95bd7fd82b6e87d0658412 Tony Arcieri committed Mar 4, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/compiler/reia_parse.yrl
@@ -886,7 +886,7 @@ extract_fragment(_Continuation, [$"|_], Line) ->
extract_fragment(Continuation, [$}|String], Line) ->
{more, Continuation2} = reia_scan:tokens(Continuation, [$}], Line),
case Continuation2 of
- {tokens, _, _, _, _, [{'}', _}|Tokens], _, _} ->
+ {tokens, _, _, _, _, _, [{'}', _}|Tokens], _, _} ->
case reia_parse:parse(lists:reverse(Tokens)) of
{ok, [Expr]} ->
{String, Expr};
@@ -896,7 +896,7 @@ extract_fragment(Continuation, [$}|String], Line) ->
Error ->
throw(Error)
end;
- {skip_tokens, _, _, _, _, {_, _, Error}, _, _} ->
+ {skip_tokens, _, _, _, _, _, {_, _, Error}, _, _} ->
throw({error, {Line, Error}})
end;
extract_fragment(Continuation, [Char|String], Line) ->

0 comments on commit b77abc1

Please sign in to comment.