Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
Functions | |
_CLS (_f_int *unump, _f_int *iostat, int *err, _fcd status) | |
int | _CLOSE (struct close_spec_list *c) |
int _CLOSE | ( | struct close_spec_list * | c | ) |
Definition at line 163 of file cls.c.
References _CLS(), close_spec_list::err, close_spec_list::iostat, close_spec_list::status, close_spec_list::unit, and close_spec_list::version.
Definition at line 66 of file cls.c.
References _fcdlen(), _fcdtocp(), _ferr(), _UERRF, _UIOSTF, _unit_close(), CFT77_RETVAL, CLST_DELETE, CLST_KEEP, CLST_UNSPEC, cup, FECLSTAT, FECLSTIV, GOOD_UNUM, IO_ERR, IO_OKAY, MEM_UNLOCK, NULL, OPENLOCK, OPENUNLOCK, RSVD_UNUM, STMT_BEGIN, STMT_END, T_CLOSE, unit_s::uflag, unit_s::uiolock, and unit_s::uscrtch.
Referenced by _CLOSE().