diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/elixir_math_parser.yrl | 4 | ||||
| -rw-r--r-- | src/elixir_math_parser_lexer.xrl | 2 |
2 files changed, 4 insertions, 2 deletions
diff --git a/src/elixir_math_parser.yrl b/src/elixir_math_parser.yrl index f8de916..4e8e9e9 100644 --- a/src/elixir_math_parser.yrl +++ b/src/elixir_math_parser.yrl @@ -54,4 +54,6 @@ expr -> '-' exprs : {sub_op, {int, 0, 0}, '$2'}. Erlang code. -unwrap({int, Line, Value}) -> {int, Line, list_to_integer(Value)}. +unwrap({int, Line, Value}) -> + Match = fun(X) -> not(X == 95) end, + {int, Line, list_to_integer(lists:filter(Match, Value))}. diff --git a/src/elixir_math_parser_lexer.xrl b/src/elixir_math_parser_lexer.xrl index c29416e..c418c02 100644 --- a/src/elixir_math_parser_lexer.xrl +++ b/src/elixir_math_parser_lexer.xrl @@ -1,5 +1,5 @@ Definitions. -INT = [0-9]+ +INT = [0-9_]+ NAME = [a-zA-Z_][a-zA-Z0-9_]* WHITESPACE = [\s\t\r] COMMENT = #[^\n]*\n? |