1 //===============================
4 // @author Sylvestre LEDRU
5 //===============================
7 if execstr('gettext()','errcatch')==0 then bugmes();quit;end
8 // two inputs arguments
9 str1="plop"; str2="plip"; if execstr('gettext(str1, str2)','errcatch')==0 then bugmes();quit;end
10 // Try to translate from en_US to en_US to a string which doesn't exist
11 lang="en_US"; setlanguage(lang); msg="Localization does not exist"; if gettext(msg) <> msg then bugmes();quit;end
12 // Try to translate from en_US to fr_FR to a string which doesn't exist
13 lang="fr_FR"; setlanguage(lang); msg="Localization does not exist"; if gettext(msg) <> msg then bugmes();quit;end
14 lang="fr_FR"; setlanguage(lang); msg="Startup execution:"; if gettext(msg) <> "Initialisation:" then bugmes();quit;end
15 lang="fr"; setlanguage(lang); msg="Startup execution:"; if gettext(msg) <> "Initialisation:" then bugmes();quit;end
16 lang="en"; setlanguage(lang); msg="Startup execution:"; if gettext(msg) <> msg then bugmes();quit;end
17 lang="en_US"; setlanguage(lang); msg="Startup execution:"; if gettext(msg) <> msg then bugmes();quit;end