dfi.c File Reference

#include <errno.h>
#include <liberrno.h>
#include <fortran.h>
#include "fio.h"

Include dependency graph for dfi.c:

Go to the source code of this file.

Defines
#define	ARGS_3   (1 + 2*sizeof(_fcd)/sizeof(long))
#define	ARGS_4   (2 + 2*sizeof(_fcd)/sizeof(long))
#define	ARGS_7   (5 + 2*sizeof(_fcd)/sizeof(long))
#define	ARGS_9   (7 + 2*sizeof(_fcd)/sizeof(long))
Functions
int	$DFI (long *len, _fcd format, _fcd fwa, fmt_type **_arg4, long *_arg5, long *_arg6, fmt_type **pform, long *inumelt, long *inumcfe)

---

Define Documentation

#define ARGS_3   (1 + 2*sizeof(_fcd)/sizeof(long))

Definition at line 54 of file dfi.c.

Referenced by $DFI().

#define ARGS_4   (2 + 2*sizeof(_fcd)/sizeof(long))

Definition at line 55 of file dfi.c.

Referenced by $DFI().

#define ARGS_7   (5 + 2*sizeof(_fcd)/sizeof(long))

Definition at line 56 of file dfi.c.

Referenced by $DFI().

#define ARGS_9   (7 + 2*sizeof(_fcd)/sizeof(long))

Definition at line 57 of file dfi.c.

Referenced by $DFI().

---

Function Documentation

int $DFI	(	long *	len,
		_fcd	format,
		_fcd	fwa,
		fmt_type **	_arg4,
		long *	_arg5,
		long *	_arg6,
		fmt_type **	pform,
		long *	inumelt,
		long *	inumcfe
	)

Definition at line 96 of file dfi.c.

References _cptofcd(), _fcdtocp(), _ferr(), ARGS_3, ARGS_4, ARGS_7, ARGS_9, FEDECDRL, FEINTUNK, IO_ERR, L, and NULL.

Here is the call graph for this function: