Subversion Repositories wimsdev

Rev

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

Rev 8148 Rev 8367
Line 554... Line 554...
554 
void p_parm(char *p[MAX_PARM])
 554 
void p_parm(char *p[MAX_PARM])
555 
{
 555 
{
556 
    parm(p,pt_real);
 556 
    parm(p,pt_real);
557 
}
 557 
}
558 
 
 558 
 
559 
void p_if(char *p[MAX_PARM])
 559 
void _p_if(char *p[MAX_PARM], int type)
560 
{
 560 
{
561 
    char vbuf[MAX_LINELEN+1];
 561 
    char vbuf[MAX_LINELEN+1];
562 
    snprintf(vbuf,sizeof(vbuf),"%s",p[0]); subst(vbuf);
 562 
    snprintf(vbuf,sizeof(vbuf),"%s",p[0]); subst(vbuf);
563 
    if(deftag) repsubst(vbuf);
 563 
    if(deftag) repsubst(vbuf);
564 
    prepcnt=0; parmprep(vbuf, pt_real);
 564 
    prepcnt=0; parmprep(vbuf, pt_real);
- 
 
 565 
    switch(type) {
- 
 
 566 
          case 0: fprintf(outf,"!if %s \n",vbuf); break;
565 
    fprintf(outf,"!if %s \n",vbuf);
 567 
          case 1: fprintf(outf,"!ifval %s \n",vbuf);
- 
 
 568 
    }
566 
}
 569 
}
- 
 
 570 
void p_if(char *p[MAX_PARM]) { return _p_if(p, 0);}
- 
 
 571 
void p_ifval(char *p[MAX_PARM]) { return _p_if(p, 1);}
567 
 
 572 
 
568 
void p_else(char *p[MAX_PARM])
 573 
void p_else(char *p[MAX_PARM])
569 
{
 574 
{
570 
    fprintf(outf,"!else\n");
 575 
    fprintf(outf,"!else\n");
571 
}
 576 
}