fix setdefaultlanguage test 94/15694/3
Sylvain GENIN [Fri, 12 Dec 2014 11:03:08 +0000 (12:03 +0100)]
Change-Id: I786e08ccf42ab8942e7ff0dbd1a2538d69cdbed6

scilab/modules/localization/tests/unit_tests/setdefaultlanguage.tst
scilab/modules/localization/tests/unit_tests/setdefaultlanguage.unix.dia.ref
scilab/modules/localization/tests/unit_tests/setdefaultlanguage.win.dia.ref

index e29b957..cd35c3a 100644 (file)
@@ -8,43 +8,43 @@
 // setdefaultlanguage only on Windows
 // returns false in others case
 
-if getos() == 'Windows' then 
- ierr = execstr('setdefaultlanguage()','errcatch');
- if ierr <> 77 then pause,end
- ierr = execstr('setdefaultlanguage(1)','errcatch');
- if ierr <> 999 then pause,end
-  
- warning('off');
- if setdefaultlanguage('toto') <> %f then pause,end
- if setdefaultlanguage('en') <> %t then pause,end
- if getlanguage() <> 'en_US' then pause,end
- if setdefaultlanguage('fr') <> %t then pause,end
- if getlanguage() <> 'fr_FR' then pause,end
- if setdefaultlanguage('en_US') <> %t then pause,end
- if getlanguage() <> 'en_US' then pause,end
- if setdefaultlanguage('fr_FR') <> %t then pause,end
- if getlanguage() <> 'fr_FR' then pause,end
- if setdefaultlanguage('ru_RU') <> %t then pause,end
- if getlanguage() <> 'ru_RU' then pause,end
- if setdefaultlanguage('zh_CN') <> %t then pause,end
- if getlanguage() <> 'zh_CN' then pause,end
- if setdefaultlanguage('zh_TW') <> %t then pause,end
- if getlanguage() <> 'zh_TW' then pause,end
- if setdefaultlanguage('C') <> %t then pause,end
- if getlanguage() <> getdefaultlanguage() then pause,end
- if setdefaultlanguage('') <> %t then pause,end
- warning('on');
+if getos() == "Windows" then
+    ierr = execstr("setdefaultlanguage()","errcatch");
+    if ierr <> 999 then pause,end
+
+    ierr = execstr("setdefaultlanguage(1)","errcatch");
+    if ierr <> 999 then pause,end
+
+    warning("off");
+
+    if setdefaultlanguage("toto") <> %f then pause,end
+
+    if setdefaultlanguage("en") <> %t then pause,end
+    if getlanguage() <> "en_US" then pause,end
+
+    if setdefaultlanguage("fr") <> %t then pause,end
+    if getlanguage() <> "fr_FR" then pause,end
+
+    if setdefaultlanguage("en_US") <> %t then pause,end
+    if getlanguage() <> "en_US" then pause,end
+
+    if setdefaultlanguage("fr_FR") <> %t then pause,end
+    if getlanguage() <> "fr_FR" then pause,end
+
+    if setdefaultlanguage("ru_RU") <> %t then pause,end
+    if getlanguage() <> "ru_RU" then pause,end
+
+    if setdefaultlanguage("zh_CN") <> %t then pause,end
+    if getlanguage() <> "zh_CN" then pause,end
+
+    if setdefaultlanguage("zh_TW") <> %t then pause,end
+    if getlanguage() <> "zh_TW" then pause,end
+
+    if setdefaultlanguage("C") <> %t then pause,end
+    if getlanguage() <> getdefaultlanguage() then pause,end
+
+    if setdefaultlanguage("") <> %t then pause,end
+
+    warning("on");
+
 end
index 1f23cef..b606a87 100644 (file)
@@ -8,7 +8,7 @@
 // returns false in others case
 if getos() == 'Windows' then
  ierr = execstr('setdefaultlanguage()','errcatch');
- if ierr <> 77 then bugmes();quit;end
+ if ierr <> 999 then bugmes();quit;end
  ierr = execstr('setdefaultlanguage(1)','errcatch');
  if ierr <> 999 then bugmes();quit;end
  warning('off');
index 1f23cef..e577722 100644 (file)
@@ -6,29 +6,29 @@
 // ============================================================================
 // setdefaultlanguage only on Windows
 // returns false in others case
-if getos() == 'Windows' then
- ierr = execstr('setdefaultlanguage()','errcatch');
- if ierr <> 77 then bugmes();quit;end
- ierr = execstr('setdefaultlanguage(1)','errcatch');
- if ierr <> 999 then bugmes();quit;end
- warning('off');
- if setdefaultlanguage('toto') <> %f then bugmes();quit;end
- if setdefaultlanguage('en') <> %t then bugmes();quit;end
- if getlanguage() <> 'en_US' then bugmes();quit;end
- if setdefaultlanguage('fr') <> %t then bugmes();quit;end
- if getlanguage() <> 'fr_FR' then bugmes();quit;end
- if setdefaultlanguage('en_US') <> %t then bugmes();quit;end
- if getlanguage() <> 'en_US' then bugmes();quit;end
- if setdefaultlanguage('fr_FR') <> %t then bugmes();quit;end
- if getlanguage() <> 'fr_FR' then bugmes();quit;end
- if setdefaultlanguage('ru_RU') <> %t then bugmes();quit;end
- if getlanguage() <> 'ru_RU' then bugmes();quit;end
- if setdefaultlanguage('zh_CN') <> %t then bugmes();quit;end
- if getlanguage() <> 'zh_CN' then bugmes();quit;end
- if setdefaultlanguage('zh_TW') <> %t then bugmes();quit;end
- if getlanguage() <> 'zh_TW' then bugmes();quit;end
- if setdefaultlanguage('C') <> %t then bugmes();quit;end
- if getlanguage() <> getdefaultlanguage() then bugmes();quit;end
- if setdefaultlanguage('') <> %t then bugmes();quit;end
- warning('on');
+if getos() == "Windows" then
+    ierr = execstr("setdefaultlanguage()","errcatch");
+    if ierr <> 999 then bugmes();quit;end
+    ierr = execstr("setdefaultlanguage(1)","errcatch");
+    if ierr <> 999 then bugmes();quit;end
+    warning("off");
+    if setdefaultlanguage("toto") <> %f then bugmes();quit;end
+    if setdefaultlanguage("en") <> %t then bugmes();quit;end
+    if getlanguage() <> "en_US" then bugmes();quit;end
+    if setdefaultlanguage("fr") <> %t then bugmes();quit;end
+    if getlanguage() <> "fr_FR" then bugmes();quit;end
+    if setdefaultlanguage("en_US") <> %t then bugmes();quit;end
+    if getlanguage() <> "en_US" then bugmes();quit;end
+    if setdefaultlanguage("fr_FR") <> %t then bugmes();quit;end
+    if getlanguage() <> "fr_FR" then bugmes();quit;end
+    if setdefaultlanguage("ru_RU") <> %t then bugmes();quit;end
+    if getlanguage() <> "ru_RU" then bugmes();quit;end
+    if setdefaultlanguage("zh_CN") <> %t then bugmes();quit;end
+    if getlanguage() <> "zh_CN" then bugmes();quit;end
+    if setdefaultlanguage("zh_TW") <> %t then bugmes();quit;end
+    if getlanguage() <> "zh_TW" then bugmes();quit;end
+    if setdefaultlanguage("C") <> %t then bugmes();quit;end
+    if getlanguage() <> getdefaultlanguage() then bugmes();quit;end
+    if setdefaultlanguage("") <> %t then bugmes();quit;end
+    warning("on");
 end