updates headers (.h)
Allan Cornet [Sat, 14 Apr 2007 15:22:36 +0000 (15:22 +0000)]
#ifndef __XXX_H__
#define __XXX_H__
#include "machine.h"

...
#endif /* __XXX_H__ */

66 files changed:
scilab/modules/boolean/includes/matboolean.h
scilab/modules/boolean/src/c/boolean.vcproj
scilab/modules/core/includes/cluni0.h
scilab/modules/core/includes/cvstr.h
scilab/modules/core/includes/getarg.h
scilab/modules/core/includes/inisci-c.h
scilab/modules/core/includes/returnanan.h
scilab/modules/core/includes/scirun.h
scilab/modules/core/includes/tmpdir.h
scilab/modules/core/src/c/Funtab.h
scilab/modules/core/src/c/InitScilab.h
scilab/modules/core/src/c/IsAScalar.h
scilab/modules/core/src/c/banier.h
scilab/modules/core/src/c/basout.h
scilab/modules/core/src/c/core.vcproj
scilab/modules/core/src/c/cs2st.h
scilab/modules/core/src/c/csignal.h
scilab/modules/core/src/c/flags.h
scilab/modules/core/src/c/getval.h
scilab/modules/core/src/c/inffic.h
scilab/modules/core/src/c/msgout.h
scilab/modules/core/src/c/msgstore.h
scilab/modules/core/src/c/msgstxt.h
scilab/modules/core/src/c/readline.h
scilab/modules/core/src/c/run.h
scilab/modules/core/src/c/scicurdir.h
scilab/modules/core/src/c/str2sci.h
scilab/modules/core/src/c/texmacs.h
scilab/modules/core/src/c/timer.h
scilab/modules/core/src/c/userf2.h
scilab/modules/data_structures/src/c/data_structures.vcproj
scilab/modules/data_structures/src/c/hmops.h
scilab/modules/data_structures/src/c/stcreate.h
scilab/modules/elementaries_functions/includes/sci_tools.h
scilab/modules/elementaries_functions/src/c/elementaries_functions.vcproj
scilab/modules/fftw/fftw.vcproj
scilab/modules/fileio/fileio.vcproj
scilab/modules/fileio/src/c/fileio.h
scilab/modules/graphics/graphics.vcproj
scilab/modules/graphics/src/c/qsort-string.h
scilab/modules/gui/src/c/gui.vcproj
scilab/modules/gui/src/c/wsci/wgraph.c
scilab/modules/interpolation/src/c/interpolation.vcproj
scilab/modules/interpolation/src/c/someinterp.h
scilab/modules/io/includes/getenvc.h
scilab/modules/io/sci_gateway/c/intfilestat.h
scilab/modules/io/sci_gateway/c/intsetenv.h
scilab/modules/io/sci_gateway/c/sci_setenv.h
scilab/modules/io/src/c/io.vcproj
scilab/modules/linear_algebra/src/c/gschur.h
scilab/modules/linear_algebra/src/c/linear_FTables.h
scilab/modules/linear_algebra/src/c/schur.h
scilab/modules/metanet/src/c/metanet.vcproj
scilab/modules/metanet/src/c/paths.h
scilab/modules/pvm/pvm.vcproj
scilab/modules/sparse/src/c/spAllocate.h
scilab/modules/sparse/src/c/spBuild.h
scilab/modules/sparse/src/c/spFactor.h
scilab/modules/sparse/src/c/spFortran.h
scilab/modules/sparse/src/c/spSolve.h
scilab/modules/sparse/src/c/sparse.vcproj
scilab/modules/special_functions/src/c/special_functions.vcproj
scilab/modules/statistics/src/c/CdfBase.h
scilab/modules/statistics/src/c/ipmpar1.h
scilab/modules/statistics/src/c/statistics.vcproj
scilab/modules/wintools/wintools.vcproj

index bfbe5a7..9ede16e 100644 (file)
@@ -2,9 +2,12 @@
 /* Sylvestre LEDRU */
 /* INRIA 2007 */
 /*-----------------------------------------------------------------------------------*/ 
-
+#ifndef __MATBOOLEAN_H__
+#define __MATBOOLEAN_H__
 /**
  * TODO : comment
  * @return
  */
 int C2F(matlog)(void);
