forked from GitHub/gf-core
34 lines
1.1 KiB
Plaintext
34 lines
1.1 KiB
Plaintext
--# -path=.:present
|
|
concrete GreetingsLav of Greetings = SentencesLav [Greeting, mkGreeting] **
|
|
open Prelude
|
|
in {
|
|
|
|
flags
|
|
coding = utf8 ;
|
|
|
|
lin
|
|
GBye = mkGreeting "atā" ;
|
|
GCheers = mkGreeting "priekā" ;
|
|
GDamn = mkGreeting "sasodīts" ;
|
|
GExcuse, GExcusePol = mkGreeting "atvainojiet" ;
|
|
GGoodDay = mkGreeting "labdien" ;
|
|
GGoodEvening = mkGreeting "labvakar" ;
|
|
GGoodMorning = mkGreeting "labrīt" ;
|
|
GGoodNight = mkGreeting "ar labunakti" ;
|
|
GGoodbye = mkGreeting "visu labu" ;
|
|
GHello = mkGreeting "sveiki" ;
|
|
GHelp = mkGreeting "palīdziet" ;
|
|
GHowAreYou = mkGreeting "kā klājas" ;
|
|
GLookOut = mkGreeting "uzmanīgi" ;
|
|
GNiceToMeetYou, GNiceToMeetYouPol = mkGreeting "prieks iepazīties" ;
|
|
GPleaseGive, GPleaseGivePol = mkGreeting "lūdzu" ;
|
|
GSeeYouSoon = mkGreeting "uz drīzu tikšanos" ;
|
|
GSorry, GSorryPol = mkGreeting "piedodiet" ;
|
|
GThanks = mkGreeting "paldies" ;
|
|
GTheCheck = mkGreeting "rēķins" ;
|
|
GCongratulations = mkGreeting "apsveicu" ;
|
|
GHappyBirthday = mkGreeting "daudz laimes dzimšanas dienā" ;
|
|
GGoodLuck = mkGreeting "veiksmīgi" ;
|
|
|
|
}
|