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

@@ -58,7 +58,7 @@ data MGrammar i f a = MGrammar {modules :: [(i,ModInfo i f a)]}
data ModInfo i f a =
ModMainGrammar (MainGrammar i)
| ModMod (Module i f a)
| ModWith (ModuleType i) ModuleStatus i [i] [OpenSpec i]
| ModWith (ModuleType i) ModuleStatus i [(i,MInclude i)] [OpenSpec i]
deriving Show
data Module i f a = Module {