#define NOCCARGC
#include stdio.h
#include clib.def
/*
** Write buffer for fd if it has changes.
*/
extern int _status[]; /*error in DDJ*/
ferror(fd) int fd; {
  return(_status[fd] & ERRBIT);
  }