/* a few library functions needed to compile flow.c with C/80 - ** if you use BDS these are probably in your standard library ** so do not include these in your compilation - ** M.S.E. */ isdigit(c) char c; { if (c >= '0' && c <= '9') return(1); else return(0); } /* test for alphabetic */ isalpha(c) char c; { if (c >= 'a' && c <= 'z') return(1); else if (c >= 'A' && c <= 'Z') return(1); else return(0); } /* simple string compare */ strcmp(s,t) char *s, *t; { while(*s) if (*s++ != *t++) return(1); return(0); }