+
+#endif /* __MATBOOLEAN_H__ */
\ No newline at end of file
index 23c0c92..4bd64ea 100644 (file)
                                RelativePath="..\..\includes\gw_boolean.h"
                                >
                        </File>
+                       <File
+                               RelativePath="..\..\includes\matboolean.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index 7f83cd1..56bf1f3 100644 (file)
@@ -2,6 +2,9 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __CLUNI0_H__
+#define __CLUNI0_H__
+
 #include "machine.h"
 /**
  * expand in_name to produce out_name 
@@ -15,3 +18,4 @@
  */
 int C2F(cluni0)(char *in_name, char *out_name, int *out_n, long int lin, long int lout);
 
+#endif /* __CLUNI0_H__ */
\ No newline at end of file
index 331fbf4..f105843 100644 (file)
@@ -2,15 +2,16 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
-
+#ifndef __CVSTR_H__
+#define __CVSTR_H__
 /**
  * Convert one ascii char to Scilab internal code 
  *     the big table (pure) ascii -> scilab code 
- * @author Copyright INRIA/ENPC 
- * @author Modified by Bruno Pincon 
  * @param c
  * @param c_len
  * @return 
  */
 
 integer C2F(getfastcode)(unsigned char *c, unsigned long c_len) ;
+
+#endif /* __CVSTR_H__ */
index cc7d5ad..db95968 100644 (file)
@@ -2,7 +2,10 @@
 /* INRIA 2006 */
 /* Sylvestre Ledru */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __GETARG_H__
+#define __GETARG_H__
 
+#include "machine.h"
 /**
  * TODO : comment
  * @param n
@@ -17,3 +20,5 @@ int C2F(scigetarg)(int *n,char *str,long int ln);
  * @return 
  */
 int C2F(sciiargc)(void);
+
+#endif /* __GETARG_H__ */
index a66d64b..9b4c79f 100644 (file)
@@ -2,6 +2,10 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __INI_C_H__
+#define __INI_C_H__
+
+#include "machine.h"
 
 /** 
  * TODO : comment
@@ -130,3 +134,5 @@ int C2F(getsci)(char *buf,int *nbuf,long int lbuf);
  * @return 
 */
 int C2F(getscihome)(char *buf,int *nbuf,long int lbuf);
+
+#endif /* __INI_C_H__ */
index badd185..624bc3a 100644 (file)
@@ -2,8 +2,13 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __RETURNANAN_H__
+#define __RETURNANAN_H__
+#include "machine.h"
 /**
  * Returns a "not a number"
  * @return the "nan"
  */
 double C2F(returnanan)(void);
+
+#endif /*__RETURNANAN_H__ */
\ No newline at end of file
index 41bba30..dd74e19 100644 (file)
@@ -2,9 +2,14 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SCIRUN_H__
+#define __SCIRUN_H__ 
+
+#include "machine.h"
 /**
  * Run scilab parser with initial instruction 
  * @param bu1 : character string which contains the initial instruction 
  * @param bu1_len : length of bu1 
  */
 int C2F(scirun)(char *bu1, long int bu1_len);
+#endif /* __SCIRUN_H__ */
\ No newline at end of file
index 3415cc3..9e35e00 100644 (file)
@@ -5,6 +5,8 @@
 #ifndef __TMPDIR_H__
 #define __TMPDIR_H__
 
+#include "machine.h"
+
 void C2F(settmpdir)(void);
 char *get_sci_tmp_dir(void);
 void C2F(tmpdirc)(void);
index 76f9bf2..6217532 100644 (file)
@@ -2,6 +2,10 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __FUNTAB_H__
+#define __FUNTAB_H__
+
+#include "machine.h"
 /**
  *    Hash table for scilab functions 
  *    job is used to specify a job
@@ -26,3 +30,5 @@
  *   @param fptr
  */
 int C2F(funtab)(int *id, int *fptr, int *job,char *namefunction,unsigned long namefunction_len);
+
+#endif /* __FUNTAB_H__ */
\ No newline at end of file
index 98ffb76..04fa85e 100644 (file)
@@ -2,9 +2,13 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __INITSCILAB_H__
+#define __INITSCILAB_H__
+
 #include "machine.h"
 
 int C2F(initscilab)(void);
 
+#endif /* __INITSCILAB_H__ */
 /*-----------------------------------------------------------------------------------*/ 
 
