home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / DLIBSSRC.ZIP / SSCANF.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-10-05  |  404 b   |  26 lines

  1. static int sgetc(s)
  2. unsigned char **s;
  3. /*
  4.  *    Local function to get a character from a string
  5.  */
  6. {
  7.     return(*(*s)++);
  8. }
  9.  
  10. static int sungetc(c, s)
  11. unsigned char c, **s;
  12. /*
  13.  *    Local function to unget a character from a string
  14.  */
  15. {
  16.     return(*--(*s) = c);
  17. }
  18.  
  19. sscanf(buf, fmt, arg)
  20. unsigned char *buf;
  21. unsigned char *fmt;
  22. int arg;
  23. {
  24.     return(_scanf(&buf, sgetc, sungetc, fmt, &arg));
  25. }
  26.