#include "defs.h" /* * convert ascii to integer with checking */ geti(s) REG STRING s; { REG INT n = 0; INT minus=0; REG INT radix=10; if(s==0) bad("number missing\n"); if(*s=='-') { minus++; s++; } if(number(s)==0) bad("bad numeric\n"); if(*s=='0') radix=8; while(*s) { n *= radix; n += *s++ - 48; } if(minus) n = -n; return(n); }