Dynamic link update:
[scilab.git] / scilab / modules / dynamic_link / sci_gateway / c / gw_dynamic_link.c
1 /*
2  * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3  * Copyright (C) INRIA - Allan CORNET
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 /*--------------------------------------------------------------------------*/
14 #include <string.h>
15 #include "gw_dynamic_link.h"
16 #include "stack-c.h"
17 #include "callFunctionFromGateway.h"
18 /*--------------------------------------------------------------------------*/
19 static gw_generic_table Tab[] =
20 {
21         {NULL, ""}, //getdynlibext
22         {sci_addinter,"addinter"},
23         {sci_fort,"fort"},
24         {sci_call,"call"},
25         {NULL ,""}, //link
26         {sci_ulink,"ulink"},
27         {NULL, ""}, //c_link
28         {NULL, ""} // ilib_verbose
29 };
30 /*--------------------------------------------------------------------------*/
31 int gw_dynamic_link(void)
32 {
33         Rhs = Max(0, Rhs);
34         callFunctionFromGateway(Tab, SIZE_CURRENT_GENERIC_TABLE(Tab));
35         return 0;
36 }
37 /*--------------------------------------------------------------------------*/