ack/lang/cem/cemcom.ansi/input.c

36 lines
616 B
C
Raw Permalink Normal View History

1989-02-07 11:04:05 +00:00
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
1994-06-27 08:03:14 +00:00
/* $Id$ */
1989-02-07 11:04:05 +00:00
#include "parameters.h"
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
1989-02-07 11:04:05 +00:00
#include "file_info.h"
#include "input.h"
#include "error.h"
1989-02-07 11:04:05 +00:00
#define INP_PUSHBACK 3
#define INP_TYPE struct file_info
#define INP_VAR finfo
struct file_info finfo;
#include <inp_pkg.body>
#include <alloc.h>
1989-02-07 11:04:05 +00:00
int NoUnstack;
int AtEoIT(void)
1989-02-07 11:04:05 +00:00
{
return 0;
}
1993-01-18 15:10:01 +00:00
extern char *source;
int AtEoIF(void)
1989-02-07 11:04:05 +00:00
{
if (NoUnstack) lexerror("unexpected EOF");
return 0;
}