Subversion Repositories wimsdev

Rev

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

Rev 3718 Rev 3838
Line 91... Line 91...
91 
    p=getenv("wims_exec_parm");
 91 
    p=getenv("wims_exec_parm");
92 
    if(p==NULL || *p==0) error("No input data.");
 92 
    if(p==NULL || *p==0) error("No input data.");
93 
    snprintf(parmbuf,sizeof(parmbuf),"%s",p);
 93 
    snprintf(parmbuf,sizeof(parmbuf),"%s",p);
94 
    parm();
 94 
    parm();
95 
    req[request].routine();
 95 
    req[request].routine();
96 
    for(i=0;i<regexcnt;i++) if(regexchk[i].isvar==0) free(&(regexchk[i].cmpreg));
 96 
    for(i=0;i<regexcnt;i++) if(regexchk[i].isvar==0) regfree(&(regexchk[i].cmpreg));
97 
    return 0;
 97 
    return 0;
98 
}
 98 
}
99 
 
 99