summaryrefslogtreecommitdiff
path: root/grammars/multiple/UserCityEng.gf
diff options
context:
space:
mode:
authoraarne <unknown>2004-09-15 14:36:27 +0000
committeraarne <unknown>2004-09-15 14:36:27 +0000
commita25ee154e760a424ef4aef46a6e3d6fdf1079cf1 (patch)
tree50315c6fe03325fca09e1a922172de111faa7639 /grammars/multiple/UserCityEng.gf
parent7697b222d0b7053e4b955a6ab9ba2ad0d6c9c512 (diff)
introducing multiple inheritance
Diffstat (limited to 'grammars/multiple/UserCityEng.gf')
-rw-r--r--grammars/multiple/UserCityEng.gf6
1 files changed, 6 insertions, 0 deletions
diff --git a/grammars/multiple/UserCityEng.gf b/grammars/multiple/UserCityEng.gf
new file mode 100644
index 000000000..a30b81510
--- /dev/null
+++ b/grammars/multiple/UserCityEng.gf
@@ -0,0 +1,6 @@
+concrete UserCityEng of UserCity = UserEng, CityEng ** open Prelude in
+ {
+ lin
+ QDistance x y = ss (["what is the distance from"] ++ x.s ++ "to" ++ y.s) ;
+ }
+