1234567891011121314151617181920 |
- /*
- * lexget.c
- *
- * Bob Denny 28-Aug-82 Move stdio dependencies to lexerr(), lexget(),
- * lexech() and mapch(). This is one of 4 modules
- * in lexlib which depend upon the standard I/O package.
- *
- * Scott Guthery 20-Nov-83 Adapt for IBM PC & DeSmet C.
- */
- #include <stdio.h>
- #include <lex.h>
- extern char expression[4096];
- extern int pos;
- lexgetc()
- {
- char c = expression[pos];
- if (c) pos++;
- return( c != 0 ? c : -1);
- }
|