pxfischr(3F)

NAME
     PXFISCHR - Tests for character special file

SYNOPSIS
     LOGICAL FUNCTION PXFISCHR(m)
     INTEGER m

STANDARDS
     IEEE standard interface for FORTRAN 77

DESCRIPTION
     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 PXFISCHR checks if a file is a character special
     file. The argument m should be supplied by the st_mode component of
     the stat structure used by the PXFSTAT(3F) routine.

     All arguments must be of default kind unless documented otherwise.  On
     IRIX, the default kind is KIND=4.

     The following is a valid argument for this routine:

     m    An integer input variable containing the file mode.

     If the file is a character special file, PXFISCHR returns a logical
     true, otherwise a logical false is returned.

NOTES
     The PXF_DEFINITIONS module can be used by Fortran 90 users to enable
     caller-callee interface checking.

EXAMPLES
     In this example, PXFSTAT is called on /dev/tty, which should be a
     character special file. After PXFINTGET(3F) returns the mode of
     /dev/tty, PXFISCHR is called to check the mode of /dev/tty.

     program pxftest
     integer jstat,ierror,mode
     logical pxfischr

     CALL PXFSTRUCTCREATE('stat',jstat,ierror)
     CALL PXFSTAT('/dev/tty',0,jstat,ierror)
     CALL PXFINTGET(jstat,'st_mode', mode, ierror)
      if (PXFISCHR(mode) .eqv. .TRUE.) then
         print *,'/dev/tty is a character special file.'
      else
         print *,'/dev/tty should be a character special file, but is not.'
      endif
     end

     This program may display:

          /dev/tty is a character special file.

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