#define NOCCARGC #include stdio.h #include clib.def extern int _status[], _dirty[]; /*error in DDJ*/ /* ** Flush records to disk. ** Entry: fd = File descriptor of pertinent file. ** Returns NULL on success, otherwise ERR. ** References to auxbuf() deleted. */ fflush(fd) int fd; { if(!_mode(fd)) return (ERR); if(!isatty(fd) && _dirty[fd] && _sector(fd, WRTRND)) { _seterr(fd); return (ERR); } return (NULL); }