msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

small fixes in Phrasebook, particularly PSeeYouPlaceDate

Browse Source
This commit is contained in:
aarne
2010-04-30 06:55:15 +00:00
parent e3c883fdb3
commit 7a4cb3c271
9 changed files with 34 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
examples/phrasebook/WordsIta.gf
View File

@@ -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 ("ci vediamo"))) (mkPhrase (mkUtt d)) ;
PSeeYouPlace p d =
PSeeYouDate d = mkText (lin Text (ss ("ci vediamo"))) (mkPhrase (mkUtt d)) ;
PSeeYouPlace p = mkText (lin Text (ss ("ci vediamo"))) (mkPhrase (mkUtt p.at)) ;
PSeeYouPlaceDate p d =
mkText (lin Text (ss ("ci vediamo")))
(mkText (mkPhrase (mkUtt p.at)) (mkPhrase (mkUtt d))) ;