no need to keep the list of constructors per category in .gfo

2010-02-16 09:34:02 +00:00
parent 61287f3925
commit 19b17dceb6
11 changed files with 25 additions and 29 deletions
--- a/src/compiler/GF/Grammar/Macros.hs
+++ b/src/compiler/GF/Grammar/Macros.hs
@@ -615,7 +615,7 @@ allDependencies ism b =
      CncCat pty _ _ -> [pty]
      CncFun _   pt _ -> [pt]  ---- (Maybe (Ident,(Context,Type))
      AbsFun pty _ ptr -> [pty] --- ptr is def, which can be mutual
-      AbsCat (Just co) _ -> [Just ty | (_,_,ty) <- co]
+      AbsCat (Just co) -> [Just ty | (_,_,ty) <- co]
      _              -> []

 topoSortJments :: SourceModule -> Err [(Ident,Info)]