#include "amiga.h"
#include "files.h"
#include <fcntl.h>

#undef close

int __close(int fd)
{
  struct fileinfo *fi;

  chkabort();
  if (fi = _find_fd(fd))
    {
      int err = fi->close(fi->userinfo, fi->flags & O_NO_CLOSE);

      _free_fd(fd);
      return err;
    }
  return -1;
}

int close(int fd)
{
  return __close(fd);
}