index fce2a83..9d8a14a 100644 (file)
@@ -2,5 +2,9 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __ISASCALAR_H__
+#define __ISASCALAR_H__
 
 int IsAScalar(int RhsNumber);
+
+#endif /* __ISASCALAR_H__ */
index 4e6baee..1f2b32e 100644 (file)
@@ -2,6 +2,9 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __BANNER_H__
+#define __BANNER_H__
+
 #include "machine.h"
 
 /** 
@@ -14,3 +17,5 @@ void banner(void);
  * @param flag
  */
 int C2F(banier)(integer *flag);
+
+#endif /* __BANNER_H__ */
\ No newline at end of file
index b689c93..19e262b 100644 (file)
@@ -2,5 +2,10 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __BASOUT_H__
+#define __BANNER_H__
 
+#include "machine.h"
 int C2F(basout)(integer *io,integer *lunit,char *string,long int notused);
+
+#endif /* __BANNER_H__ */
index a615282..781c69b 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath=".\banier.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\basout.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\callinter.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="callinterf.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\cluni0.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\core_math.h"
                                >
                        </File>
                        <File
+                               RelativePath=".\cs2st.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\csignal.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\cvstr.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\diary.h"
                                >
                        </File>
                        <File
+                               RelativePath=".\dynamic_menus.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\error_scilab.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\flags.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\fromc.h"
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\fromjava.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\fromjava.h"
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\FTables.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\Funtab.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\getarg.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\GetExceptionCode.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\getval.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\GetXmlFileEncoding.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\inffic.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\inisci-c.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\InitializeCore.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\InitScilab.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\intgetmd5.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\IsAScalar.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\link.h"
                                >
                        </File>
                        <File
+                               RelativePath=".\LoadFunctionsTab.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\loadversion.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\msgout.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\msgstore.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\msgstxt.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\Os_specific.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\Os_specific.h"
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\PARAMS.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\parse.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\prompt.h"
                                >
                        </File>
                        <File
+                               RelativePath=".\readline.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\realmain.h"
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\returnanan.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\returnProperty.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\run.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\scicurdir.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\SciEnv.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\Scierror.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\scimem.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\sciprint.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\scirun.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\setgetSCIpath.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\stack.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\stack1.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\str2sci.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\TerminateCore.h"
                                >
                        </File>
                        <File
+                               RelativePath=".\texmacs.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\timer.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath="..\..\includes\tmpdir.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\userf2.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\version.h"
                                >
                        </File>
index 50762f8..14cbb11 100644 (file)
@@ -2,6 +2,10 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
-
+#ifndef __CS2ST_H__
+#define __CS2ST_H__
+#include "machine.h"
 
 int C2F(cs2st)(integer *i,integer *ires);
+
+#endif /* __CS2ST_H__ */
index 4d1c47d..8a6debf 100644 (file)
@@ -2,6 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __CSIGNAL_H__ 
+#define __CSIGNAL_H__
 #include <signal.h>
 #include "machine.h"
 
@@ -17,3 +19,4 @@ void controlC_handler (int sig);
  */
 int C2F(csignal)(void);
 
+#endif /* __CSIGNAL_H__ */
\ No newline at end of file
index a0111d2..f5c6d3a 100644 (file)
@@ -2,6 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __FLAGS_H__
+#define __FLAGS_H__
 
 /**
  * set the echo mode of typed scilab commands 
@@ -28,3 +30,5 @@ void set_is_reading(int mode);
  * @return the reading mode
 */
 int get_is_reading(void);
+
+#endif /* __FLAGS_H__ */
\ No newline at end of file
index b0c9f2e..25867d8 100644 (file)
@@ -2,5 +2,11 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __GETVAL_H__
+#define __GETVAL_H__
+
+#include "machine.h"
 
 int C2F(getval)(double *s, int *dotdet);
+
+#endif /* __GETVAL_H__ */
index 028a599..0e17087 100644 (file)
@@ -2,9 +2,15 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __INFFIC_H__
+#define __INFFIC_H__
+
+#include "machine.h"
 
 void C2F(inffic)(integer *iopt, char *name, integer *nc);
 
 void C2F(infficl)(integer *iopt, integer *nc);
 
 char *get_sci_data_strings(int n);
