Subversion Repositories wimsdev

Rev

Rev 10075 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 10075 Rev 12011
Line 145... Line 145...
145
 
145
 
146
char *dynsetup(char *ptr, char *end)
146
char *dynsetup(char *ptr, char *end)
147
{
147
{
148
    int i;
148
    int i;
149
    char *p, *pp;
149
    char *p, *pp;
-
 
150
    if(wseed!= NULL) {
-
 
151
      int ws=atoi(wseed)&(0x7FFFFFFF);
-
 
152
      snprintf(ptr,end-ptr,"\nrand(\"state\",%u);\nrand(\"state\",%u);randn(\"state\",%u);rande(\"state\",%u);randg(\"state\",%u);randp(\"state\",%u);",ws,ws,ws,ws,ws,ws);
-
 
153
      ptr+=strlen(ptr);
-
 
154
    }
150
    for(i=0;i<SETUP_NO;i++) {
155
    for(i=0;i<SETUP_NO;i++) {
151
      p=getenv(setups[i].wname);
156
      p=getenv(setups[i].wname);
152
      if(p!=NULL) for(pp=p;*pp;pp++) if(!isspace(*pp) && !isalnum(*pp)) p="";
157
      if(p!=NULL) for(pp=p;*pp;pp++) if(!isspace(*pp) && !isalnum(*pp)) p="";
153
      if(p==NULL || *p==0) p=setups[i].defaultval;
158
      if(p==NULL || *p==0) p=setups[i].defaultval;
154
      snprintf(ptr,end-ptr,"%s(%s)\n",setups[i].setname,p);
159
      snprintf(ptr,end-ptr,"%s(%s)\n",setups[i].setname,p);