From 7d83d90e51573d92071e4f84c33f0cd2a1ab2c36 Mon Sep 17 00:00:00 2001
From: bjorn <bjorn@bringert.net>
Date: Tue, 19 Aug 2008 14:35:45 +0000
Subject: Use overloaded API in peace keeping grammar. Still not compiling, "no
 instance of mkS for Cl among ... Cl ... ?"

---
 examples/peacekeeping/PeaceCatI.gf | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'examples/peacekeeping/PeaceCatI.gf')

diff --git a/examples/peacekeeping/PeaceCatI.gf b/examples/peacekeeping/PeaceCatI.gf
index 312bc1b1e..67db1351d 100644
--- a/examples/peacekeeping/PeaceCatI.gf
+++ b/examples/peacekeeping/PeaceCatI.gf
@@ -1,12 +1,20 @@
 incomplete concrete PeaceCatI of PeaceCat = 
-  Cat ** open Lang, PeaceRes, Prelude in {
+  open Lang, PeaceRes, Prelude in {
 
   lincat
+    N = N; A = A; V = V; V2 = V2; V3 = V3; Pron = Pron;
+    IP = IP; IAdv = IAdv;
+    Adv = Adv; NP = NP; CN = CN; Imp = Imp; Det = Det; Num = Num;
+
     MassN = N ;
     Phrase = { s : Str; p : Punct } ;
     PhraseWritten = { s : Str } ;
     PhraseSpoken = { s : Str } ;
 
+    Sent = {s : SForm => Str} ; 
+    Quest = { s : Str } ;
+    MassCN = CN ;
+
   lin 
     Written x = mkWritten x.s x.p ;
     Spoken x = { s = x.s } ;
-- 
cgit v1.2.3