home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V6 / usr / source / iolib / nodig.c < prev    next >
Encoding:
Text File  |  1975-05-13  |  154 b   |  14 lines
  1. IEH3nodg (ch)
  2. char ch;
  3. {
  4. if (IEH3digt(ch)) return (0);
  5. switch (ch)
  6.     {
  7.     case 'E':
  8.     case 'e':
  9.     case '.': case '+': case '-':
  10.         return (0);
  11.     }
  12. return (1);
  13. }
  14.