pxfrmdir

Date:: 10-20-2011

NAME

PXFRMDIR - Removes a directory entry

SYNOPSIS

CHARACTER*n path
INTEGER ilen, ierror
CALL PXFRMDIR(path, ilen, ierror)

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

IEEE Std 1003.9-1992 standard interface for FORTRAN 77

DESCRIPTION

The PXFRMDIR subroutine uses the rmdir(2) function to remove a directory entry for the named file.

All arguments must be of default kind unless documented otherwise. Default kind is KIND=4 for integer, real, complex, and logical arguments.

The following is a list of valid arguments for this routine:

path: An input character variable or array element containing the name of a file.
ilen: An input integer variable containing the length of path in characters. If ilen is zero, all trailing blanks are removed before calling rmdir.
ierror: An output integer variable that contains a status of zero if the named file was removed.

In addition to the errors returned by the rmdir(2) system call, PXFRMDIR may return the following errors:

EINVAL: If ilen less than 0 or ilen is greater than LEN(path).
ENOMEM: If PXFRMDIR is unable to obtain memory to copy path

EXAMPLES

program test
character*(12) path
integer ilen, ierror
path = 'testfile'
ilen = 0
CALL PXFRMDIR(path,ilen,ierror)
if (ierror.ne.0) then
    print *,'FAIL: error from pxfrmdir = ',ierror
else
    print *,'PASS: No error from pxfrmdir = '
endif
end