home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / compiler / small_c / byte_sc / ungetc.c < prev    next >
Encoding:
Text File  |  1987-10-04  |  384 b   |  14 lines
  1. #define NOCCARGC  /* no argument count passing */
  2. #include stdio.h
  3. extern Unextc[];
  4. /*
  5. ** Put c back into file fd.
  6. ** Entry:  c = character to put back
  7. **        fd = file descriptor
  8. ** Returns c if successful, else EOF.
  9. */
  10. ungetc(c, fd) int c, fd; {
  11.   if(!Umode(fd) || Unextc[fd]!=EOF || c==EOF) return (EOF);
  12.   return (Unextc[fd] = c);
  13.   }
  14.