[project @ 1996-04-05 08:26:04 by partain]

[ghc-hetmet.git] / ghc / compiler / parser / hslexer.flex

diff --git a/ghc/compiler/parser/hslexer.flex b/ghc/compiler/parser/hslexer.flex
index 5cfe16d..892d2f9 100644 (file)
--- a/ghc/compiler/parser/hslexer.flex
+++ b/ghc/compiler/parser/hslexer.flex
@@ -50,13 +50,13 @@ static unsigned char CharTable[NCHARS] = {
 /* dle */      0,      0,      0,      0,      0,      0,      0,      0,
 /* can */      0,      0,      0,      0,      0,      0,      0,      0,
 /* sp  */      _S,     0,      0,      0,      0,      0,      0,      0,
-/* '(' */       _C,    0,      0,      0,      0,      0,      0,      0,      /* ( */
+/* '(' */       _C,    0,      0,      0,      0,      0,      0,      0,
 /* '0' */      _D|_H|_O,_D|_H|_O,_D|_H|_O,_D|_H|_O,_D|_H|_O,_D|_H|_O,_D|_H|_O,_D|_H|_O,
 /* '8' */      _D|_H,  _D|_H,  _C,     0,      0,      0,      0,      0,
 /* '@' */      0,      _H|_C,  _H|_C,  _H|_C,  _H|_C,  _H|_C,  _H|_C,  _C,
 /* 'H' */      _C,     _C,     _C,     _C,     _C,     _C,     _C,     _C,
 /* 'P' */      _C,     _C,     _C,     _C,     _C,     _C,     _C,     _C,
-/* 'X' */      _C,     _C,     _C,     _C,     0,      0,      0,      0,      /* [ */
+/* 'X' */      _C,     _C,     _C,     _C,     0,      0,      0,      0,
 /* '`' */      0,      _H,     _H,     _H,     _H,     _H,     _H,     0,
 /* 'h' */      0,      0,      0,      0,      0,      0,      0,      0,
 /* 'p' */      0,      0,      0,      0,      0,      0,      0,      0,