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

adding an mkQCl case for CompIP

Browse Source
This commit is contained in:
aarne
2009-11-20 10:56:28 +00:00
parent 37947ea289
commit 24babe83dd
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/api/Constructors.gf
View File

@@ -1349,6 +1349,8 @@ incomplete resource Constructors = open Grammar in {
= \p,ip -> QuestIAdv (PrepIP p ip) ; --# notminimal = \p,ip -> QuestIAdv (PrepIP p ip) ; --# notminimal
mkQCl : IAdv -> NP -> QCl -- where is John --# notminimal mkQCl : IAdv -> NP -> QCl -- where is John --# notminimal
= \a -> QuestIComp (CompIAdv a) ; --# notminimal = \a -> QuestIComp (CompIAdv a) ; --# notminimal
mkQCl : IP -> NP -> QCl -- who is John --# notminimal
= \a -> QuestIComp (CompIP a) ; --# notminimal
mkQCl : IP -> QCl -- which houses are there --# notminimal mkQCl : IP -> QCl -- which houses are there --# notminimal
= ExistIP --# notminimal = ExistIP --# notminimal