diff options
| author | aarne <aarne@cs.chalmers.se> | 2006-11-08 15:14:47 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2006-11-08 15:14:47 +0000 |
| commit | 2fc97fa6fa30ac5dc031a588d26399fd38f42d9b (patch) | |
| tree | e3e550d6df056c6b39fb540e2991a01b8d83e56c /examples/godis-tram/Common/GodisUserEng.gf | |
| parent | c94d5a5f1e4a7e254d0ede33328e958250071c0c (diff) | |
took away godis_tram from darcs
Diffstat (limited to 'examples/godis-tram/Common/GodisUserEng.gf')
| -rw-r--r-- | examples/godis-tram/Common/GodisUserEng.gf | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/examples/godis-tram/Common/GodisUserEng.gf b/examples/godis-tram/Common/GodisUserEng.gf deleted file mode 100644 index 62e3b326c..000000000 --- a/examples/godis-tram/Common/GodisUserEng.gf +++ /dev/null @@ -1,32 +0,0 @@ ---# -path=.:prelude:resource-1.0/abstract:resource-1.0/common:resource-1.0/english - -concrete GodisUserEng of GodisUser = - GodisUserI with (GodisLang = GodisLangEng); - - --- open Prelude, GodisLangEng in { - --- lincat - --- S = SS; - --- Question = UserQuestion; --- Action = UserAction; --- Answer = UserAnswer; --- ShortAns = UserShortAns; - - --- lin - --- greet_S = ss ["hello"]; --- quit_S = variants{ ss ["goodbye"]; ss ["quit"] }; - --- no_S = ss ["no"]; --- yes_S = ss ["yes"]; - --- request_S x = x; --- answer_S x = x; --- ask_S x = x; --- shortans_S x = x; - --- } |