+
+#endif /*__INFFIC_H__*/
index cb0fc58..93bc2e7 100644 (file)
@@ -2,6 +2,10 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __MSGOUT_H__
+#define __MSGOUT_H__
+
+#include "machine.h"
 /**
  * TODO : comment
  * @param io
@@ -10,3 +14,5 @@
  * @param str_len
  */
 int C2F(msgout)(integer *io,integer *lunit,char *str,long int str_len);
+
+#endif /* __MSGOUT_H__ */
\ No newline at end of file
index 4ab5abc..e33033a 100644 (file)
@@ -2,7 +2,10 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __MSGSTORE_H__
+#define __MSGSTORE_H__
 
+#include "machine.h"
 
 /**
  * TODO : comment
@@ -50,3 +53,4 @@ int C2F(lasterror)(char *fname, unsigned long fname_len);
  */
 int GetLastErrorCode(void);
 
+#endif /* __MSGSTORE_H__ */
index 391676e..2190a0e 100644 (file)
@@ -2,5 +2,9 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
-
+#ifndef __MSGTXT_H__ 
+#define __MSGTXT_H__
+#include "machine.h"
 int C2F(msgstxt)(char *txt,long int txt_len);
+
+#endif /* __MSGTXT_H__ */
index 6bff1b6..38a8954 100644 (file)
@@ -2,6 +2,11 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __READLINE_H__
+#define __READLINE_H__
 
+#include "machine.h"
 int LineRead(FILE *fd,char buf[],int n,int *cnt,int *nr);
 void C2F(readnextline)(integer *fd,char buf[],integer *n,integer *count,integer *nr,integer *ierr);
+
+#endif /* __READLINE_H__ */
index ae42c23..26c7324 100644 (file)
@@ -2,8 +2,11 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/ 
-
+#ifndef __RUN_H__
+#define __RUN_H__
+#include "machine.h"
 typedef int logical;
 logical Istrue(int n);
 int C2F(run)(void);
 int C2F(adjustrhs)(void);
+#endif /* __RUN_H__ */
index 3dbf7fe..313c52d 100644 (file)
@@ -4,6 +4,7 @@
 /*-----------------------------------------------------------------------------------*/
 #ifndef __SCICURDIR_H__
 #define __SCICURDIR_H__
+#include "machine.h"
 /*******************************
  * Changes scilab current directory 
  * @param path : the path where Scilab should go
index 29f6abe..5506d8a 100644 (file)
@@ -2,9 +2,12 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
-
+#ifndef __STR2SCI_H__
+#define __STR2SCI_H__
+#include "machine.h"
 /** C string  var2vec  to scilab
  *  @param x is supposed to be a fortran image of var2vec result
  */
 void str2sci(char** x,int n,int m);
 
+#endif /* __STR2SCI_H__ */
\ No newline at end of file
index d26fd1b..169ca78 100644 (file)
@@ -2,8 +2,14 @@
 /* INRIA 2006 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __TEXMACS_H__
+#define __TEXMACS_H__
+
+#include "machine.h"
 
 void settexmacs(void);
 int  C2F(intexmacs)(void);
 void next_input (void);
 void C2F(texmacsin)(char buffer[],int *buf_size, int *len_line,int *eof,long int dummy1);
+
+#endif /* __TEXMACS_H__ */
\ No newline at end of file
index 84cca00..873a751 100644 (file)
@@ -3,9 +3,13 @@
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
 
+#ifndef __TIMER_H__
+#define __TIMER_H__
 /**
  * a time interval of dt microsec (dt=10000)
  * @return 1 if interval from last call is greater than 
 
  */
 int scilab_timer_check(void);
+
+#endif /* __TIMER_H__ */
\ No newline at end of file
index 54fc0d9..b7fdae8 100644 (file)
@@ -2,5 +2,11 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __USERF2_H__
+#define __USERF2_H__
+
+#include "machine.h"
 
 int C2F(userf2)(void);
+
+#endif /* __USERF2_H__ */
index 03252d8..7f7ac14 100644 (file)
                                RelativePath="..\..\includes\gw_data_structures2.h"
                                >
                        </File>
+                       <File
+                               RelativePath=".\hmops.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\stcreate.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index b2fabf7..50b176b 100644 (file)
@@ -3,7 +3,13 @@
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
 
+#ifndef __HMOPS_H__
+#define __HMOPS_H__
+
+#include "machine.h"
 
 int C2F(ishm)(void);
 int C2F(intehm)(void);
 int C2F(intihm)(void);
