diff options
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/hsc2hs/Main.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/utils/hsc2hs/Main.hs b/utils/hsc2hs/Main.hs index 978cc4beb7..e541e21d14 100644 --- a/utils/hsc2hs/Main.hs +++ b/utils/hsc2hs/Main.hs @@ -575,8 +575,7 @@ output flags name toks = do -- (called hsc2hs-inplace, generated from hsc2hs.sh) compiler <- case [c | Compiler c <- flags] of [] -> locateGhc "ghc" - [c] -> return c - _ -> onlyOne "compiler" + cs -> return (last cs) linker <- case [l | Linker l <- flags] of [] -> locateGhc compiler |