From 02a80d68aaf2efe20973be2e827a581beb0d1624 Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 20 Aug 2008 07:14:20 +0000 Subject: peace grammars patched to work with the new API --- examples/peacekeeping/PeaceLexCommonI.gf | 22 ++++++++++------------ 1 file changed, 10 insertions(+), 12 deletions(-) (limited to 'examples/peacekeeping/PeaceLexCommonI.gf') diff --git a/examples/peacekeeping/PeaceLexCommonI.gf b/examples/peacekeeping/PeaceLexCommonI.gf index b76949cb9..21dcac350 100644 --- a/examples/peacekeeping/PeaceLexCommonI.gf +++ b/examples/peacekeeping/PeaceLexCommonI.gf @@ -1,4 +1,5 @@ -incomplete concrete PeaceLexCommonI of PeaceLexCommon = PeaceCatI ** open Lang in { +incomplete concrete PeaceLexCommonI of PeaceLexCommon = PeaceCatI ** + open Lang, Constructors in { lin @@ -15,20 +16,17 @@ incomplete concrete PeaceLexCommonI of PeaceLexCommon = PeaceCatI ** open Lang i whatPl_IP = whatPl_IP ; whatSg_IP = whatSg_IP ; - this_NP = this_NP ; - that_NP = that_NP ; + this_NP = mkNP this_Quant ; + that_NP = mkNP that_Quant ; -- Determiners - aSg_Det = DetSg (SgQuant IndefArt) NoOrd; - aPl_Det = DetPl (PlQuant IndefArt) NoNum NoOrd; - theSg_Det = DetSg (SgQuant DefArt) NoOrd ; - thePl_Det = DetPl (PlQuant DefArt) NoNum NoOrd ; - that_Det = DetSg (SgQuant that_Quant) NoOrd ; - those_Det = DetPl (PlQuant that_Quant) NoNum NoOrd ; - this_Det = DetSg (SgQuant this_Quant) NoOrd ; - these_Det = DetPl (PlQuant this_Quant) NoNum NoOrd ; - + a_Art = IndefArt ; + the_Art = DefArt ; + that_Det = mkDet that_Quant ; + those_Det = mkDet that_Quant plNum ; + this_Det = mkDet this_Quant ; + these_Det = mkDet this_Quant plNum ; -- Adverbs here_Adv = here_Adv; -- cgit v1.2.3