ghc-core 0.5.1 → 0.5.2

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• ghc-core.cabal +1/−1
• ghc-core.hs +1/−1

@@ -1,5 +1,5 @@ name:           ghc-core-version:        0.5.1+version:        0.5.2 license:        BSD3 license-file:   LICENSE author:         Don Stewart

@@ -133,7 +133,7 @@                         x <- readProcess "sh" ["-c","ls /tmp/ghc*/*.s | head -1"] []                         case x of                           Left _ -> return (strs', Nothing)-                          Right s -> if "-fvia-C" `elem` args+                          Right s -> if "-fvia-C" `elem` args || "-fllvm" `elem` args                                        then do asm <- readFile (init s)                                                return ((strs' ++ asm), Just $ takeDirectory s)                                        else return (strs', Just $ takeDirectory s)