PXFCHDIR(3F) Last changed: 1-6-98
NAMEPXFCHDIR - Changes the current directory to a specified directory
SYNOPSIS
CHARACTER*n path
INTEGER ilen, ierror
CALL PXFCHDIR(path, ilen, ierror)
IMPLEMENTATION
UNICOS, UNICOS/mk, and IRIX systems
STANDARDS
IEEE standard interface for FORTRAN 77
DESCRIPTION
On IRIX systems, this routine is in libfortran.so which is linked by
default when compiling programs with the MIPSpro 7 Fortran 90 compiler
or when compiling programs with the -craylibs option to the MIPSpro
7.2 F77 compiler.
The PXFCHDIR subroutine uses the chdir(2) system call to change the
current working directory to the specified directory.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX system, all arguments must be of default
kind unless documented otherwise. On UNICOS and UNICOS/mk, default
kind is KIND=8 for integer, real, complex, and logical arguments; on
IRIX, the default kind is KIND=4.
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(2) 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
SEE ALSOchdir(2)
Application Programmer's Library Reference Manual, publication SR-
2165, for the printed version of this man page.
