GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 03:32:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

restricted inheritance in gfcc abstract fixed

Browse Source
This commit is contained in:
aarne
2007-11-08 21:34:44 +00:00
parent fc457ce795
commit f2df8bb144
1 changed files with 1 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/GF/Devel/GrammarToGFCC.hs
View File

@@ -199,10 +199,7 @@ reorder abs cg = M.MGrammar $
where where
mos = M.allModMod cg mos = M.allModMod cg
adefs = sorted2tree $ sortIds $ adefs = sorted2tree $ sortIds $
predefADefs ++ predefADefs ++ Look.allOrigInfos cg abs
[finfo |
(i,mo) <- M.allModMod cg, M.isModAbs mo,
finfo <- tree2list (M.jments mo)]
predefADefs = predefADefs =
[(IC c, AbsCat (Yes []) Nope) | c <- ["Float","Int","String"]] [(IC c, AbsCat (Yes []) Nope) | c <- ["Float","Int","String"]]
aflags = nubFlags $ aflags = nubFlags $