home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.barnyard.co.uk
/
2015.02.ftp.barnyard.co.uk.tar
/
ftp.barnyard.co.uk
/
cpm
/
walnut-creek-CDROM
/
ENTERPRS
/
CPM
/
UTILS
/
S
/
SMC21LIB.LZH
/
CTELL.C
< prev
next >
Wrap
Text File
|
2000-06-30
|
512b
|
22 lines
#define NOCCARGC
#include stdio.h
#include clib.def
extern int _fcbptr[], _chrpos[];
/*
** Return offset to current 128-byte record
*/
ctell(fd) int fd; {
int *rrn;
if(!_mode(fd) || isatty(fd)) return (-1);
rrn=_fcbptr[fd]+RRNOFF;
return (*rrn);
}
/*
** Return offset to next character in current buffer.
*/
ctellc(fd) int fd; {
return (_chrpos[fd]);
}