if (rc == E_INTR  ||
    rc == E_NOSPC ||
    rc == E_NOMEM ||
    rc == E_WOULDBLOCK)
{
  handle_error (rc);
}
else
{
  write (file, ptr, length);
}
