ee4bc58ed79986fe1c9fd6ba458e12134d613784
[scilab.git] / scilab / modules / localization / sci_gateway / cpp / sci_getlanguage.cpp
1 /*
2 *  Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 *  Copyright (C) 2011-2011 - DIGITEO - Bruno JOFRET
4 *
5 *  This file must be used under the terms of the CeCILL.
6 *  This source file is licensed as described in the file COPYING, which
7 *  you should have received as part of this distribution.  The terms
8 *  are also available at
9 *  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
10 *
11 */
12
13 #include "localization_gw.hxx"
14 #include "function.hxx"
15 #include "string.hxx"
16
17
18 extern "C"
19 {
20 #include "Scierror.h"
21 #include "localization.h"
22 #include "charEncoding.h"
23 #include "setgetlanguage.h"
24 }
25
26 types::Function::ReturnValue sci_getlanguage(types::typed_list &in, int _piRetCount, types::typed_list &out)
27 {
28     if (in.size() != 0)
29     {
30         Scierror(999, _("%s: Wrong number of input arguments: %d expected.\n"), "getlanguage", 0);
31         return types::Function::Error;
32     }
33
34     if (_piRetCount != 1)
35     {
36         Scierror(999, _("%s: Wrong number of output arguments: %d expected.\n"), "getlanguage", 1);
37         return types::Function::Error;
38     }
39
40     out.push_back(new types::String(getlanguage()));
41
42     return types::Function::OK;
43 }