21 lines
441 B
C++
21 lines
441 B
C++
|
/*
|
||
|
|
* 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);
|
||
|
|
}
|