fortunit.c File Reference

#include <stdlib.h>
#include <cray/nassert.h>
#include "fio.h"

Include dependency graph for fortunit.c:

Go to the source code of this file.

Functions
unit *	_alloc_unit (unum_t unum, int private)
unit *	_search_unit_list (unit *cup, unum_t unum)
unit *	_get_next_unit (unit *prcup, int iflock, int iftask)

---

Function Documentation

unit* _alloc_unit	(	unum_t	unum,
		int	private
	)

Definition at line 69 of file fortunit.c.

References _e_fortran_io_is_init, _fort_unit, _init_unit(), _initialize_e_fortran_io(), cup, errno, FENOMEMY, FLSH_MEM, unit_s::hashlink, MEM_LOCK, MYTASK, NULL, OPEN_UPTR, unit_s::private, UHASH, unit_s::uid, unit_s::uiolock, and unit_s::utid.

Referenced by _f_open(), and _setuptr().

Here is the call graph for this function:

unit* _get_next_unit	(	unit *	prcup,
		int	iflock,
		int	iftask
	)

Definition at line 205 of file fortunit.c.

References _fort_unit, _release_cup(), unit_s::auxlockp, cup, HASH_SIZE, unit_s::hashlink, MEM_LOCK, MYTASK, NULL, OPEN_UPTR, unit_s::private, UHASH, unit_s::uid, unit_s::uiolock, and unit_s::utid.

Referenced by _f_inqu(), _fcleanup(), _flushall(), _mixed_scope(), and _uniqinod().

Here is the call graph for this function:

unit* _search_unit_list	(	unit *	cup,
		unum_t	unum
	)

Definition at line 162 of file fortunit.c.

References unit_s::hashlink, MYTASK, NULL, unit_s::private, unit_s::uid, and unit_s::utid.

Referenced by _get_cup(), and f90_or_f77().