also lookup in concrete in cc
This commit is contained in:
1 parent
d4e0caa053
commit
913067543d
1 file changed
+1
-1
@@ -397,7 +397,7 @@ greatestAbstract gr = case allAbstracts gr of
|
||||
|
||||
-- | all resource modules
|
||||
allResources :: MGrammar i a -> [i]
|
||||
allResources gr = [i | (i,ModMod m) <- modules gr, isModRes m]
|
||||
allResources gr = [i | (i,ModMod m) <- modules gr, isModRes m || isModCnc m]
|
||||
|
||||
-- | the greatest resource in dependency order
|
||||
greatestResource :: MGrammar i a -> Maybe i
|
||||
|
||||
Reference in new issue
Block a user