From 16c7420410a90ab9559902f0f61f40318aed0bb2 Mon Sep 17 00:00:00 2001 From: aarne Date: Fri, 20 Nov 2009 10:56:28 +0000 Subject: [PATCH] adding an mkQCl case for CompIP --- lib/src/api/Constructors.gf | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lib/src/api/Constructors.gf b/lib/src/api/Constructors.gf index 3231e1863..6dfe4728f 100644 --- a/lib/src/api/Constructors.gf +++ b/lib/src/api/Constructors.gf @@ -1349,6 +1349,8 @@ incomplete resource Constructors = open Grammar in { = \p,ip -> QuestIAdv (PrepIP p ip) ; --# notminimal mkQCl : IAdv -> NP -> QCl -- where is John --# 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 = ExistIP --# notminimal