Warnings removed
Sylvestre Ledru [Wed, 21 Feb 2007 11:02:31 +0000 (11:02 +0000)]
syntax adapted

14 files changed:
scilab/modules/data_structures/includes/gw_data_structures1.h
scilab/modules/data_structures/includes/gw_data_structures2.h
scilab/modules/data_structures/sci_gateway/c/gw_data_structures1.c
scilab/modules/data_structures/sci_gateway/c/gw_data_structures2.c
scilab/modules/data_structures/sci_gateway/c/sci_definedfields.c
scilab/modules/data_structures/sci_gateway/c/sci_glist.c
scilab/modules/data_structures/sci_gateway/c/sci_list.c
scilab/modules/data_structures/sci_gateway/c/sci_lsslist.c
scilab/modules/data_structures/sci_gateway/c/sci_lstcat.c
scilab/modules/data_structures/sci_gateway/c/sci_lstsize.c
scilab/modules/data_structures/sci_gateway/c/sci_mlist.c
scilab/modules/data_structures/sci_gateway/c/sci_rlist.c
scilab/modules/data_structures/sci_gateway/c/sci_tlist.c
scilab/modules/data_structures/src/c/hmops.c

index 3c2e639..2bdc372 100644 (file)
@@ -16,6 +16,8 @@
 #include "stack-c.h"
 #include "sciprint.h"
 
+int C2F(gwdatastructures1)(void);
+
 typedef int (*Data_structures1_Interf) __PARAMS((char *fname,unsigned long fname_len));
 
 typedef struct table_struct 
@@ -24,6 +26,17 @@ typedef struct table_struct
        char *name;      /** its name **/
 } DataStructures1Table;
 
+
+int C2F(sci_glist) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_scilist) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_lsslist) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_rlist) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_scitlist) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_lstcat) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_scimlist) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_definedfields) _PARAMS((char *fname,unsigned long fname_len));
+int C2F(sci_lstsize) _PARAMS((char *fname,unsigned long fname_len));
+
 #endif /*  __GW_DATA_STRUCTURES1__ */
 /*-----------------------------------------------------------------------------------*/
 
index 3f83b28..e768025 100644 (file)
@@ -16,6 +16,8 @@
 #include "stack-c.h"
 #include "sciprint.h"
 
+int C2F(gwdatastructures2)(void);
+
 typedef int (*Data_structures2_Interf) __PARAMS((char *fname,unsigned long fname_len));
 
 typedef struct table_struct 
index 5b8ed95..40f277e 100644 (file)
@@ -8,17 +8,7 @@
 #include "ExceptionMessage.h"
 #endif
 /*-----------------------------------------------------------------------------------*/
-extern int C2F(sci_glist) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_scilist) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_lsslist) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_rlist) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_scitlist) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_lstcat) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_scimlist) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_definedfields) _PARAMS((char *fname,unsigned long fname_len));
-extern int C2F(sci_lstsize) _PARAMS((char *fname,unsigned long fname_len));
-/*-----------------------------------------------------------------------------------*/        
-extern C2F(error)();
+extern int C2F(error)();
 /*-----------------------------------------------------------------------------------*/
 static DataStructures1Table Tab[]=
 {
index a470fed..22e5b84 100644 (file)
@@ -8,7 +8,7 @@
 #include "ExceptionMessage.h"
 #endif
 /*-----------------------------------------------------------------------------------*/
-extern C2F(error)();
+extern int C2F(error)();
 /*-----------------------------------------------------------------------------------*/        
 static int C2F(sci_getfield) _PARAMS((char *fname,unsigned long fname_len))
 {
@@ -32,7 +32,7 @@ static DataStructures2Table Tab[]=
        {C2F(sci_setfield),"setfield"}
 };
 /*-----------------------------------------------------------------------------------*/
-int C2F(gwdatastructures2)()
+int C2F(gwdatastructures2)(void)
 { 
        Rhs=Max(Rhs,0);
        if (C2F(vstk).top - C2F(com).rhs + C2F(com).lhs + 1 >= C2F(vstk).bot) 
index b7f02fa..ecab191 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(definedfields)();
 /*-----------------------------------------------------------------------------------*/
index 7a4ef16..0e4a554 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(gratyp)();
 extern int C2F(mtlist)();
index 267cab2..e799978 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(scilist)();
 /*-----------------------------------------------------------------------------------*/
index c55231f..fc9d93a 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(mtlist)();
 extern int C2F(lsstyp)();
index 7b069a1..78c36fd 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(intlstcat)();
 /*-----------------------------------------------------------------------------------*/
index 95678ce..ae497dc 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(intlstsize)();
 /*-----------------------------------------------------------------------------------*/
index 019b053..7fab364 100644 (file)
@@ -2,9 +2,9 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
-extern C2F(scilist)();
+extern int C2F(scilist)();
 /*-----------------------------------------------------------------------------------*/
 int C2F(sci_scimlist) _PARAMS((char *fname,unsigned long fname_len))
 {
index 204c7d3..7307f1d 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(mtlist)();
 extern int C2F(rattyp)();
index 0089a3e..2ccacf3 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */
 /* Allan CORNET */
 /*-----------------------------------------------------------------------------------*/
-#include "machine.h"
+#include "gw_data_structures1.h"
 /*-----------------------------------------------------------------------------------*/
 extern int C2F(scilist)();
 /*-----------------------------------------------------------------------------------*/
index 74e3220..12413f6 100644 (file)
@@ -66,8 +66,9 @@ typedef struct sci_bool_sparse {
 } SciBoolSparse;
 
 
-#if _MSC_VER
+
 extern int C2F(ddmpev)();
+#if _MSC_VER
 int C2F(createlistcvarfrom)();
 #endif