diff options
| author | aarne <aarne@chalmers.se> | 2010-04-30 06:55:15 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-04-30 06:55:15 +0000 |
| commit | 7a4cb3c2715c5dd61309b9bc0309142a44393c29 (patch) | |
| tree | 4bfb5e613c547fadd120235bd220dc771aea066f /examples/phrasebook/WordsGer.gf | |
| parent | e3c883fdb3859b4eef1f8e59737da171b4231f4e (diff) | |
small fixes in Phrasebook, particularly PSeeYouPlaceDate
Diffstat (limited to 'examples/phrasebook/WordsGer.gf')
| -rw-r--r-- | examples/phrasebook/WordsGer.gf | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/phrasebook/WordsGer.gf b/examples/phrasebook/WordsGer.gf index 1b41fdb69..c41524ba5 100644 --- a/examples/phrasebook/WordsGer.gf +++ b/examples/phrasebook/WordsGer.gf @@ -110,8 +110,8 @@ concrete WordsGer of Words = SentencesGer ** -- Building phrases from strings is complicated: the solution is to use -- mkText : Text -> Text -> Text ; --- PSeeYou d = mkText (lin Text (ss ("auf Wiedersehen"))) (mkPhrase (mkUtt d)) ; --- PSeeYouPlace p d = +-- PSeeYouDate d = mkText (lin Text (ss ("auf Wiedersehen"))) (mkPhrase (mkUtt d)) ; +-- PSeeYouPlaceDate p d = -- mkText (lin Text (ss ("auf Wiedersehen"))) -- (mkText (mkPhrase (mkUtt p.at)) (mkPhrase (mkUtt d))) ; |