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 14d3ffa2f5
commit 1595e31a28
9 changed files with 11 additions and 22 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 {