Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
Defines | |
#define | ERET(val) |
Functions | |
long | _GETPOS_ (_f_int *unump, _f_int *arg2, _f_int *arg3, _f_int *arg4) |
{ \ errn = val; \ ret = -1; \ goto getpos_done; \ }
Definition at line 46 of file getpos.c.
Referenced by _GETPOS_().
long _GETPOS_ | ( | _f_int * | unump, |
_f_int * | arg2, | ||
_f_int * | arg3, | ||
_f_int * | arg4 | ||
) |
Definition at line 84 of file getpos.c.
References _dshiftr(), _ferr(), _imp_open(), cup, ERET, FP::fdc, FEARGCNT, FEBIONDA, FEBIOSNT, FEINTFST, FEMIXAUX, FFC_SEEKA, FP_BSEEK, FP_GETPOS, FS_AUX, FS_FDC, FS_TEXT, len, NO, NULL, ret, SEQ, stat, STD, FP::std, STMT_BEGIN, STMT_END, ffsw::sw_error, T_GETPOS, unit_s::uffsw, unit_s::uflagword, unit_s::ufmt, unit_s::ufp, unit_s::ufs, UNF, unit_s::useq, and WAITIO.