names.h

把fortran语言编的程序转为c语言编的程序, 运行环境linux

#define CONST_IDENT_MAX 30
#define IO_IDENT_MAX 30
#define ARGUMENT_MAX 30
#define USER_LABEL_MAX 30

#define EQUIV_INIT_NAME "equiv"

#define write_nv_ident(fp,a) wr_nv_ident_help ((fp), (struct Addrblock *) (a))
#define nv_type(x) nv_type_help ((struct Addrblock *) x)

extern char *c_keywords[];

char*	c_type_decl Argdcl((int, int));
void	declare_new_addr Argdcl((Addrp));
char*	new_arg_length Argdcl((Namep));
char*	new_func_length Argdcl((void));
int	nv_type_help Argdcl((Addrp));
char*	temp_name Argdcl((char*, int, char*));
char*	user_label Argdcl((long int));