+
+#endif /* __HMOPS_H__ */
index 69dc7a9..389f839 100644 (file)
@@ -2,7 +2,10 @@
 /* INRIA 2007 */
 /* Ledru Sylvestre */
 /*-----------------------------------------------------------------------------------*/
+#ifndef  __STCREATE_H__
+#define __STCREATE_H__
 
+#include "machine.h"
 int C2F(stcreate)(integer *lw, integer *nz, integer *sz, integer *nf, char *fnames[], integer *retval);
 
 int sttyp(int *ivt, char *job, int *nf, char *fnames[]);
@@ -10,3 +13,5 @@ int sttyp(int *ivt, char *job, int *nf, char *fnames[]);
 int creonevoid(integer *slw,integer *lw);
 
 int crelistofvoids(integer *slw,integer *lw,integer *nels);
+
+#endif /* __STCREATE_H__ */
index 9c14421..5523935 100644 (file)
@@ -1,43 +1,4 @@
-/*Copyright (c) 1997 by Inria Lorraine.  All Rights Reserved */
-
-/***
-   NAME
-     sci_tools
-   PURPOSE
-     
-   NOTES
-     
-   HISTORY
-     fleury - Dec 17, 1997: Created.
-     Revision 1.1  2001/04/26 07:47:34  scilab
-     Initial revision
-
-     Revision 1.4  1998/04/03 11:41:04  fleury
-     Ajout des commandes pvm_start et pvm_halt
-     Correction d'erreurs en version non ANSI
-     teste sur alpha et sun
-     PBM de link en dynamique sur hpux9
-
-     Revision 1.3  1998/03/27 12:20:24  fleury
-     Version pvm OK.
-     TODO: faire des tests de compil sur plateforme separee (POPC0
-     TODO: commenter source (-;
-     TODO: faire un peu de netoyage
-
-     Revision 1.2  1998/03/13 13:57:09  fleury
-     Version send/recv avec pack. A tester.
-     TODO: ajouter les listes + BROADCAST
-     TODO: faire un clean du dir et des fichiers...
-
-     Revision 1.1  1997/12/18 18:35:58  fleury
-     Premier commit
-
-     Ajout de fct permettant de tester le type d une variable scilab
-     conversion de complex format scilab to complex format f77
-     TODO:use memcpy
-     TODO:use imatrix
-
-***/
+/* Copyright (c) 1997 by Inria */
 
 #ifndef __SCI_TOOLS
 #define __SCI_TOOLS
@@ -47,7 +8,7 @@
 #define TYPE_DOUBLE  0
 #define TYPE_COMPLEX 1
 
-                               /* Valide for Real or Complex matrix */
+/* Valide for Real or Complex matrix */
 #define TYPE(ptr)   (((int*) (ptr))[-1])
 #define NB_COL(ptr) (((int*) (ptr))[-2])
 #define NB_ROW(ptr) (((int*) (ptr))[-3])
index 1bd14fd..4ccc87d 100644 (file)
                        Filter="h;hpp;hxx;hm;inl"
                        >
                        <File
-                               RelativePath="..\..\includes\calelm.h"
+                               RelativePath="..\..\includes\elementaries_functions.h"
                                >
                        </File>
                        <File
index 4bc4c2b..0d7cef7 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\fftw3.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\src\c\fftw_utilities.h"
                                >
                        </File>
index 49875b3..77eaa26 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\fileio.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\src\c\files.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\gw_fileio.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\ripole.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\sci_fileio.h"
                                >
                        </File>
index 831ba4f..c5b372f 100644 (file)
@@ -2,6 +2,10 @@
 /* INRIA 2006 */
 /* Sylvestre Ledru */
 /*-----------------------------------------------------------------------------------*/
+
+#ifndef __FILEIO_H__
+#define __FILEIO_H__
+
 #include <stdio.h>
 #include "machine.h"
 #include "stack-c.h"
@@ -13,3 +17,5 @@ int Sci_Store __PARAMS((int nrow,int ncol,entry* data,sfdir *type,int retval));
 int Store_Scan __PARAMS((int *nrow,int *ncol,sfdir *type_s,sfdir *type,int *retval, int*retval_s, rec_entry *buf, entry **data,int rowcount,int n));
 int NumTokens __PARAMS((char *str));
 int SciStrtoStr __PARAMS((int *Scistring,int *nstring,int *ptrstrings,char **strh));
