pxfisreg(3F)

NAME
     PXFISREG - Tests for regular file

SYNOPSIS
     LOGICAL FUNCTION PXFISREG(m)
     INTEGER m

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
     F77 compiler.

     The logical function PXFISREG checks if a file is a regular file. The
     argument m should be supplied by the st_mode component of the stat
     structure used by the PXFSTAT(3F) routine.  If the file is a regular
     file, PXFISREG returns a logical true, otherwise a logical false is
     returned.

     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 argument is valid for this routine:

     m    An integer input variable containing the file mode.

EXAMPLES
          program pxftest
          integer jstat,ierror,mode
          logical PXFISREG
          CALL PXFSTRUCTCREATE('stat',jstat,ierror)
          CALL PXFSTAT('/etc/passwd',0,jstat,ierror)
          CALL PXFINTGET(jstat,'st_mode', mode, ierror)
          if (PXFISREG(mode) .eqv. .TRUE.) then
             print *,'passwd is a regular file.'
          else
             print *,'passwd file is not a regular file.'
          endif
          end

SEE ALSO
     PXFINTGET(3F), PXFSTAT(3F), PXFSTRUCTCREATE(3F)

     Application Programmer's Library Reference Manual for the printed
     version of this man page.