Commit 83e23c1a authored by Edward Z. Yang's avatar Edward Z. Yang
Browse files

Remove (now bogus) assert.


Signed-off-by: default avatarEdward Z. Yang <ezyang@cs.stanford.edu>
parent 5a8b055e
...@@ -162,9 +162,12 @@ load how_much = do ...@@ -162,9 +162,12 @@ load how_much = do
-- (see msDeps) -- (see msDeps)
let all_home_mods = [ms_mod_name s let all_home_mods = [ms_mod_name s
| s <- mod_graph, not (isBootSummary s)] | s <- mod_graph, not (isBootSummary s)]
bad_boot_mods = [s | s <- mod_graph, isBootSummary s, -- TODO: Figure out what the correct form of this assert is. It's violated
not (ms_mod_name s `elem` all_home_mods)] -- when you have HsBootMerge nodes in the graph: then you'll have hs-boot
ASSERT( null bad_boot_mods ) return () -- files without corresponding hs files.
-- bad_boot_mods = [s | s <- mod_graph, isBootSummary s,
-- not (ms_mod_name s `elem` all_home_mods)]
-- ASSERT( null bad_boot_mods ) return ()
-- check that the module given in HowMuch actually exists, otherwise -- check that the module given in HowMuch actually exists, otherwise
-- topSortModuleGraph will bomb later. -- topSortModuleGraph will bomb later.
......
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