+
+#endif /* __FILEIO_H__ */
\ No newline at end of file
index 273dad1..02adcbd 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\fig.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\Format.h"
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\getHandleProperty\get_data_property.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\src\c\getHandleProperty\get_ticks_utils.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\paintop.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\periFig.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\periMac.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\periPos.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\periX11.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\pixel_mode.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\Plo2dEch.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\Plo3d.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\qsort.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\includes\resources.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\sci_addcb.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\sci_xload.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\sci_xname.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\sci_xsave.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\sci_xsegs.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\getHandleProperty\set_data_property.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\src\c\getHandleProperty\setGetHashTable.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\includes\w_rottext.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\includes\WindowList.h"
                                >
                        </File>
index 4a8a546..271bc8b 100644 (file)
@@ -4,9 +4,11 @@
 /*------------------------------------------------------------------------*/
 #ifndef __QSORT_STRING_H__
 #define __QSORT_STRING_H__
+
 void ColSortstring(char * *a,int *ind,int flag,int n,int p,char dir);
 void RowSortstring(char * *a,int *ind,int flag,int n,int p,char dir);
 void GlobalSortstring(char * *a,int *ind,int flag,int n,int p,char dir);
 void LexiRowstring(char * *a,int *ind,int flag,int n,int p,char dir);
 void LexiColstring(char * *a,int *ind,int flag,int n,int p,char dir);
+
 #endif /* __QSORT_STRING_H__ */
index 5f73add..d9fc666 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\men_scilab.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\sci_clc.h"
                                >
                        </File>
index 55f78ae..103053d 100644 (file)
@@ -30,6 +30,7 @@ extern void ExportBMP(struct BCG *ScilabGC,char *pszflname);
 extern void Setscig_buzyState(BOOL state);
 extern Scig_deletegwin_handler scig_deletegwin_handler;
 extern Scig_deletegwin_handler set_scig_deletegwin_handler(Scig_deletegwin_handler f);
+extern void SetGHdc(HDC lhdc,int width,int height);
 /*-----------------------------------------------------------------------------------*/
 static void sci_extra_margin(HDC hdc , struct BCG *ScilabGC);
 /*-----------------------------------------------------------------------------------*/
index fd52eb0..8f40729 100644 (file)
                        Filter="h;hpp;hxx;hm;inl"
                        >
                        <File
+                               RelativePath="..\..\includes\constinterp.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\gw_interpolation.h"
                                >
                        </File>
                                RelativePath="..\..\includes\interpolation.h"
                                >
                        </File>
+                       <File
+                               RelativePath=".\someinterp.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index 1e02e90..04ba770 100644 (file)
@@ -2,6 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SOMEINTERP_H__
+#define __SOMEINTERP_H__
 
 /**
  * TODO : comment 
@@ -17,3 +19,5 @@
 void nlinear_interp(double **x , double val[], int dim[], int n,
                    double **xp, double yp[], int np, int outmode, 
                                        double u[], double v[], int ad[], int k[]);
+
+#endif /* __SOMEINTERP_H__ */
index ac4a156..8fa277e 100644 (file)
@@ -2,8 +2,9 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __GETENVC_H__
+#define __GETENVC_H__
 #include "machine.h"
-#include "sciprint.h"
 
 /**
  * Retrieve a system variable 
@@ -15,3 +16,4 @@
  */
 void C2F(getenvc)(int *ierr,char *var,char *buf,int *buflen,int *iflag);
 
+#endif /* __GETENVC_H__ */
\ No newline at end of file
index bb548dd..ef787bb 100644 (file)
@@ -2,10 +2,15 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __INTFILESTAT_H__
+#define __INTFILESTAT_H__
 
+#include "machine.h"
 /**
  * TODO 
  * @param fname
  * @return 
  */
 int C2F(intfilestat)(char * fname,unsigned long fname_len);
+
+#endif /* __INTFILESTAT_H__ */
\ No newline at end of file
index 092f542..c062016 100644 (file)
@@ -2,7 +2,9 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
-
+#ifndef __INTSETENV_H__
+#define __INTSETENV_H__
+#include "machine.h"
 /**
  * TODO
  * @param[in]
@@ -10,3 +12,5 @@
  */
 
 int    C2F(intsetenv) _PARAMS((char *fname, unsigned long len));
