ack/lang/pc/libpc/rln.c

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

extern		_rf();
extern		_incpt();

_rln(f) struct file *f; {

	_rf(f);
	while ((f->flags & ELNBIT) == 0)
		_incpt(f);
	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>`

			`extern _rf();`
			`extern _incpt();`

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

			`_rf(f);`
			`while ((f->flags & ELNBIT) == 0)`
			`_incpt(f);`
			`f->flags &= ~WINDOW;`
			`}`