[project @ 1999-06-02 15:14:57 by simonmar]

^M should be a space character.

diff --git a/ghc/compiler/parser/ctypes.c b/ghc/compiler/parser/ctypes.c
index 9a42f7e..cb09379 100644 (file)
--- a/ghc/compiler/parser/ctypes.c
+++ b/ghc/compiler/parser/ctypes.c
@@ -21,7 +21,7 @@ const unsigned char char_types[] =
     C_Any | C_Space,           /* \n */
     C_Any | C_Space,           /* \v */
     C_Any | C_Space,           /* \f */
-    0,                         /* \015 */
+    C_Any | C_Space,           /* ^M */
     0,                         /* \016 */
     0,                         /* \017 */
     0,                         /* \020 */