X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fdriver%2Fghc.lprl;h=94b1eda4ef1e1b037a7050b01540fb04ebcd22fc;hb=c6c43e43be1f913cd90cb7cb5bb87e90e6552691;hp=09f1bef6e4250dcfaa47211d3e5d9b5fb4366872;hpb=063eda14b18aadc138bc27eb460e1af93b09ca9b;p=ghc-hetmet.git

diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 09f1bef..94b1eda 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -408,7 +408,7 @@ require special handling.
 		    : ( "$TopPwd/$(CURRENT_DIR)/$(GHC_LIBSRC)/prelude"
 		      , "$TopPwd/$(CURRENT_DIR)/$(GHC_LIBSRC)/required" );
 
-$GhcVersionInfo  = 201; # ToDo: int ($(PROJECTVERSION) * 100);
+$GhcVersionInfo  = int ($(PROJECTVERSION) * 100);
 $Haskell1Version = 3; # i.e., Haskell 1.3
 @Cpp_define	 = ();
 
@@ -2519,7 +2519,7 @@ sub run_something {
 	    next if /from .*(stg|rts)defs\.h:/;
 	    next if /from ghc\d+.c:\d+:/;
 	    next if /from .*\.lc/;
-	    next if /from .*SMinternal\.lh/;
+	    next if /from .*SMinternal\.l?h/;
 	    next if /ANSI C does not support \`long long\'/;
 	    next if /warning:.*was declared \`extern\' and later \`static\'/;
 	    next if /warning: assignment discards \`const\' from pointer target type/;