diff options
Diffstat (limited to 'utils/hsc2hs/Main.hs')
| -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 e541e21d14..b291fd2abb 100644 --- a/utils/hsc2hs/Main.hs +++ b/utils/hsc2hs/Main.hs @@ -579,8 +579,7 @@ output flags name toks = do linker <- case [l | Linker l <- flags] of [] -> locateGhc compiler - [l] -> return l - _ -> onlyOne "linker" + ls -> return (last ls) writeFile cProgName $ concatMap outFlagHeaderCProg flags++ |