Subversion Repositories wimsdev

Rev

Rev 8100 | Rev 8529 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8100 Rev 8120
Line 16... Line 16...
16 
 */
 16 
 */
17 
 
 17 
 
18 
/* Interface Scilab to wims */
 18 
/* Interface Scilab to wims */
19 
 
 19 
 
20 
/*************** Customization: change values hereafter ****************/
 20 
/*************** Customization: change values hereafter ****************/
- 
 
 21 
#include "common.h"
21 
 
 22 
 
22 
/* limit of input/output file sizes */
 23 
/* limit of input/output file sizes */
23 
#define fsizelim 131072
 24 
int fsizelim=131072;
24 
/* This string tells scilab to exit. */
 25 
/* This string tells scilab to exit. */
25 
#define quitstring "\nquit\n"
 26 
char *quitstring="\nquit\n";
26 
/* The way to print a string in the program. */
 27 
/* The way to print a string in the program. */
27 
#define stringprinter "\"%s\"\n"
 28 
char *stringprinter="\"%s\"\n";
28 
/* This is scilab home page. To be kept up to date. */
 29 
/* This is scilab home page. To be kept up to date. */
29 
#define homepage "http://www.scilab.org/"
 30 
#define homepage "http://www.scilab.org/"
30 
/* String to search for answers */
 31 
/* String to search for answers */
31 
 
 32 
 
32 
// old chroot:  char ans_str[]="\n-->";
 33 
// old chroot:  char ans_str[]="\n-->";
Line 39... Line 40...
39 
 
 40 
 
40 
struct {
 41 
struct {
41 
    char *wname; char *defaultval; char *setname;
 42 
    char *wname; char *defaultval; char *setname;
42 
} setups[]={
 43 
} setups[]={
43 
      {"w_scilab_precision", "9", "output_precision"}
 44 
      {"w_scilab_precision", "9", "output_precision"}
44 
};
 45 
};
45 
 
 46 
 
46 
/* names which are not allowed */
 47 
/* names which are not allowed */
47 
char *illegal[]={
 48 
char *illegal[]={
48 
};
 49 
};
- 
 
 50 
 
- 
 
 51 
int illegal_no=(sizeof(illegal)/sizeof(illegal[0]));
49 
 
 52 
 
50 
/* name parts which are not allowed */
 53 
/* name parts which are not allowed */
51 
char *illpart[]={
 54 
char *illpart[]={
52 
};
 55 
};
- 
 
 56 
 
- 
 
 57 
int illpart_no=(sizeof(illpart)/sizeof(illpart[0]));
53 
 
 58 
 
54 
/***************** Nothing should need change hereafter *****************/
 59 
/***************** Nothing should need change hereafter *****************/
55 
 
 60 
 
56 
#define progname "scilab"
 61 
char *progname="scilab";
57 
#include "common.h"
 - 
 
58 
#include "common.c"
 - 
 
59 
 
 62 
 
60 
/* check for security violations in command string */
 63 
/* check for security violations in command string */
61 
void check_parm(char *p)
 64 
void check_parm(char *p)
62 
{
 65 
{
63 
    char *pp, *s;
 66 
    char *pp, *s;