use ghcError for error in command line

781145e5 · Clemens Fruhwirth · 7129b3c1 · 781145e5
Commit 781145e5 authored Oct 01, 2008 by Clemens Fruhwirth
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

compiler/main/DynFlags.hs compiler/main/DynFlags.hs +1 -1

No files found.
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -711,7 +711,7 @@ parseDynLibLoaderMode f d =
   ("wrapped", "")      -> d{ dynLibLoader = Wrapped Nothing }
   ("wrapped:", "hard") -> d{ dynLibLoader = Wrapped Nothing }
   ("wrapped:", flex)   -> d{ dynLibLoader = Wrapped (Just flex) }
-   (_,_)                -> error "Unknown dynlib loader"
+   _                    -> ghcError (CmdLineError ("Unknown dynlib loader: " ++ f))

 setDumpPrefixForce f d = d { dumpPrefixForce = f}