1
0
forked from GitHub/gf-core

overload problem in Phrasebook fixed

This commit is contained in:
aarne
2012-06-22 09:02:13 +00:00
parent bd7a332b21
commit 236372c76e

View File

@@ -51,7 +51,7 @@ incomplete concrete SentencesI of Sentences = Numeral **
PSentence s = mkText s | lin Text (mkUtt s) ; -- optional '.'
PQuestion s = mkText s | lin Text (mkUtt s) ; -- optional '?'
PGreetingMale, PGreetingFemale = \g -> mkText (lin Phr g) exclMarkPunct | g ;
PGreetingMale, PGreetingFemale = \g -> mkText (lin Phr (ss g.s)) exclMarkPunct | g ;
-- PWord w = w ;