/*
 * 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);
}