From: simonmar <unknown>
Date: Fri, 12 Sep 2003 09:46:37 +0000 (+0000)
Subject: [project @ 2003-09-12 09:46:37 by simonmar]
X-Git-Tag: Approx_11550_changesets_converted~461
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=321009129c53e5dadf679603da66dbaadf5010be;p=ghc-hetmet.git

[project @ 2003-09-12 09:46:37 by simonmar]
Ignore lines containing

  #pragma .*

generated by GCC 3.3's CPP on MacOS X, apparently.
---

diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x
index 1159f63..aa5067f 100644
--- a/ghc/compiler/parser/Lexer.x
+++ b/ghc/compiler/parser/Lexer.x
@@ -123,6 +123,7 @@ $white_no_nl+ 				;
 <bol> {
   \n					;
   ^\# (line)?				{ begin line_prag1 }
+  ^\# pragma .* \n			; -- GCC 3.3 CPP generated, apparently
   ()					{ do_bol }
 }