summaryrefslogtreecommitdiff
path: root/gf-book/examples/chapter2/TicketEng.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/chapter2/TicketEng.gf
parent276327f7f264e770478a6d8c6e683266505b0a55 (diff)
gf-book web page index and toc
Diffstat (limited to 'gf-book/examples/chapter2/TicketEng.gf')
-rw-r--r--gf-book/examples/chapter2/TicketEng.gf19
1 files changed, 19 insertions, 0 deletions
diff --git a/gf-book/examples/chapter2/TicketEng.gf b/gf-book/examples/chapter2/TicketEng.gf
new file mode 100644
index 000000000..54e44741d
--- /dev/null
+++ b/gf-book/examples/chapter2/TicketEng.gf
@@ -0,0 +1,19 @@
+concrete TicketEng of Ticket = {
+
+lincat
+ Request, Station = Str ;
+lin
+ Ticket X Y =
+ ((("I" ++ ("would like" | "want") ++ "to get" |
+ ("may" | "can") ++ "I get" |
+ "can you give me" |
+ []) ++
+ "a ticket") |
+ []) ++
+ "from" ++ X ++ "to" ++ Y ++
+ ("please" | []) ;
+
+ Hamburg = "Hamburg" ;
+ Paris = "Paris" ;
+
+}