This graph shows which files directly or indirectly include this file:

Classes
struct	Inpinfo
struct	Dims
struct	Nlentry
struct	Namelist
Defines
#define	NVLESS 077
#define	NV32I 04027
#define	NV64I 04077
#define	NVREAL 06077
#define	NVDOUB 06177
#define	WLESS 23
#define	W32I 11
#define	W64I 23
#define	WREAL 23
#define	WDOUB 40
#define	WCOMP 50
#define	MAXDIMS 10
#define	MAXNAML 31
#define	RNL_ERROR -3
#define	RERR(css, n)
#define	RERR2(css, n, m)
#define	RERR3(css, n, m, t)
#define	RNLERROR(s)
#define	ISSPTB(c) (((c) == ' ') \|\| ((c) == '\t'))
#define	MIN(a, b) ((a) < (b) ? (a) : (b))
#define	MATCH(c, a, b) (a[(c >= 0x3f) ? b+1 : b] & (1 << (IND(c))))
#define	TOGGLE_CHAR(c, cat, val)
#define	IND(c) ((c >= 0x3f) ? 0x7f - (unsigned)c : (unsigned)(0x40 - c - 1))
#define	Nreturn(n)
#define	NEND(css, n)
#define	TRUE (_btol(1))
#define	FALSE (_btol(0))
#define	LGET(x)
#define	CMNTLGET(x)
#define	MAINLGET(x)
#define	MAINCMNTLGET(x)
#define	MRNLDELIM 0
#define	MRNLREP 4
#define	MRNLSEP 6
#define	MRNLFLAG 8
#define	MRNLCOMM 10
Variables
long	_wnlrecsiz
long	_BLNKSEP
long	_MASKS []
long	OUT_CHAR
long	OUT_ECHO
long	OUT_EQ
long	OUT_LINE
long	OUT_SEP
unum_t	_OUT_UNIT
long	_SKP_MESS
long	_TYP_CONV

Define Documentation

#define CMNTLGET ( x )

Value:

{ \
        if (!inptr->incnt)                                      \
                if (ss = _rnl_fillrec(cup, echoptr, inptr))     \
                        return(ss);                             \
        x       = (char) *inptr->inptr++;                       \
        if (MATCH(x, _MASKS, MRNLCOMM)) {                       \
                x               = ' ';                          \
                /* start new record next time*/                 \
                inptr->incnt    = 1;                            \
        }                                                       \
        inptr->incnt--;                                         \
}

Definition at line 179 of file rnl.h.

Referenced by g_octhex(), n_getn(), n_getv(), nex_data(), and nl_read().

#define FALSE (_btol(0))

Definition at line 159 of file rnl.h.

#define IND ( c ) ((c >= 0x3f) ? 0x7f - (unsigned)c : (unsigned)(0x40 - c - 1))

Definition at line 136 of file rnl.h.

#define ISSPTB ( c ) (((c) == ' ') || ((c) == '\t'))

Definition at line 99 of file rnl.h.

Referenced by g_charstr(), g_complx(), g_octhex(), isholl(), n_getn(), n_getv(), n_indx(), nex_data(), nl_read(), and RNL().

#define LGET ( x )

Value:

{ \
        if (!inptr->incnt)                                      \
                if (ss = _rnl_fillrec(cup, echoptr, inptr))     \
                        return(ss);                             \
        x       = (char) *inptr->inptr++;                       \
        inptr->incnt--;                                         \
}

Definition at line 171 of file rnl.h.

Referenced by g_charstr(), g_complx(), g_octhex(), get_holl(), get_quoholl(), n_indx(), and nex_data().

#define MAINCMNTLGET ( x )

Value:

{ \
        if (!inptr->incnt)                                      \
                if (ss = _rnl_fillrec(cup, echoptr, inptr)) {   \
                        if (ss == EOF) {                        \
                                NEND(css, FERDNLEF);                    \
                        }                                       \
                        else {                                  \
                                RERR(css, ss);                  \
                        }                                       \
                }                                               \
        x       = (char) *inptr->inptr++;                       \
        if (MATCH(x, _MASKS, MRNLCOMM)) {                       \
                x               = ' ';                          \
                inptr->incnt    = 1;                            \
        }                                                       \
        inptr->incnt--;                                         \
}

Definition at line 212 of file rnl.h.

Referenced by RNL().

#define MAINLGET ( x )

Value:

{ \
        if (!inptr->incnt)                                      \
                if (ss = _rnl_fillrec(cup, echoptr, inptr)) {   \
                        if (ss == EOF) {                        \
                                NEND(css, FERDNLEF);                    \
                        }                                       \
                        else {                                  \
                                RERR(css, ss);                  \
                        }                                       \
                }                                               \
        x       = (char) *inptr->inptr++;                       \
        inptr->incnt--;                                         \
}

Definition at line 198 of file rnl.h.

Referenced by RNL().

