Created
November 20, 2020 20:19
-
-
Save wz1000/897642cb68a9062b6e8f9dcf109af789 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
diff --git a/session-loader/Development/IDE/Session.hs b/session-loader/Development/IDE/Session.hs | |
index 9a68b8c5..25ac30da 100644 | |
--- a/session-loader/Development/IDE/Session.hs | |
+++ b/session-loader/Development/IDE/Session.hs | |
@@ -644,7 +644,7 @@ setOptions (ComponentOptions theOpts compRoot _) dflags = do | |
setLinkerOptions :: DynFlags -> DynFlags | |
setLinkerOptions df = df { | |
ghcLink = LinkInMemory | |
- , hscTarget = HscNothing | |
+ , hscTarget = HscAsm | |
, ghcMode = CompManager | |
} | |
diff --git a/src/Development/IDE/Core/Rules.hs b/src/Development/IDE/Core/Rules.hs | |
index 049c7c88..631bbb27 100644 | |
--- a/src/Development/IDE/Core/Rules.hs | |
+++ b/src/Development/IDE/Core/Rules.hs | |
@@ -984,7 +984,7 @@ getClientSettingsRule = defineEarlyCutOffNoFile $ \GetClientSettings -> do | |
getLinkableType :: NormalizedFilePath -> Action (Maybe LinkableType) | |
getLinkableType f = do | |
needsComp <- use_ NeedsCompilation f | |
- pure $ if needsComp then Just BCOLinkable else Nothing | |
+ pure $ if needsComp then Just ObjectLinkable else Nothing | |
needsCompilationRule :: Rules () | |
needsCompilationRule = defineEarlyCutoff $ \NeedsCompilation file -> do |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment