scilab/modules/localization/tests/unit_tests/getdefaultlanguage.tst

   1 // =============================================================================
   2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
   3 // Copyright (C) 2008 - INRIA - Sylvestre LEDRU <sylvestre.ledru@inria.fr>
   4 //
   5 //  This file is distributed under the same license as the Scilab package.
   6 // =============================================================================
   7
   8 //===============================
   9 // unit tests getdefaultlanguage
  10 //===============================
  11
  12 // check that the default language is really english
  13  if getdefaultlanguage() <> "en_US" then pause, end
  14
  15 // Switch to french with small code and check if the default language has not changed
  16 lang="fr"; setlanguage(lang); if getdefaultlanguage() <> "en_US" then pause, end
  17
  18 // Switch to english with small code
  19 lang="en"; setlanguage(lang); if getdefaultlanguage() <> "en_US" then pause, end
  20
  21 // Switch to english with full code
  22 lang="en_US"; setlanguage(lang); if getdefaultlanguage() <> "en_US" then pause, end
  23