diff options
| author | ronny | 2001-07-25 18:40:14 +0000 |
|---|---|---|
| committer | ronny | 2001-07-25 18:40:14 +0000 |
| commit | 2624867bc94a6e2d1d74a9621b4c727a645b1930 (patch) | |
| tree | c67bf3e3da519d5b814bcc0001d257a83dc84001 /frontend/scanner.icl | |
| parent | bug fix parse_bug_special (diff) | |
bug fix scanning ['\\\'']
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@584 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/scanner.icl')
| -rw-r--r-- | frontend/scanner.icl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/frontend/scanner.icl b/frontend/scanner.icl index 29ea072..c2a0282 100644 --- a/frontend/scanner.icl +++ b/frontend/scanner.icl @@ -1038,6 +1038,7 @@ ScanEndOfChar n chars input # (eof, c, input) = ReadChar input | eof = (ErrorToken "End of file inside char denotation", input) | '\'' == c = (CharToken (revCharListToString (n + 1) [c:chars]), input) + | '\\' == c = ScanBSChar n chars input ScanCharList = ScanCharList (n+1) [c:chars] input // = (ErrorToken ScanErrCharErr, input) |