PXFGETPID(3F) Last changed: 1-6-98
NAMEPXFGETPID - Gets the process ID
SYNOPSIS
SUBROUTINE PXFGETPID (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 PXFGETPID subroutine uses the getpid(2) system call to find the
current 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 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, PXFGETPID returns the current process ID.
program pxftest
integer ipid, ierror
CALL PXFGETPID(ipid, ierror)
if (ierror .eq. 0) then
print *,'pid = ',ipid
else
print *,'error = ',ierror
endif
end
SEE ALSOgetpid(2)
Application Programmer's Library Reference Manual, publication SR-
2165, for the printed version of this man page.