diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-08-16 09:41:00 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-08-16 09:41:00 +0000 |
| commit | 1f342b2c25a5b3026de101028a56b3ff17e04e5b (patch) | |
| tree | 02ab8398695564ed6e019a0c028e4e068c952cc2 /doc/tutorial/resource/TestIta.gf | |
| parent | 69129be4b25c6d764df449dfdb2e15cf4b4ebd0a (diff) | |
prepared mini syntax example
Diffstat (limited to 'doc/tutorial/resource/TestIta.gf')
| -rw-r--r-- | doc/tutorial/resource/TestIta.gf | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/doc/tutorial/resource/TestIta.gf b/doc/tutorial/resource/TestIta.gf new file mode 100644 index 000000000..d58b258cd --- /dev/null +++ b/doc/tutorial/resource/TestIta.gf @@ -0,0 +1,23 @@ +--# -path=.:resource:prelude + +concrete TestIta of Test = SyntaxIta ** open Prelude, MorphoIta in { + + lin + Wine = regNoun "vino" ; + Cheese = regNoun "formaggio" ; + Fish = regNoun "pesce" ; + Pizza = regNoun "pizza" ; + Waiter = regNoun "cameriere" ; + Customer = regNoun "cliente" ; + Fresh = regAdjective "fresco" ; + Warm = regAdjective "caldo" ; + Italian = regAdjective "italiano" ; + Expensive = regAdjective "caro" ; + Delicious = regAdjective "delizioso" ; + Boring = regAdjective "noioso" ; + Stink = regVerb "puzzare" ; + Eat = regVerb "mangiare" ** {c = []} ; + Love = regVerb "amare" ** {c = []} ; + Talk = regVerb "parlare" ** {c = "di"} ; +} + |