summaryrefslogtreecommitdiff
path: root/gf-book/examples/chapter3/DiscontEng.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2011-01-11 15:46:43 +0000
committeraarne <aarne@chalmers.se>2011-01-11 15:46:43 +0000
commite7439d65b0e153434d3acc07df6e2a0972ee79ca (patch)
tree36716eec18256eeb600b4a552d9cc80f8ad7f16f /gf-book/examples/chapter3/DiscontEng.gf
parent276327f7f264e770478a6d8c6e683266505b0a55 (diff)
gf-book web page index and toc
Diffstat (limited to 'gf-book/examples/chapter3/DiscontEng.gf')
-rw-r--r--gf-book/examples/chapter3/DiscontEng.gf21
1 files changed, 21 insertions, 0 deletions
diff --git a/gf-book/examples/chapter3/DiscontEng.gf b/gf-book/examples/chapter3/DiscontEng.gf
new file mode 100644
index 000000000..93d70a02c
--- /dev/null
+++ b/gf-book/examples/chapter3/DiscontEng.gf
@@ -0,0 +1,21 @@
+concrete DiscontEng of Discont = {
+ param
+ SForm = SDecl | SQuest ;
+ lincat
+ S, NP, AP = Str ;
+ Cl = SForm => Str ;
+ VP = {verb,comp : Str} ;
+ lin
+ DeclCl cl = cl ! SDecl ;
+ QuestCl cl = cl ! SQuest ;
+ PredVP np vp = table {
+ SDecl => np ++ vp.verb ++ vp.comp ;
+ SQuest => vp.verb ++ np ++ vp.comp
+ } ;
+ CompAP ap = {
+ verb = "is" ;
+ comp = ap
+ } ;
+ John = "John" ;
+ Old = "old" ;
+}