From 8d76268bfe3046dda8a07f3cb72c720242eebefe Mon Sep 17 00:00:00 2001 From: Norman Ramsey Date: Sun, 17 Sep 2006 00:23:53 +0000 Subject: [PATCH] tell GHC not to generate code (thanks Simon M) --- utils/ghctags/GhcTags.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/utils/ghctags/GhcTags.hs b/utils/ghctags/GhcTags.hs index 2b713fe..65f53f8 100644 --- a/utils/ghctags/GhcTags.hs +++ b/utils/ghctags/GhcTags.hs @@ -51,7 +51,8 @@ main = do session <- newSession JustTypecheck print "created a session" flags <- getSessionDynFlags session - (flags, _) <- parseDynamicFlags flags ghcArgs + (pflags, _) <- parseDynamicFlags flags ghcArgs + let flags = pflags { hscTarget = HscNothing } GHC.defaultCleanupHandler flags $ do flags <- initPackages flags setSessionDynFlags session flags -- 1.7.10.4