Subversion Repositories wimsdev

Rev

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

Rev 8863 Rev 8880
Line 768... Line 768...
768 
 
 768 
 
769 
    va_start(vp,fn);
 769 
    va_start(vp,fn);
770 
    vsnprintf(buf,sizeof(buf),fn,vp); va_end(vp);
 770 
    vsnprintf(buf,sizeof(buf),fn,vp); va_end(vp);
771 
    l=stat(buf,&st); if(l) return -1;
 771 
    l=stat(buf,&st); if(l) return -1;
772 
    return st.st_size;
 772 
    return st.st_size;
- 
 
 773 
}
- 
 
 774 
 
- 
 
 775 
char *parend(char *p)
- 
 
 776 
{
- 
 
 777 
    char *pp; int t;
- 
 
 778 
    t=0; for(pp=p;*pp;pp++) {
- 
 
 779 
      if(*pp=='(') t++;
- 
 
 780 
      if(*pp==')') {t--; if(t==0) return pp; if(t<0) return NULL;}
- 
 
 781 
    }
- 
 
 782 
    return NULL;
- 
 
 783 
}
- 
 
 784 
 
- 
 
 785 
char *bufprep(char *p)
- 
 
 786 
{
- 
 
 787 
/*  singlespace(p); strip_trailing_spaces(p); return find_word_start(p); */
- 
 
 788 
    nospace(p); return p;
773 
}
 789 
}