home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d2xx / d218 / edlib.lha / EdLib / isodigit.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-06-04  |  425 b   |  23 lines
  1. /*
  2.  * edlib v1.1 Copyright 1989 Edwin Hoogerbeets
  3.  * This code is freely redistributable as long as no charge other than
  4.  * reasonable copying fees are levied for it.
  5.  */
  6.  
  7. /*
  8.     returns a nonzero value if c is the code for an octal digit, otherwise
  9.     return zero
  10. */
  11. #include <ctype.h>
  12.  
  13. int isodigit(c)
  14. register char c;
  15. {
  16.     if (c == '9' || c == '8') {
  17.         return(0);
  18.     } else {
  19.         return(isdigit(c));
  20.     }
  21. }
  22.  
  23.