pxfchdir

Date:: 10-20-2011

NAME

PXFCHDIR - Changes the current directory to a specified directory

SYNOPSIS

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

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

IEEE standard interface for FORTRAN 77

DESCRIPTION

The PXFCHDIR subroutine uses the chdir(2) system call to change the current working directory to the specified directory.

When using the Cray Fortran compiler, all arguments must be of default kind unless documented otherwise. The default kind is KIND=4 for integer, real, complex, and logical arguments

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

path: An input character variable or array element containing the new directory.
ilen: An input integer variable containing the length of path in characters. If ilen is zero, all trailing blanks are removed before calling chdir().
ierror: An output integer variable that contains zero if the current working directory was changed or nonzero if the change of directories was not made.

In addition to the errors returned by the chdir system call, PXFCHDIR may return the following errors:

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

EXAMPLES

program test
character*(12) path
integer ilen, ierr
path = 'dir/testdir'
ilen = 0
call pxfchdir(path,ilen,ierr)
if (ierr.ne.0) then
    print *,'FAIL: error from pxfchdir = ',ierr
else
    print *,'PASS: No error from pxfchdir = '
endif
end