PXFSYSCONF(3F) Last changed: 2-24-98
PXFSYSCONF - Retrieves the value of configurable system variables
INTEGER NAME, IVAL, IERROR
CALL PXFSYSCONF (name, ival, ierror)
UNICOS, UNICOS/mk, and IRIX systems
IEEE standard interface for FORTRAN 77
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 PXFSYSCONF routine uses the sysconf() function to retrieve the
current value for the name configurable system variable.
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.
This routine has the following arguments:
name An input integer variable or array element containing the
integer value of a symbolic constant for one of the following
configurable system variables defined in POSIX Std. 1003.1,
section 4.8.1.2:
ARG_MAX
CHILD_MAX
CLK_TCK
NGROUPS_MAX
OPEN_MAX
STREAM_MAX
TZNAME_MAX
_POSIX_JOB_CONTROL
_POSIX_SAVED_IDS
_POSIX_VERSION
The integer value for each of these symbolic constants is
retrieved through the use of PXFCONST or IPXFCONST. The
integer values may be combined through the use of a bitwise
inclusive OR function.
ival An output integer variable that will contain the value of the
system variable name.
ierror An output integer variable that contains zero if PXFSYSCONF
was successful or nonzero if name is an invalid system
variable.
In this example, PXFSYSCONF will retrieve the value of the CLK_TCK
system variable.
program test
integer ival, ierr, iclktck
ival = 0
iclktck = 0
call pxfconst ('CLK_TCK',iclktck,ierr)
if (ierr.ne.0) then
print *,'FAIL: error from pxfconst = ',ierr
goto 9999
endif
call pxfsysconf (iclktck, ival, ierr)
if (ierr.ne.0) then
print *,'FAIL: error from pxfsysconf = ',ierr
else
print *,'PASS: error from pxfsysconf = ',ierr
endif
print *, 'CLK_TCK=',ival
9999 continue
end
Application Programmer's Library Reference Manual, publication
SR-2165, for the printed version of this man page.
PXFCONST(3F)
PXFSYSCONF(3F) Last changed: 2-24-98
PXFSYSCONF - Retrieves the value of configurable system variables
INTEGER NAME, IVAL, IERROR
CALL PXFSYSCONF (name, ival, ierror)
UNICOS, UNICOS/mk, and IRIX systems
IEEE standard interface for FORTRAN 77
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 PXFSYSCONF routine uses the sysconf() function to retrieve the
current value for the name configurable system variable.
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.
This routine has the following arguments:
name An input integer variable or array element containing the
integer value of a symbolic constant for one of the following
configurable system variables defined in POSIX Std. 1003.1,
section 4.8.1.2:
ARG_MAX
CHILD_MAX
CLK_TCK
NGROUPS_MAX
OPEN_MAX
STREAM_MAX
TZNAME_MAX
_POSIX_JOB_CONTROL
_POSIX_SAVED_IDS
_POSIX_VERSION
The integer value for each of these symbolic constants is
retrieved through the use of PXFCONST or IPXFCONST. The
integer values may be combined through the use of a bitwise
inclusive OR function.
ival An output integer variable that will contain the value of the
system variable name.
ierror An output integer variable that contains zero if PXFSYSCONF
was successful or nonzero if name is an invalid system
variable.
In this example, PXFSYSCONF will retrieve the value of the CLK_TCK
system variable.
program test
integer ival, ierr, iclktck
ival = 0
iclktck = 0
call pxfconst ('CLK_TCK',iclktck,ierr)
if (ierr.ne.0) then
print *,'FAIL: error from pxfconst = ',ierr
goto 9999
endif
call pxfsysconf (iclktck, ival, ierr)
if (ierr.ne.0) then
print *,'FAIL: error from pxfsysconf = ',ierr
else
print *,'PASS: error from pxfsysconf = ',ierr
endif
print *, 'CLK_TCK=',ival
9999 continue
end
Application Programmer's Library Reference Manual, publication
SR-2165, for the printed version of this man page.
PXFCONST(3F)
[ Back ]
|
