summaryrefslogtreecommitdiffstats
path: root/scilab/modules/symbolic/sci_gateway
diff options
context:
space:
mode:
authorSylvestre Ledru <sylvestre.ledru@scilab.org>2007-11-23 13:31:02 +0000
committerSylvestre Ledru <sylvestre.ledru@scilab.org>2007-11-23 13:31:02 +0000
commitf5f7037b21581df7c39225d9bd129fd0b9cb9adb (patch)
treeb620b8f2ef4860874d9e73db5b807904622e12a5 /scilab/modules/symbolic/sci_gateway
parent408598affc9141d81bfbd97d05df56265761edc5 (diff)
downloadscilab-f5f7037b21581df7c39225d9bd129fd0b9cb9adb.zip
scilab-f5f7037b21581df7c39225d9bd129fd0b9cb9adb.tar.gz
Comment line goes on 80 chars only
Diffstat (limited to 'scilab/modules/symbolic/sci_gateway')
-rw-r--r--scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c10
-rw-r--r--scilab/modules/symbolic/sci_gateway/c/sci_addsubf.c12
-rw-r--r--scilab/modules/symbolic/sci_gateway/c/sci_ldivf.c10
-rw-r--r--scilab/modules/symbolic/sci_gateway/c/sci_mulf.c10
-rw-r--r--scilab/modules/symbolic/sci_gateway/c/sci_rdivf.c10
5 files changed, 26 insertions, 26 deletions
diff --git a/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c b/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
index 70272b2..0aa0b83 100644
--- a/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
+++ b/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
@@ -1,14 +1,14 @@
1/*-----------------------------------------------------------------------------------*/ 1/*--------------------------------------------------------------------------*/
2/* INRIA 2006 */ 2/* INRIA 2006 */
3/* Allan CORNET */ 3/* Allan CORNET */
4/*-----------------------------------------------------------------------------------*/ 4/*--------------------------------------------------------------------------*/
5#include <string.h> 5#include <string.h>
6#include "gw_symbolic.h" 6#include "gw_symbolic.h"
7#include "stack-c.h" 7#include "stack-c.h"
8#include "callFunctionFromGateway.h" 8#include "callFunctionFromGateway.h"
9#include "Scierror.h" 9#include "Scierror.h"
10#include "localization.h" 10#include "localization.h"
11/*-----------------------------------------------------------------------------------*/ 11/*--------------------------------------------------------------------------*/
12static gw_generic_table Tab[]= 12static gw_generic_table Tab[]=
13{ 13{
14{C2F(sci_addf),"addf"}, 14{C2F(sci_addf),"addf"},
@@ -17,7 +17,7 @@ static gw_generic_table Tab[]=
17{C2F(sci_ldivf),"ldivf"}, 17{C2F(sci_ldivf),"ldivf"},
18{C2F(sci_rdivf),"rdivf"} 18{C2F(sci_rdivf),"rdivf"}
19}; 19};
20/*-----------------------------------------------------------------------------------*/ 20/*--------------------------------------------------------------------------*/
21int C2F(gw_symbolic)() 21int C2F(gw_symbolic)()
22{ 22{
23 if (Rhs != 2) 23 if (Rhs != 2)
@@ -28,4 +28,4 @@ int C2F(gw_symbolic)()
28 callFunctionFromGateway(Tab); 28 callFunctionFromGateway(Tab);
29 return 0; 29 return 0;
30} 30}
31/*-----------------------------------------------------------------------------------*/ 31/*--------------------------------------------------------------------------*/
diff --git a/scilab/modules/symbolic/sci_gateway/c/sci_addsubf.c b/scilab/modules/symbolic/sci_gateway/c/sci_addsubf.c
index 052748a..cb0433a 100644
--- a/scilab/modules/symbolic/sci_gateway/c/sci_addsubf.c
+++ b/scilab/modules/symbolic/sci_gateway/c/sci_addsubf.c
@@ -1,22 +1,22 @@
1/*-----------------------------------------------------------------------------------*/ 1/*--------------------------------------------------------------------------*/
2/* INRIA 2006 */ 2/* INRIA 2006 */
3/* Allan CORNET */ 3/* Allan CORNET */
4/*-----------------------------------------------------------------------------------*/ 4/*--------------------------------------------------------------------------*/
5#include "gw_symbolic.h" 5#include "gw_symbolic.h"
6#include "machine.h" 6#include "machine.h"
7#include "stack-c.h" 7#include "stack-c.h"
8/*-----------------------------------------------------------------------------------*/ 8/*--------------------------------------------------------------------------*/
9extern int C2F(sciaddfsubf) _PARAMS((char *fname,unsigned long fname_len)); 9extern int C2F(sciaddfsubf) _PARAMS((char *fname,unsigned long fname_len));
10/*-----------------------------------------------------------------------------------*/ 10/*--------------------------------------------------------------------------*/
11int C2F(sci_addf) _PARAMS((char *fname,unsigned long fname_len)) 11int C2F(sci_addf) _PARAMS((char *fname,unsigned long fname_len))
12{ 12{
13 C2F(sciaddfsubf)(fname,fname_len); 13 C2F(sciaddfsubf)(fname,fname_len);
14 return 0; 14 return 0;
15} 15}
16/*-----------------------------------------------------------------------------------*/ 16/*--------------------------------------------------------------------------*/
17int C2F(sci_subf) _PARAMS((char *fname,unsigned long fname_len)) 17int C2F(sci_subf) _PARAMS((char *fname,unsigned long fname_len))
18{ 18{
19 C2F(sciaddfsubf)(fname,fname_len); 19 C2F(sciaddfsubf)(fname,fname_len);
20 return 0; 20 return 0;
21} 21}
22/*-----------------------------------------------------------------------------------*/ 22/*--------------------------------------------------------------------------*/
diff --git a/scilab/modules/symbolic/sci_gateway/c/sci_ldivf.c b/scilab/modules/symbolic/sci_gateway/c/sci_ldivf.c
index 4a46db7..0e52c98 100644
--- a/scilab/modules/symbolic/sci_gateway/c/sci_ldivf.c
+++ b/scilab/modules/symbolic/sci_gateway/c/sci_ldivf.c
@@ -1,16 +1,16 @@
1/*-----------------------------------------------------------------------------------*/ 1/*--------------------------------------------------------------------------*/
2/* INRIA 2006 */ 2/* INRIA 2006 */
3/* Allan CORNET */ 3/* Allan CORNET */
4/*-----------------------------------------------------------------------------------*/ 4/*--------------------------------------------------------------------------*/
5#include "gw_symbolic.h" 5#include "gw_symbolic.h"
6#include "machine.h" 6#include "machine.h"
7#include "stack-c.h" 7#include "stack-c.h"
8/*-----------------------------------------------------------------------------------*/ 8/*--------------------------------------------------------------------------*/
9extern int C2F(scildivf) _PARAMS((char *fname,unsigned long fname_len)); 9extern int C2F(scildivf) _PARAMS((char *fname,unsigned long fname_len));
10/*-----------------------------------------------------------------------------------*/ 10/*--------------------------------------------------------------------------*/
11int C2F(sci_ldivf) _PARAMS((char *fname,unsigned long fname_len)) 11int C2F(sci_ldivf) _PARAMS((char *fname,unsigned long fname_len))
12{ 12{
13 C2F(scildivf)(fname,fname_len); 13 C2F(scildivf)(fname,fname_len);
14 return 0; 14 return 0;
15} 15}
16/*-----------------------------------------------------------------------------------*/ 16/*--------------------------------------------------------------------------*/
diff --git a/scilab/modules/symbolic/sci_gateway/c/sci_mulf.c b/scilab/modules/symbolic/sci_gateway/c/sci_mulf.c
index 57f3f9d..9be5171 100644
--- a/scilab/modules/symbolic/sci_gateway/c/sci_mulf.c
+++ b/scilab/modules/symbolic/sci_gateway/c/sci_mulf.c
@@ -1,16 +1,16 @@
1/*-----------------------------------------------------------------------------------*/ 1/*--------------------------------------------------------------------------*/
2/* INRIA 2006 */ 2/* INRIA 2006 */
3/* Allan CORNET */ 3/* Allan CORNET */
4/*-----------------------------------------------------------------------------------*/ 4/*--------------------------------------------------------------------------*/
5#include "gw_symbolic.h" 5#include "gw_symbolic.h"
6#include "machine.h" 6#include "machine.h"
7#include "stack-c.h" 7#include "stack-c.h"
8/*-----------------------------------------------------------------------------------*/ 8/*--------------------------------------------------------------------------*/
9extern int C2F(scimulf) _PARAMS((char *fname,unsigned long fname_len)); 9extern int C2F(scimulf) _PARAMS((char *fname,unsigned long fname_len));
10/*-----------------------------------------------------------------------------------*/ 10/*--------------------------------------------------------------------------*/
11int C2F(sci_mulf) _PARAMS((char *fname,unsigned long fname_len)) 11int C2F(sci_mulf) _PARAMS((char *fname,unsigned long fname_len))
12{ 12{
13 C2F(scimulf)(fname,fname_len); 13 C2F(scimulf)(fname,fname_len);
14 return 0; 14 return 0;
15} 15}
16/*-----------------------------------------------------------------------------------*/ 16/*--------------------------------------------------------------------------*/
diff --git a/scilab/modules/symbolic/sci_gateway/c/sci_rdivf.c b/scilab/modules/symbolic/sci_gateway/c/sci_rdivf.c
index 37ccccd..cfac5e3 100644
--- a/scilab/modules/symbolic/sci_gateway/c/sci_rdivf.c
+++ b/scilab/modules/symbolic/sci_gateway/c/sci_rdivf.c
@@ -1,16 +1,16 @@
1/*-----------------------------------------------------------------------------------*/ 1/*--------------------------------------------------------------------------*/
2/* INRIA 2006 */ 2/* INRIA 2006 */
3/* Allan CORNET */ 3/* Allan CORNET */
4/*-----------------------------------------------------------------------------------*/ 4/*--------------------------------------------------------------------------*/
5#include "gw_symbolic.h" 5#include "gw_symbolic.h"
6#include "machine.h" 6#include "machine.h"
7#include "stack-c.h" 7#include "stack-c.h"
8/*-----------------------------------------------------------------------------------*/ 8/*--------------------------------------------------------------------------*/
9extern int C2F(scirdivf) _PARAMS((char *fname,unsigned long fname_len)); 9extern int C2F(scirdivf) _PARAMS((char *fname,unsigned long fname_len));
10/*-----------------------------------------------------------------------------------*/ 10/*--------------------------------------------------------------------------*/
11int C2F(sci_rdivf) _PARAMS((char *fname,unsigned long fname_len)) 11int C2F(sci_rdivf) _PARAMS((char *fname,unsigned long fname_len))
12{ 12{
13 C2F(scirdivf)(fname,fname_len); 13 C2F(scirdivf)(fname,fname_len);
14 return 0; 14 return 0;
15} 15}
16/*-----------------------------------------------------------------------------------*/ 16/*--------------------------------------------------------------------------*/