Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
Functions | |
void | _init_unit (unit *cup) |
unit * | _init_internal_unit (void) |
unit* _init_internal_unit | ( | void | ) |
Definition at line 98 of file initunit.c.
References _fort_internal_unit, _i_fortran_io_is_init, _init_unit(), _initialize_i_fortran_io(), _LELVL_ABORT, _lerror(), _set_ok_flags(), cup, FENOMEMY, FLSH_MEM, unit_s::hashlink, NULL, OPENLOCK, OPENUNLOCK, OS_NONE, OS_READWRITE, OS_YES, unit_s::uaction, unit_s::ublnk, unit_s::udelim, unit_s::ufmt, unit_s::uid, unit_s::uiolock, unit_s::upad, and unit_s::useq.
void _init_unit | ( | unit * | cup | ) |
Definition at line 69 of file initunit.c.
References FS_DEFAULT, unit_s::ufs, UNIT_HEADER, unit_s::unitchk, unit_s::usysfd, and unit_s::utrunc.
Referenced by _alloc_unit(), and _init_internal_unit().