#define MATCH	(	c,
		a,
		b
	)		(a[(c >= 0x3f) ? b+1 : b] & (1 << (IND(c))))

Definition at line 116 of file rnl.h.

#define MAXDIMS 10

Definition at line 63 of file rnl.h.

#define MAXNAML 31

Definition at line 64 of file rnl.h.

Referenced by _FRN(), _getname(), _getnlval(), _rnl90to77(), and RNL().

#define MIN	(	a,
		b
	)		((a) < (b) ? (a) : (b))

Definition at line 107 of file rnl.h.

#define MRNLCOMM 10

Definition at line 236 of file rnl.h.

Referenced by _g_charstr(), _nexdata(), g_charstr(), nex_data(), and rnlcomm_().

#define MRNLDELIM 0

Definition at line 232 of file rnl.h.

Referenced by _g_charstr(), _g_complx(), _g_number(), _getname(), _getnlval(), _nexdata(), _rnl90to77(), g_charstr(), n_getn(), nex_data(), RNL(), and rnldelm_().

#define MRNLFLAG 8

Definition at line 235 of file rnl.h.

Referenced by _nlrd_fillrec(), _rnl90to77(), _rnl_fillrec(), and rnlflag_().

#define MRNLREP 4

Definition at line 233 of file rnl.h.

Referenced by _g_charstr(), _getname(), _getnlval(), _indx_nl(), _ishol(), _nexdata(), g_charstr(), isholl(), n_getn(), n_getv(), n_indx(), nex_data(), and rnlrep_().

#define MRNLSEP 6

Definition at line 234 of file rnl.h.

Referenced by _g_charstr(), _g_complx(), _g_number(), _gocthex(), _ishol(), _nexdata(), _nlread(), _rnl90to77(), g_charstr(), g_octhex(), isholl(), nex_data(), nl_read(), RNL(), and rnlsep_().

#define NEND	(	css,
		n
	)

Value:

{               \
        if (endf) {             \
                Nreturn(IO_END);\
        }                       \
        else                    \
                _ferr(css,n);   \
}

Definition at line 145 of file rnl.h.

Referenced by RNL().

#define Nreturn ( n )

Value:

{       \
        ss      = n;    \
        goto ret;       \
}

Definition at line 138 of file rnl.h.

Referenced by RNL().

#define NV32I 04027

Definition at line 49 of file rnl.h.

Referenced by l_convert(), and n_indx().

#define NV64I 04077

Definition at line 50 of file rnl.h.

Referenced by l_convert().

#define NVDOUB 06177

Definition at line 52 of file rnl.h.

Referenced by l_convert().

#define NVLESS 077

Definition at line 48 of file rnl.h.

#define NVREAL 06077

Definition at line 51 of file rnl.h.

Referenced by l_convert().

#define RERR	(	css,
		n
	)

Value:

{       \
        if (errf) {             \
                Nreturn(IO_ERR);\
        }                       \
        else                    \
                _ferr(css,n);   \
}

Definition at line 70 of file rnl.h.

Referenced by l_write(), RNL(), and WNL().

#define RERR2	(	css,
		n,
		m
	)

Value:

{       \
        if (errf) {             \
                Nreturn(IO_ERR);\
        }                       \
        else                    \
                _ferr(css,n,m); \
}

Definition at line 78 of file rnl.h.

Referenced by RNL().

#define RERR3	(	css,
		n,
		m,
		t
	)

Value:

{       \
        if (errf) {             \
                Nreturn(IO_ERR);\
        }                       \
        else                    \
                _ferr(css,n,m,t);       \
}

Definition at line 86 of file rnl.h.

Referenced by RNL().

#define RNL_ERROR -3

Definition at line 68 of file rnl.h.

Referenced by _rnl_fillrec(), l_convert(), and nl_read().

#define RNLERROR ( s )

Value:

{               \
        errno   = s;            \
        return(RNL_ERROR);      \
}

Definition at line 94 of file rnl.h.

Referenced by g_charstr(), g_complx(), g_number(), g_octhex(), get_holl(), get_quoholl(), n_getn(), n_getv(), n_indx(), nex_data(), and nl_read().

#define TOGGLE_CHAR	(	c,
		cat,
		val
	)

Value:

{ \
        if (val)                                                        \
                _MASKS[(c >= 0x3f) ? cat+1 : cat] |= (1 << (IND(c)));   \
        else                                                            \
                _MASKS[(c >= 0x3f) ? cat+1 : cat] &= ~(1 << (IND(c)));  \
}

Definition at line 127 of file rnl.h.

Referenced by rnlcomm_(), rnldelm_(), rnlflag_(), rnlrep_(), and rnlsep_().

#define TRUE (_btol(1))

Definition at line 156 of file rnl.h.

#define W32I 11

Definition at line 57 of file rnl.h.

#define W64I 23

Definition at line 58 of file rnl.h.

#define WCOMP 50

Definition at line 61 of file rnl.h.

#define WDOUB 40

Definition at line 60 of file rnl.h.