msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

restored interface and instance - at least for a while

Browse Source
This commit is contained in:
aarne
2007-12-04 20:13:36 +00:00
parent 11982849b9
commit dc1c835563
4 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Devel/Grammar/GFtoSource.hs
View File

@@ -38,6 +38,8 @@ trModule (i,mo) = P.MModule compl typ body where
MTGrammar -> P.MGrammar i'
MTAbstract -> P.MAbstract i'
MTConcrete a -> P.MConcrete i' (tri a)
MTInterface -> P.MInterface i'
MTInstance a -> P.MInstance i' (tri a)
body = P.MBody
(trExtends (mextends mo))
(mkOpens (map trOpen (mopens mo)))