PXFGETGID(3F) Last changed: 1-6-98
NAMEPXFGETGID - Gets the real group ID
SYNOPSIS
SUBROUTINE PXFGETGID (igid, ierror)
INTEGER igid, 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 PXFGETGID subroutine uses the getgid() system call to get the real
group ID.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX, 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:
igid An output integer variable for the real group ID for the
current process.
ierror An output integer variable that contains zero if PXFGETGID was
successful.
EXAMPLES
This example calls PXFGETGID and prints out the current real group ID
and the returned error.
program pxftest
integer igid, ierr
CALL PXFGETGID(igid,ierr)
print *,'igid = ',igid,' ierr = ',ierr
end
SEE ALSO
Application Programmer's Library Reference Manual, publication SR-
2165, for the printed version of this man page.