PXFGETPPID(3F) Last changed: 1-6-98
NAME
PXFGETPPID - Gets the parent process ID
SYNOPSIS
SUBROUTINE PXFGETPPID (ipid, ierror)
INTEGER ipid, 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 PXFGETPPID subroutine uses the getppid(2) system call to find the
parent process ID.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX systems, 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 routine:
ipid An output integer variable that contains the parent process
ID of the current process.
ierror An output integer variable that contains a status of zero if
the process ID was successfully acquired.
EXAMPLES
In this example, PXFGETPPID returns the current process' parent
process ID.
program pxftest
integer ipid, ierror
CALL PXFGETPPID(ipid, ierror)
if (ierror .eq. 0) then
print *,'pid = ',ipid
else
print *,'error = ',ierror
endif
end
SEE ALSOgetppid(2)
Application Programmer's Library Reference Manual, publication SR-
2165, for the printed version of this man page.
