rsne.c File Reference

#include "f2c.h"
#include "fio.h"
#include "lio.h"
#include "stdlib.h"
#include "string.h"

Include dependency graph for rsne.c:

Go to the source code of this file.

Classes
struct	dimen
struct	hashentry
struct	hashtab
Defines
#define	Const   const
#define	GETC(x)   (x=(*l_getc)())
#define	MAX_NL_CACHE   3 /* maximum number of namelist hash tables to cache */
#define	MAXDIM   20 /* maximum number of subscripts */
#define	un_getc   ungetc
#define	Ungetc(x, y)   (*l_ungetc)(x,y)
Typedefs
typedef struct dimen	dimen
typedef struct hashentry	hashentry
typedef struct hashtab	hashtab
Functions
static int	getdimen (int *chp, dimen *d, ftnlen delta, ftnlen extent, ftnlen *x1)
static int	getname (register char *s, int slen)
static int	getnum (int *chp, ftnlen *val)
static Vardesc *	hash (hashtab *ht, register char *s)
hashtab *	mk_hashtab (Namelist *nl)
static VOID	nl_init (Void)
static Void	print_ne (cilist *a)
integer	s_rsne (cilist *a)
int	t_getc (Void)
int	ungetc (int, FILE *)
int	x_rsne (cilist *a)
Variables
static char	Alpha [256]
static char	Alphanum [256]
static int	colonseen
int	f__lcount
flag	f__lquit
ftnlen	f__typesize []
static int	n_nlcache
static hashtab *	nl_cache
int	nml_read
static char	where0 [] = "namelist read start "
static hashentry **	zot

---

Define Documentation

#define Const   const

Definition at line 55 of file rsne.c.

#define GETC

(

x

)

(x=(*l_getc)())

Definition at line 169 of file rsne.c.

#define MAX_NL_CACHE   3 /* maximum number of namelist hash tables to cache */

Definition at line 5 of file rsne.c.

#define MAXDIM   20 /* maximum number of subscripts */

Definition at line 6 of file rsne.c.

#define un_getc   ungetc

Definition at line 70 of file rsne.c.

#define Ungetc	(		x,
			y
	)		(*l_ungetc)(x,y)

Definition at line 170 of file rsne.c.

---

Typedef Documentation

typedef struct dimen dimen

Definition at line 14 of file rsne.c.

typedef struct hashentry hashentry

Definition at line 21 of file rsne.c.

typedef struct hashtab hashtab

Definition at line 29 of file rsne.c.

---

Function Documentation

static int getdimen	(	int *	chp,
		dimen *	d,
		ftnlen	delta,
		ftnlen	extent,
		ftnlen *	x1
	)		[static]

Definition at line 237 of file rsne.c.

static int getname	(	register char *	s,
		int	slen
	)		[static]

Definition at line 176 of file rsne.c.

static int getnum	(	int *	chp,
		ftnlen *	val
	)		[static]

Definition at line 202 of file rsne.c.

static Vardesc* hash	(	hashtab *	ht,
		register char *	s
	)		[static]

Definition at line 79 of file rsne.c.

hashtab* mk_hashtab

(

Namelist *

nl

)

Definition at line 98 of file rsne.c.

static VOID nl_init

(

Void

)

[static]

Definition at line 153 of file rsne.c.

static Void print_ne

(

cilist *

a

)

[static]

Definition at line 275 of file rsne.c.

integer s_rsne

(

cilist *

a

)

Definition at line 595 of file rsne.c.

int t_getc

(

Void

)

Definition at line 84 of file lread.c.

int ungetc	(	int	,
		FILE *
	)

int x_rsne

(

cilist *

a

)

Definition at line 302 of file rsne.c.

---

Variable Documentation

char Alpha[256] [static]

Definition at line 150 of file rsne.c.

char Alphanum[256] [static]

Definition at line 150 of file rsne.c.

int colonseen [static]

Definition at line 34 of file rsne.c.

int f__lcount

Definition at line 106 of file lread.c.

flag f__lquit

Definition at line 105 of file lread.c.

ftnlen f__typesize[]

Definition at line 6 of file typesize.c.

int n_nlcache [static]

Definition at line 32 of file rsne.c.

hashtab* nl_cache [static]

Definition at line 31 of file rsne.c.

int nml_read

Definition at line 106 of file lread.c.

char where0[] = "namelist read start " [static]

Definition at line 296 of file rsne.c.

hashentry** zot [static]

Definition at line 33 of file rsne.c.