diff options
| author | aarne <aarne@chalmers.se> | 2010-04-06 15:45:16 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-04-06 15:45:16 +0000 |
| commit | a66d2186fe0df7e72d2ebd7fc7c70629fe555ec4 (patch) | |
| tree | 2ca36803340e215c997e7cd332e81aaaca577861 /examples/phrasebook/WordsSwe.gf | |
| parent | 114cdd78d35b74b1332f528adf4bbb4ef4adfaef (diff) | |
comments in phrasebook abstract syntax
Diffstat (limited to 'examples/phrasebook/WordsSwe.gf')
| -rw-r--r-- | examples/phrasebook/WordsSwe.gf | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/examples/phrasebook/WordsSwe.gf b/examples/phrasebook/WordsSwe.gf index 2a0a3478a..e70deeec0 100644 --- a/examples/phrasebook/WordsSwe.gf +++ b/examples/phrasebook/WordsSwe.gf @@ -53,10 +53,8 @@ concrete WordsSwe of Words = SentencesSwe ** AWant p obj = mkCl p.name want_VV (mkVP have_V2 obj) ; ALike p item = mkCl p.name (mkV2 (mkV "tycker") (mkPrep "om")) item ; - AHave p kind = mkCl p.name have_V2 (mkNP kind) ; ASpeak p lang = mkCl p.name (mkV2 (mkV "tala")) lang ; ALove p q = mkCl p.name (mkV2 (mkV "älska")) q.name ; - ACitizen p n = mkCl p.name n ; AHungry p = mkCl p.name (mkA "hungrig") ; AThirsty p = mkCl p.name (mkA "törstig") ; ATired p = mkCl p.name (mkA "trött") ; @@ -66,7 +64,6 @@ concrete WordsSwe of Words = SentencesSwe ** AKnow p = mkCl p.name (mkV "veta" "vet" "vet" "visste" "vetat" "visst") ; ---- IrregSwe.veta_V gives "missing" AWantGo p place = mkCl p.name want_VV (mkVP (mkVP IrregSwe.gå_V) place.to) ; - ABePlace p place = mkCl p.name place.at ; AHasName p name = mkCl (nameOf p) name ; ALive p co = mkCl p.name (mkVP (mkVP (mkV "bo")) (SyntaxSwe.mkAdv in_Prep co)) ; |