From 0e7025cb075a559094af36a4655fbf5212a08209 Mon Sep 17 00:00:00 2001 From: simonpj Date: Thu, 30 Nov 2000 15:44:44 +0000 Subject: [PATCH] [project @ 2000-11-30 15:44:44 by simonpj] wibble --- ghc/compiler/main/HscMain.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs index 603c993..eba1839 100644 --- a/ghc/compiler/main/HscMain.lhs +++ b/ghc/compiler/main/HscMain.lhs @@ -278,7 +278,7 @@ myParseModule dflags src_filename buf <- hGetStringBuffer True{-expand tabs-} src_filename let glaexts | dopt Opt_GlasgowExts dflags = 1# - | otherwise = 0# + | otherwise = 0# case parse buf PState{ bol = 0#, atbol = 1#, context = [], glasgow_exts = glaexts, -- 1.7.10.4