+
+#endif /* __INTSETENV_H__ */
index 22a7a3a..9b55815 100644 (file)
@@ -2,5 +2,11 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SCI_SETENV_H__
+#define __SCI_SETENV_H__
+
+#include "machine.h"
 
 int C2F(sci_setenv) _PARAMS((char *fname,unsigned long fname_len));
+
+#endif /* __SCI_SETENV_H__ */
\ No newline at end of file
index 4e6e4a7..7dc9e8c 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\directories.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\getenvc.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath="..\..\includes\setenvc.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\setenvc.h"
                                >
                        </File>
index 893f218..85ebaff 100644 (file)
@@ -1,6 +1,8 @@
 /**************************************
  * Sylvestre Ledru - INRIA 2007
  **************************************/
+#ifndef __GSCHUR_H__
+#define __GSCHUR_H__
 
 #include "linear_FTables.h"
 
@@ -38,3 +40,5 @@ FTAB FTab_gshsel[] ={
 {"sb02ow", (voidf)  C2F(sb02ow)},
 {"sb02ox", (voidf)  C2F(sb02ox)},
 {(char *) 0, (voidf) 0}};
+
+#endif /* __GSCHUR_H__ */
\ No newline at end of file
index 3956d64..d445fab 100644 (file)
@@ -1,6 +1,8 @@
 /**************************************
  * Sylvestre Ledru - INRIA 2007
  **************************************/
+#ifndef __LINEAR_FTABLES_H__
+#define __LINEAR_FTABLES_H__
 
 #include "machine.h"
 
@@ -15,3 +17,5 @@ typedef struct {
   char *name;
   voidf f;
 } FTAB;
+
+#endif /* __LINEAR_FTABLES_H__ */
index 780d5c4..d86af90 100644 (file)
@@ -1,6 +1,8 @@
 /**************************************
  * Sylvestre Ledru - INRIA 2007
  **************************************/
+#ifndef __SCHUR_H__
+#define __SCHUR_H__
 
 #include "machine.h"
 #include "linear_FTables.h"
@@ -39,3 +41,5 @@ FTAB FTab_zchsel[] ={
 {"zb02mv", (voidf)  C2F(zb02mv)},
 {"zb02mw", (voidf)  C2F(zb02mw)},
 {(char *) 0, (voidf) 0}};
+
+#endif /* __SCHUR_H__ */
\ No newline at end of file
index aa65181..e635659 100644 (file)
                                RelativePath=".\hashtable_metanet.h"
                                >
                        </File>
+                       <File
+                               RelativePath=".\paths.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index 38921df..5fbd361 100644 (file)
@@ -2,6 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/ 
+#ifndef __PATHS_H__
+#define __PATHS_H__
 
 #include "machine.h"
 
@@ -55,3 +57,5 @@ void C2F(edge2st)(int *n,int *alpha,int **tree,int *treesize);
  */
 
 void C2F(prevn2st)(int *n,int *nodes,int **tree,int *treesize,int *la,int *lp,int *ls);
+
+#endif /* __PATHS_H__ */
index 391edf0..a6a5dc9 100644 (file)
                                RelativePath=".\src\c\sci_pvm.h"
                                >
                        </File>
+                       <File
+                               RelativePath=".\src\c\sci_tools.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index 9542fa0..4dcd5e7 100644 (file)
@@ -2,7 +2,10 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SPALLOCATE_H__
+#define __SPALLOCATE_H__
 
+#include "spDefs.h"
 
 static int InitializeElementBlocks( MatrixPtr  Matrix, int InitialNumberOfElements, int NumberOfFillinsExpected );
 
@@ -13,3 +16,5 @@ static int AllocateBlockOfAllocationList( MatrixPtr Matrix );
 ElementPtr spcGetElement( MatrixPtr Matrix );
    
 ElementPtr spcGetFillin( MatrixPtr  Matrix );
+
+#endif /* __SPALLOCATE_H__ */
\ No newline at end of file
index 4003c17..48cc996 100644 (file)
@@ -2,6 +2,10 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SPBUILD_H__
+#define __SPBUILD_H__
+
+#include "spDefs.h"
 
 static void Translate( MatrixPtr Matrix, int *Row, int *Col );
 
