Commit 6ffaaf83 authored by Simon Marlow's avatar Simon Marlow

fix warning

parent 36cef1ea
......@@ -301,8 +301,10 @@ link LinkBinary dflags batch_attempt_linking hpt
link LinkDynLib dflags batch_attempt_linking hpt
= link' dflags batch_attempt_linking hpt
#ifndef GHCI
-- warning suppression
link other _ _ _ = panicBadLink other
#endif
panicBadLink :: GhcLink -> a
panicBadLink other = panic ("link: GHC not built to link this way: " ++
......
Markdown is supported
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