Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
Defines | |
#define | ERROR0(cond, n) |
#define | ERROR1(cond, n, p) |
Functions | |
int | _WUF () |
int | _WUI (_fcd funit, _fcd _arg2, long *err, long *_arg4, _f_int *iostat, _f_int *rec, FIOSPTR cssa) |
int | _WUF (FIOSPTR cssa) |
#define ERROR0 | ( | cond, | |
n | |||
) |
#define ERROR1 | ( | cond, | |
n, | |||
p | |||
) |
Definition at line 392 of file wu.c.
References __tip_null, _ferr(), _fwwd, _UERRC, _UERRF, _UIOSTF, CFT77_RETVAL, cup, errno, error(), fiostate::f_cu, FP::fdc, FEINTUNK, FENOMEMY, free(), FS_FDC, FULL, GET_FIOS_PTR, IO_ERR, IO_OKAY, IOERR, NULL, ret, STD, FP::std, STMT_END, TF_WRITE, unit_s::ublkd, unit_s::udalast, unit_s::udamax, unit_s::uflag, unit_s::ufp, unit_s::ufs, unit_s::uiostat, unit_s::ulrecl, unit_s::urecl, unit_s::urecpos, unit_s::useq, and zero.
int _WUI | ( | _fcd | funit, |
_fcd | _arg2, | ||
long * | err, | ||
long * | _arg4, | ||
_f_int * | iostat, | ||
_f_int * | rec, | ||
FIOSPTR | cssa | ||
) |
Definition at line 100 of file wu.c.
References _ferr(), _imp_open77(), _UERRC, _UERRF, _UIOSTF, _unit_seek(), _WUF(), CFT77_RETVAL, cup, DIR, error(), ERROR0, ERROR1, fiostate::f_iostmt, FP::fdc, FEDIRTIV, FEIOACTV, FEMIXAUX, FEMIXBUF, FENOWRIT, FESEQTIV, FEUNFMIV, FEWRAFEN, FS_AUX, GET_FIOS_PTR, IO_OKAY, NULL, OS_WRITE, SEQ, stat, STMT_BEGIN, ffsw::sw_error, T_WDU, T_WSU, unit_s::uaction, unit_s::udalast, unit_s::udamax, unit_s::uend, unit_s::uflag, unit_s::ufmt, unit_s::ufp, unit_s::ufs, unit_s::uiostat, unit_s::ulastyp, unit_s::umultfil, UNF, unit_s::useq, unit_s::uspcproc, and unit_s::uwrt.