fortio.h File Reference

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Defines
#define	FIO_SF   1 /* sequential formatted */
#define	FIO_SU   2 /* sequential unformatted */
#define	FIO_DF   3 /* direct formatted */
#define	FIO_DU   4 /* direct unformatted */
#define	FS_DEFAULT   0 /* file structure not yet determined */
#define	STD   1 /* stdio compatible unblocked or text */
#define	FS_PURE   2 /* pure data (CRAY-2 only) */
#define	FS_COS   3 /* COS blocked */
#define	FS_U   4 /* unblocked -s u */
#define	FS_BIN   5 /* unblocked -s bin (YMP only) */
#define	FS_TAPE   6 /* interchange tape */
#define	FS_FDC   7 /* FFIO file */
#define	FS_TAPE50   8 /* interchange tape (special rls 5.0) */
#define	FS_TEXT   9 /* newline terminated records */
#define	FS_UNBLOCKED   10 /* no record blocking */
#define	FS_AUX   11 /* an auxiliary type of i/o (e.g. aqio) */
#define	FS_F77   12 /* unformatted structure on workstations*/
#define	MXUNITSZ   32 /* Max. size of file name: sizeof("fort.nnn") */
#define	FIO_METHOD(_C)
#define	FIO_STRUCT(_C)
Typedefs
typedef long long	unum_t
typedef long long	recn_t

---

Define Documentation

#define FIO_DF   3 /* direct formatted */

Definition at line 60 of file fortio.h.

#define FIO_DU   4 /* direct unformatted */

Definition at line 61 of file fortio.h.

#define FIO_METHOD

(

_C

)

Value:

( ((_C) == FIO_SF)?                     \
                "sequential formatted"          \
        :( ((_C) == FIO_SU)?                    \
                "sequential unformatted"        \
        :( ((_C) == FIO_DF)?                    \
                "direct formatted"              \
        :( ((_C) == FIO_DU)?                    \
                "direct unformatted"            \
        :                                       \
                NULL                            \
        ))))

Definition at line 101 of file fortio.h.

Referenced by _fcontext().

#define FIO_SF   1 /* sequential formatted */

Definition at line 58 of file fortio.h.

#define FIO_STRUCT

(

_C

)

Value:

( ((_C) == FS_TEXT)?                    \
                "text"                          \
        :( ((_C) == FS_COS)?                    \
                "COS blocked"                   \
        :( ((_C) == FS_UNBLOCKED)?              \
                "unblocked"                     \
        :( ((_C) == FS_PURE)?                   \
                "pure data"                     \
        :( ((_C) == FS_U)?                      \
                "unblocked"                     \
        :( ((_C) == FS_BIN)?                    \
                "unblocked"                     \
        :( ((_C) == FS_TAPE)?                   \
                "tape"                          \
        :( ((_C) == FS_TAPE50)?                 \
                "tape"                          \
        :( ((_C) == STD)?                       \
                "unblocked or text"             \
        :( ((_C) == FS_F77)?                    \
                "UNIX blocked"                  \
        :( ((_C) == FS_FDC)?                    \
                "FFIO"                          \
        :                                       \
                NULL                            \
        )))))))))))

Definition at line 121 of file fortio.h.

Referenced by _fcontext().

#define FIO_SU   2 /* sequential unformatted */

Definition at line 59 of file fortio.h.

#define FS_AUX   11 /* an auxiliary type of i/o (e.g. aqio) */

Definition at line 79 of file fortio.h.

Referenced by __OPN(), __setpos64(), _clruptr(), _deduce_fstruct(), _fcleanup(), _flushall(), _frch(), _frwd(), _fwwd(), _get_mismatch_error(), _GETPOS_(), _REWF(), _RUI(), _setpos(), _setuptr(), _UNIT_(), _unit_bksp(), _unit_close(), _WUI(), ftellf90_8_(), and ftellf90_8_4_().

#define FS_BIN   5 /* unblocked -s bin (YMP only) */

Definition at line 73 of file fortio.h.

Referenced by _deduce_fstruct(), _f_opn(), _REWF(), _unit_bksp(), and _unit_seek().

#define FS_COS   3 /* COS blocked */

Definition at line 71 of file fortio.h.

Referenced by _deduce_fstruct(), _f_open(), and _f_opn().

#define FS_DEFAULT   0 /* file structure not yet determined */

Definition at line 67 of file fortio.h.

Referenced by _init_unit().

#define FS_F77   12 /* unformatted structure on workstations*/

Definition at line 80 of file fortio.h.

Referenced by _deduce_fstruct(), _f_open(), and _f_opn().

#define FS_FDC   7 /* FFIO file */

Definition at line 75 of file fortio.h.

Referenced by __setpos64(), _deduce_fstruct(), _do_open(), _EOFW(), _f_open(), _f_opn(), _fcontext(), _frch(), _FRU(), _frwd(), _fwch(), _FWU(), _fwwd(), _GETPOS_(), _rb(), _REWF(), _RUF(), _setpos(), _UNIT_(), _unit_bksp(), _unit_close(), _unit_scratch(), _unit_seek(), _unit_trunc(), _wb(), _WUF(), flush_(), ftellf90_8_(), ftellf90_8_4_(), and SKIPF().

#define FS_PURE   2 /* pure data (CRAY-2 only) */

Definition at line 70 of file fortio.h.

Referenced by _deduce_fstruct().

#define FS_TAPE   6 /* interchange tape */

Definition at line 74 of file fortio.h.

Referenced by _deduce_fstruct(), _f_open(), _f_opn(), and _unit_seek().

#define FS_TAPE50   8 /* interchange tape (special rls 5.0) */

Definition at line 76 of file fortio.h.

Referenced by _f_opn().

#define FS_TEXT   9 /* newline terminated records */

Definition at line 77 of file fortio.h.

Referenced by __setpos64(), _deduce_fstruct(), _do_open(), _EOFW(), _f_open(), _f_opn(), _frch(), _fwch(), _GETPOS_(), _REWF(), _setpos(), _unit_bksp(), _unit_close(), _unit_seek(), _unit_trunc(), flush_(), ftellf90_8_(), and ftellf90_8_4_().

#define FS_U   4 /* unblocked -s u */

Definition at line 72 of file fortio.h.

Referenced by _deduce_fstruct(), and _f_opn().

#define FS_UNBLOCKED   10 /* no record blocking */

Definition at line 78 of file fortio.h.

Referenced by _deduce_fstruct(), _f_open(), and _f_opn().

#define MXUNITSZ   32 /* Max. size of file name: sizeof("fort.nnn") */

Definition at line 86 of file fortio.h.

Referenced by _f_inqu(), _f_open(), _rnl90to77(), and RNL().

#define STD   1 /* stdio compatible unblocked or text */

Definition at line 69 of file fortio.h.

Referenced by __setpos64(), _deduce_fstruct(), _do_open(), _EOFW(), _f_open(), _f_opn(), _frch(), _frwd(), _fwch(), _FWU(), _fwwd(), _GETPOS_(), _REWF(), _setpos(), _unit_bksp(), _unit_close(), _unit_seek(), _unit_trunc(), _WUF(), flush_(), ftellf90_8_(), ftellf90_8_4_(), usdumplockf90_(), usdumplockf90_8_(), usdumpsemaf90_(), and usdumpsemaf90_8_().

---

Typedef Documentation

typedef long long recn_t

Definition at line 172 of file fortio.h.

typedef long long unum_t

Definition at line 171 of file fortio.h.