diff options
| author | aarne <aarne@chalmers.se> | 2010-12-07 12:32:57 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-12-07 12:32:57 +0000 |
| commit | e8adb69e3de69dba87beb59279365ecadee22085 (patch) | |
| tree | c49cd5831dae69104c3b08c900165f4ccf391a5e /examples/phrasebook/GreetingsBul.gf | |
| parent | cb0a1ede4552120da60b92d92051319e7c64b3b1 (diff) | |
slight refactoring of Phrasebook, with less start words
Diffstat (limited to 'examples/phrasebook/GreetingsBul.gf')
| -rw-r--r-- | examples/phrasebook/GreetingsBul.gf | 49 |
1 files changed, 23 insertions, 26 deletions
diff --git a/examples/phrasebook/GreetingsBul.gf b/examples/phrasebook/GreetingsBul.gf index 8dc2a3cd5..69da7a4e7 100644 --- a/examples/phrasebook/GreetingsBul.gf +++ b/examples/phrasebook/GreetingsBul.gf @@ -1,33 +1,30 @@ -concrete GreetingsBul of Greetings = open Prelude in { +concrete GreetingsBul of Greetings = SentencesBul [Greeting,mkGreeting] ** open Prelude in { flags coding=utf8; -lincat - Greeting = SS ; - lin - GBye = ss "чао" ; - GCheers = ss "наздраве" ; - GDamn = ss "по дяволите" ; - GExcuse, GExcusePol = ss "извинете" ; - GGoodDay = ss "добър ден" ; - GGoodEvening = ss "добра вечер" ; - GGoodMorning = ss "добро утро" ; - GGoodNight = ss "лека нощ" ; - GGoodbye = ss "довиждане" ; - GHello = ss "здравей" ; - GHelp = ss "помощ" ; - GHowAreYou = ss "как си" ; - GLookOut = ss "погледни" ; - GNiceToMeetYou = ss "радвам се да се видим" ; - GPleaseGive, GPleaseGivePol = ss "моля" ; - GSeeYouSoon = ss "до скоро" ; - GSorry, GSorryPol = ss "извинете" ; - GThanks = ss "благодаря ти" ; - GTheCheck = ss "сметката" ; - GCongratulations = ss "поздравления"; - GHappyBirthday = ss "честит рожден ден" ; - GGoodLuck = ss "успех" ; + GBye = mkGreeting "чао" ; + GCheers = mkGreeting "наздраве" ; + GDamn = mkGreeting "по дяволите" ; + GExcuse, GExcusePol = mkGreeting "извинете" ; + GGoodDay = mkGreeting "добър ден" ; + GGoodEvening = mkGreeting "добра вечер" ; + GGoodMorning = mkGreeting "добро утро" ; + GGoodNight = mkGreeting "лека нощ" ; + GGoodbye = mkGreeting "довиждане" ; + GHello = mkGreeting "здравей" ; + GHelp = mkGreeting "помощ" ; + GHowAreYou = mkGreeting "как си" ; + GLookOut = mkGreeting "погледни" ; + GNiceToMeetYou = mkGreeting "радвам се да се видим" ; + GPleaseGive, GPleaseGivePol = mkGreeting "моля" ; + GSeeYouSoon = mkGreeting "до скоро" ; + GSorry, GSorryPol = mkGreeting "извинете" ; + GThanks = mkGreeting "благодаря ти" ; + GTheCheck = mkGreeting "сметката" ; + GCongratulations = mkGreeting "поздравления"; + GHappyBirthday = mkGreeting "честит рожден ден" ; + GGoodLuck = mkGreeting "успех" ; } |