summaryrefslogtreecommitdiff
path: root/examples/phrasebook/WordsFre.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/phrasebook/WordsFre.gf')
-rw-r--r--examples/phrasebook/WordsFre.gf5
1 files changed, 3 insertions, 2 deletions
diff --git a/examples/phrasebook/WordsFre.gf b/examples/phrasebook/WordsFre.gf
index 14a87f1e6..dd4508552 100644
--- a/examples/phrasebook/WordsFre.gf
+++ b/examples/phrasebook/WordsFre.gf
@@ -124,8 +124,9 @@ lin
-- Building phrases from strings is complicated: the solution is to use
-- mkText : Text -> Text -> Text ;
- PSeeYou d = mkText (lin Text (ss ("on se verra"))) (mkPhrase (mkUtt d)) ;
- PSeeYouPlace p d =
+ PSeeYouPlace p = mkText (lin Text (ss ("on se verra"))) (mkPhrase (mkUtt p.at)) ;
+ PSeeYouDate d = mkText (lin Text (ss ("on se verra"))) (mkPhrase (mkUtt d)) ;
+ PSeeYouPlaceDate p d =
mkText (lin Text (ss ("on se verra")))
(mkText (mkPhrase (mkUtt p.at)) (mkPhrase (mkUtt d))) ;