ack/lang/pc/libpc/rdc.c
1984-07-20 11:03:31 +00:00

14 lines
159 B
C

/* $Header$ */
#include <pc_file.h>
extern _rf();
extern _incpt();
int _rdc(f) struct file *f; {
int c;
_rf(f);
c = *f->ptr;
_incpt(f);
return(c);
}