summaryrefslogtreecommitdiff
path: root/examples/peacekeeping/PeaceCatI.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/peacekeeping/PeaceCatI.gf')
-rw-r--r--examples/peacekeeping/PeaceCatI.gf10
1 files changed, 9 insertions, 1 deletions
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 } ;