+ if ( unlink( old ) == EOF )
+ {
+ switch ( errno )
+ {
+ /* See the comments on implementation-defined errno values in
+ <_PDCLIB_config.h>.
+ */
+ case EACCES:
+ case EFAULT:
+ case EIO:
+ case EISDIR:
+ case ELOOP:
+ case ENAMETOOLONG:
+ case ENOENT:
+ case ENOMEM:
+ case ENOTDIR:
+ case EPERM:
+ case EROFS:
+ _PDCLIB_errno = _PDCLIB_ERROR;
+ break;
+ default:
+ /* This should be something like EUNKNOWN. */
+ _PDCLIB_errno = _PDCLIB_ERROR;
+ break;
+ }
+ return -1;
+ }
+ else
+ {
+ return 0;
+ }