ack/lang/pc/libpc/get.c

/* $Header$ */
#include	<pc_file.h>
#include	<pc_err.h>

extern		_rf();
extern		_trp();

_get(f) struct file *f; {

	_rf(f);
	if (f->flags&EOFBIT)
		_trp(EEOF);
	f->flags &= ~WINDOW;
}
added rcsid 1984-07-20 11:03:31 +00:00			`/* $Header$ */`
Initial revision 1984-07-20 10:44:57 +00:00			`#include <pc_file.h>`
			`#include <pc_err.h>`

			`extern _rf();`
			`extern _trp();`

			`_get(f) struct file *f; {`

			`_rf(f);`
			`if (f->flags&EOFBIT)`
			`_trp(EEOF);`
			`f->flags &= ~WINDOW;`
			`}`