1
0
forked from GitHub/gf-core

bug fix in with-modules and gr checker; factoring out cats to Common

This commit is contained in:
aarne
2006-05-23 22:20:00 +00:00
parent 00e7c3225e
commit 750ef2ca30
4 changed files with 7 additions and 7 deletions

View File

@@ -72,8 +72,8 @@ rebuildModule ms mo@(i,mi) = do
++ [oQualif i i | i <- map snd insts] ----
++ [oSimple i | i <- map snd insts] ----
---- ++ [oSimple ext] ---- to encode dependence
--- check if me is incomplete; --- why inherit all forced by syntax
return $ ModMod $ Module mt0 stat' fs (map inheritAll me) ops1 js
--- check if me is incomplete
return $ ModMod $ Module mt0 stat' fs me ops1 js
---- (mapTree (qualifInstanceInfo insts) js) -- not needed
_ -> return mi