diff options
| author | msozeau | 2008-04-05 21:32:11 +0000 |
|---|---|---|
| committer | msozeau | 2008-04-05 21:32:11 +0000 |
| commit | 4a38c36307bf6333f6c26590820dfd82d643edf2 (patch) | |
| tree | 67902e5edfa95fc9b4025488545b07b876ef1fca /parsing | |
| parent | 76cbb3b74c5611fb8c274d4c911d5c83f85351a7 (diff) | |
Minor fixes:
- Allow unicode superscripts characters.
- Put Program notations in scopes.
- Correct priority semantics in typeclasses eauto.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10759 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/lexer.ml4 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/parsing/lexer.ml4 b/parsing/lexer.ml4 index 3354971f9b..800dc6a038 100644 --- a/parsing/lexer.ml4 +++ b/parsing/lexer.ml4 @@ -189,7 +189,8 @@ let lookup_utf8_tail c cs = | x when 0x2058 <= x & x <= 0x205E -> Utf8Symbol (* Invisible mathematical operators *) | x when 0x2061 <= x & x <= 0x2063 -> Utf8Symbol - + (* utf-8 superscript U2070-207C *) + | x when 0x2070 <= x & x <= 0x207C -> Utf8Symbol (* utf-8 subscript U2080-2089 *) | x when 0x2080 <= x & x <= 0x2089 -> Utf8IdentPart n (* utf-8 letter-like U2100-214F *) |