Commit 41fc1d15 authored by simonmar's avatar simonmar
Browse files

[project @ 2004-05-27 16:13:59 by simonmar]

Change the 'can't load package' message from a panic to an ordinary
error.
parent e663fcfa
......@@ -790,7 +790,7 @@ linkPackage dflags pkg
maybePutStr dflags "linking ... "
ok <- resolveObjs
if succeeded ok then maybePutStrLn dflags "done."
else panic ("can't load package `" ++ name pkg ++ "'")
else throwDyn (InstallationError ("unable to load package `" ++ name pkg ++ "'"))
load_dyn dirs dll = do r <- loadDynamic dirs dll
case r of
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment