home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d1xx / d183 / mklib.lha / Mklib / Edlib / isodigit.c < prev    next >
C/C++ Source or Header  |  1989-02-26  |  281b  |  18 lines
  1. /* edlib  version 1.0 of 04/08/88 */
  2. /*
  3.     returns a nonzero value if c is the code for an octal digit, otherwise
  4.     return zero
  5. */
  6. #include <ctype.h>
  7.  
  8. int isodigit(c)
  9. char c;
  10. {
  11.     if (c == '9' || c == '8') {
  12.         return(0);
  13.     } else {
  14.         return(isdigit(c));
  15.     }
  16. }
  17.  
  18.