Remove memory leaks
[scilab.git] / scilab / modules / output_stream / src / c / error.c
1 /*
2  * ( http://www.scilab.org/ ) - This file is part of Scilab
3  * Copyright (C) INRIA - Allan CORNET
4  * Copyright (C) DIGITEO - 2010 - Allan CORNET
5  * 
6  * This file must be used under the terms of the CeCILL.
7  * This source file is licensed as described in the file COPYING, which
8  * you should have received as part of this distribution.  The terms
9  * are also available at    
10  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
11  *
12  */
13
14 #include "do_error_number.h"
15 #include "errorTable.h"
16 #include "lasterror.h"
17 /*--------------------------------------------------------------------------*/ 
18 int C2F(error)(int *n)
19 {
20     return errorTable(*n);
21
22 /*--------------------------------------------------------------------------*/ 
23 void SciError(int n)
24 {
25     C2F(error)(&n);
26 }
27 /*--------------------------------------------------------------------------*/
28 void SciStoreError(int n)
29 {
30     setInternalLastErrorValue(n);
31 }
32 /*--------------------------------------------------------------------------*/