wf.c File Reference

#include <ctype.h>
#include <errno.h>
#include <liberrno.h>
#include <fortran.h>
#include <memory.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <cray/fmtconv.h>
#include <cray/format.h>
#include <cray/nassert.h>
#include <sys/unistd.h>
#include <cray/clibinc_config.h>
#include "fio.h"
#include "fmt.h"
#include "fstats.h"
#include "f90io.h"
#include "lio.h"

Include dependency graph for wf.c:

Go to the source code of this file.

Defines
#define	BLANK   ((long) ' ')
#define	ZERO   ((long) '0')
Functions
int	_dw_endrec (FIOSPTR css, unit *cup, int count)
int	_iw_endrec (FIOSPTR css, unit *cup, int count)
int	_sw_endrec (FIOSPTR css, unit *cup, int count)
int	_nonadv_partrec (FIOSPTR css, unit *cup)
int	_nonadv_endrec (FIOSPTR css, unit *cup)
int	_lw_after_nonadv (FIOSPTR css, unit *cup, int linelimit, int namelist)
void	_wf_setup (void)
Variables
short	_newrec_listio_after_nonadvancing = 0

---

Define Documentation

#define BLANK   ((long) ' ')

Definition at line 75 of file wf.c.

Referenced by _dw_endrec(), _iw_endrec(), _lw_after_nonadv(), and _nonadv_partrec().

#define ZERO   ((long) '0')

Definition at line 77 of file wf.c.

---

Function Documentation

int _dw_endrec	(	FIOSPTR	css,
		unit *	cup,
		int	count
	)

Definition at line 793 of file wf.c.

References _fwch(), BLANK, errno, fiostate::iostate::fmt, FULL, fiostate::iostate::fmtstate::leftablim, NULL, RERROR, fiostate::u, unit_s::udalast, unit_s::udamax, unit_s::ulinebuf, unit_s::ulinecnt, unit_s::ulinemax, unit_s::ulineptr, and unit_s::urecl.

Referenced by _FWF().

Here is the call graph for this function:

int _iw_endrec	(	FIOSPTR	css,
		unit *	cup,
		int	count
	)

Definition at line 866 of file wf.c.

References BLANK, FEWRIEND, fiostate::iostate::fmt, fiostate::iostate::fmtstate::icl, fiostate::iostate::fmtstate::icp, fiostate::iostate::fmtstate::iiae, fiostate::iostate::fmtstate::leftablim, NULL, RERROR, fiostate::u, unit_s::ulinebuf, unit_s::ulinecnt, unit_s::ulinemax, and unit_s::ulineptr.

Referenced by _FWF().

int _lw_after_nonadv	(	FIOSPTR	css,
		unit *	cup,
		int	linelimit,
		int	namelist
	)

Definition at line 1076 of file wf.c.

References _newrec_listio_after_nonadvancing, _sw_endrec(), BLANK, FEWRLONG, NULL, unit_s::ulinebuf, unit_s::ulinemax, unit_s::ulineptr, and unit_s::urecsize.

Referenced by _FWF(), and _FWN().

Here is the call graph for this function:

int _nonadv_endrec	(	FIOSPTR	css,
		unit *	cup
	)

Definition at line 1045 of file wf.c.

References _fwch(), errno, FULL, NULL, unit_s::pnonadv, RERROR, unit_s::uflshptr, unit_s::ulinebuf, and unit_s::ulinemax.

Referenced by _BACK(), _EOFW(), _REWF(), and _unit_close().

Here is the call graph for this function:

int _nonadv_partrec	(	FIOSPTR	css,
		unit *	cup
	)

Definition at line 989 of file wf.c.

References _fwch(), BLANK, errno, MIN, NULL, PARTIAL, RERROR, unit_s::uflshptr, unit_s::ulinebuf, unit_s::ulinemax, unit_s::ulineptr, and unit_s::urecsize.

Referenced by _FWF().

Here is the call graph for this function:

int _sw_endrec	(	FIOSPTR	css,
		unit *	cup,
		int	count
	)

Definition at line 937 of file wf.c.

References _fwch(), errno, fiostate::iostate::fmt, FULL, fiostate::iostate::fmtstate::leftablim, fiostate::iostate::fmtstate::nonl, NULL, PARTIAL, RERROR, fiostate::u, unit_s::uflshptr, unit_s::ulinebuf, unit_s::ulinecnt, unit_s::ulinemax, and unit_s::ulineptr.

Referenced by _FWF(), _FWN(), and _lw_after_nonadv().

Here is the call graph for this function:

void _wf_setup

(

void

)

Definition at line 1141 of file wf.c.

References _CRAYLIBS_RELEASE, _newrec_listio_after_nonadvancing, _RCHK, _RCHK77, _RCHK90, _RNOCHK, _rw_mxdgt, _WCHK, _WCHK77, _WCHK90, _WNOCHK, D_ED, DREAL16, DREAL16_P, DREAL8, DREAL8_P, G_ED, getenv(), and NULL.

Referenced by _initialize_fortran_io().

Here is the call graph for this function:

---

Variable Documentation

short _newrec_listio_after_nonadvancing = 0

Definition at line 87 of file wf.c.

Referenced by _lw_after_nonadv(), and _wf_setup().