Subversion Repositories wimsdev

Rev

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

Rev 7676 Rev 8171
Line 131... Line 131...
131 
    for(p1=find_word_start(p);
 131 
    for(p1=find_word_start(p);
132 
      *p1; p1=find_word_start(p2)) {
 132 
      *p1; p1=find_word_start(p2)) {
133 
      for(p2=p1; *p2 && strchr(",;",*p2)==NULL; p2++);
 133 
      for(p2=p1; *p2 && strchr(",;",*p2)==NULL; p2++);
134 
      if(*p2) *p2++=0;
 134 
      if(*p2) *p2++=0;
135 
      d1=strevalue(p1);
 135 
      d1=strevalue(p1);
136 
      if(!finite(d1) || d1<0) {
 136 
      if(!isfinite(d1) || d1<0) {
137 
          char buf[256];
 137 
          char buf[256];
138 
          snprintf(buf,sizeof(buf),"Bad data: %s",p1);
 138 
          snprintf(buf,sizeof(buf),"Bad data: %s",p1);
139 
          error(buf);
 139 
          error(buf);
140 
      }
 140 
      }
141 
      maintab[origcnt++].prob=d1;
 141 
      maintab[origcnt++].prob=d1;