Subversion Repositories wimsdev

Rev

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

Rev 8195 Rev 8878
Line 35... Line 35...
35 
      buf[i]=c;
 35 
      buf[i]=c;
36 
    }
 36 
    }
37 
    buf[i]=0;
 37 
    buf[i]=0;
38 
    if(linecnt!=-100000) linecnt++;
 38 
    if(linecnt!=-100000) linecnt++;
39 
    return c;
 39 
    return c;
40 
}
 - 
 
41 
 
 - 
 
42 
double getvar(char *p)
 - 
 
43 
{
 - 
 
44 
    int i;
 - 
 
45 
    for(i=0;i<varcnt && strcmp(p,vartab[i].name)!=0;i++);
 - 
 
46 
    if(i<varcnt) return vartab[i].value;
 - 
 
47 
    else return 0;
 - 
 
48 
}
 40 
}
49 
 
 41 
 
50 
void setvar(char *p, double v)
 42 
void setvar(char *p, double v)
51 
{
 43 
{
52 
    int i;
 44 
    int i;