Commit 99efa3bc authored by simonmar's avatar simonmar
Browse files

[project @ 2003-01-09 11:22:19 by simonmar]

Fix the stage2 build.
parent 78dddbd2
......@@ -262,8 +262,8 @@ getLinkDeps hpt pit mods
-- so use the Finder to get a ModLocation...
do { mb_stuff <- findModule mod_name ;
case mb_stuff of {
Nothing -> no_obj mod_name ;
Just (_, loc) -> do {
Left _ -> no_obj mod_name ;
Right (_, loc) -> do {
-- ...and then find the linkable for it
mb_lnk <- findLinkable mod_name loc ;
......
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