diff options
| author |  filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-05 14:29:44 +0000 |
|---|---|---|
| committer | filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-05 14:29:44 +0000 |
| commit | 763102437580da08cd96d06d05d99dc1a3eda1b1 (patch) | |
| tree | 7721eae697f75fd3769260ef8b8adc4c7b4197f7 /parsing/lexer.ml4 | |
| parent | def9cd8e725af360c5e528450ecd7660dcef7620 (diff) | |
mise en place de Correctness; vieille syntaxe Extraction viree de g_vernac.ml4
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1551 85f007b7-540e-0410-9357-904b9bb8a0f7
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 570e04711..3f1f95249 100644 --- a/parsing/lexer.ml4 +++ b/parsing/lexer.ml4 @@ -177,7 +177,7 @@ let get_buff len = String.sub !buff 0 len let rec ident len = parser | [< ' ('a'..'z' | 'A'..'Z' | '\192'..'\214' | '\216'..'\246' - |'\248'..'\255' | '0'..'9' | ''' | '_' as c); s >] -> + |'\248'..'\255' | '0'..'9' | ''' | '_' | '@' as c); s >] -> ident (store len c) s | [< >] -> len |