@@ -14,3 +18,5 @@ ElementPtr spcFindElementInCol( MatrixPtr Matrix, register ElementPtr *LastAddr,
 ElementPtr spcCreateElement( MatrixPtr Matrix, int Row, register int Col, register ElementPtr  * LastAddr, SPBOOLEAN Fillin );
 
 int spcLinkRows( MatrixPtr Matrix );
+
+#endif /* __SPBUILD_H__ */
\ No newline at end of file
index c6bdf23..64a1598 100644 (file)
@@ -2,6 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SPFACTOR_H__
+#define __SPFACTOR_H__
 
 #include "spConfig.h"
 #include "spmatrix.h"
@@ -32,3 +34,4 @@ static int MatrixIsSingular( MatrixPtr Matrix, int Step );
 static int ZeroPivot( MatrixPtr Matrix, int Step );
 
 
+#endif /* __SPFACTOR_H__ */
index 9528eef..090bfae 100644 (file)
@@ -2,7 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre Ledru */
 /*-----------------------------------------------------------------------------------*/
-
+#ifndef __SPFORTRAN_H__
+#define __SPFORTRAN_H__
 
 /*
  *  Routine Renaming
@@ -107,3 +108,4 @@ void sfStripFills( long *Matrix );
 void sfClear( long *Matrix );
 
 
+#endif /* __SPFORTRAN_H__ */
\ No newline at end of file
index af3ecbf..f805c87 100644 (file)
@@ -2,9 +2,13 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef __SPSOLVE_H__
+#define __SPSOLVE_H__
 #include "spConfig.h"
 #include "spmatrix.h"
 #include "spDefs.h"
 
 static void SolveComplexMatrix( MatrixPtr Matrix, RealVector RHS, RealVector Solution IMAG_VECTORS );
 static void SolveComplexTransposedMatrix(MatrixPtr Matrix, RealVector RHS, RealVector Solution IMAG_VECTORS );
+
+#endif /* __SPSOLVE_H__ */
\ No newline at end of file
index e890b2d..7feee66 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath=".\spAllocate.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\spBuild.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\spConfig.h"
                                >
                        </File>
                                >
                        </File>
                        <File
+                               RelativePath=".\spFactor.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\spFortran.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\spmalloc.h"
                                >
                        </File>
                                RelativePath="..\..\includes\spmatrix.h"
                                >
                        </File>
+                       <File
+                               RelativePath=".\spSolve.h"
+                               >
+                       </File>
+                       <File
+                               RelativePath=".\spUtils.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index 1455ba6..1c88e24 100644 (file)
                        Filter="h;hpp;hxx;hm;inl"
                        >
                        <File
+                               RelativePath="..\..\includes\gw_special_functions1.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\sci_gateway\c\gw_special_functions1.h"
                                >
                        </File>
+                       <File
+                               RelativePath="..\..\includes\gw_special_functions2.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index 0608ec9..3faa452 100644 (file)
@@ -3,6 +3,8 @@
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
 
+#ifndef __CDFBASE_H__
+#define __CDFBASE_H__
 
 /**
  * TODO : needs comments
@@ -19,3 +21,5 @@
  */
 
 int  CdfBase(char *fname,int inarg,int oarg,int *callpos,char *option,char *errnames,int which,int (*fonc)(),void (*foncErr)() );
+
+#endif /* __CDFBASE_H__ */
index 5379ad5..68b555c 100644 (file)
@@ -2,6 +2,8 @@
 /* INRIA 2007 */
 /* Sylvestre LEDRU */
 /*-----------------------------------------------------------------------------------*/
+#ifndef  __IPMPAR1_H__
+#define __IPMPAR1_H__
 
 #include "machine.h"
 
@@ -10,3 +12,5 @@
  * @return
  */
 int C2F(largestint)(void);
+
+#endif /* __IPMPAR1_H__ */
index 6e26828..2f4fd9e 100644 (file)
                        Filter="h;hpp;hxx;hm;inl"
                        >
                        <File
+                               RelativePath=".\CdfBase.h"
+                               >
+                       </File>
+                       <File
                                RelativePath="..\..\includes\gw_statistics.h"
                                >
                        </File>
+                       <File
+                               RelativePath=".\ipmpar1.h"
+                               >
+                       </File>
                </Filter>
                <Filter
                        Name="localization"
index c994ab2..049b078 100644 (file)
                                >
                        </File>
                        <File
+                               RelativePath=".\src\c\DDE.h"
+                               >
+                       </File>
+                       <File
                                RelativePath=".\src\c\FindFileAssociation.h"
                                >
                        </File>