diff options
Diffstat (limited to 'examples/phrasebook/WordsSwe.gf')
| -rw-r--r-- | examples/phrasebook/WordsSwe.gf | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/phrasebook/WordsSwe.gf b/examples/phrasebook/WordsSwe.gf index 4db68c341..2171faf86 100644 --- a/examples/phrasebook/WordsSwe.gf +++ b/examples/phrasebook/WordsSwe.gf @@ -64,7 +64,7 @@ concrete WordsSwe of Words = SentencesSwe ** -- actions - AHasName p name = mkCl (nameOf p) name ; + AHasName p name = mkCl p.name (mkV2 (mkV "heter")) name ; AHungry p = mkCl p.name (mkA "hungrig") ; AIll p = mkCl p.name (mkA "sjuk") ; AKnow p = mkCl p.name (mkV "veta" "vet" "vet" "visste" "vetat" "visst") ; @@ -81,7 +81,7 @@ concrete WordsSwe of Words = SentencesSwe ** -- miscellaneous - QWhatName p = mkQS (mkQCl whatSg_IP (mkVP (nameOf p))) ; + QWhatName p = mkQS (mkQCl whatSg_IP p.name (mkV2 (mkV "heter"))) ; PropOpen p = mkCl p.name open_A ; PropClosed p = mkCl p.name closed_A ; |