diff options
author | 2014-01-19 15:09:23 +0100 | |
---|---|---|
committer | 2014-01-19 15:09:23 +0100 | |
commit | d2c5c5e616a6e118291fe1ce9965c731adac03a8 (patch) | |
tree | 7b000ad50dcc45ff1c63768a983cded1e23a07ca /parsing/lexer.ml4 | |
parent | db38bb4ad9aff74576d3b7f00028d48f0447d5bd (diff) |
Imported Upstream version 8.4pl3dfsgupstream/8.4pl3dfsg
Diffstat (limited to 'parsing/lexer.ml4')
-rw-r--r-- | parsing/lexer.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/lexer.ml4 b/parsing/lexer.ml4 index caea30b2..c8e67f4d 100644 --- a/parsing/lexer.ml4 +++ b/parsing/lexer.ml4 @@ -656,7 +656,7 @@ let strip s = let terminal s = let s = strip s in - if s = "" then failwith "empty token"; + if s = "" then Util.error "empty token."; if is_ident_not_keyword s then IDENT s else if is_number s then INT s else KEYWORD s |