cifftnrecs.c File Reference

#include <stdio.h>
#include "cif.m"
#include "cif.h"

Include dependency graph for cifftnrecs.c:

Go to the source code of this file.

Classes
struct	Cif_geometry_dim_entry
struct	Cif_f90_dim_entry
struct	Cif_f90_level_opt_entry
Defines
#define	CIF_VERSION   3
Typedefs
typedef struct Cif_geometry_dim_entry	Cif_geometry_dim
typedef struct Cif_f90_dim_entry	Cif_f90_dim
typedef struct Cif_f90_level_opt_entry	Cif_f90_level_opt
Functions
void	Cif_Error (void)
void	Cif_Cdir_Rec (FILE *c_i_f, int directive_type, int file_id, int line_number, int column_number, int num_copy_vars, long *copy_var_sym_id)
void	Cif_Include_Rec (FILE *c_i_f, int parent_file_id, int line_number, int column_number, int include_file_id)
void	Cif_Srcfile_Rec (FILE *c_i_f, int file_id, int source_form)
void	Cif_Usage_Rec (FILE *c_i_f, int sym_id, int file_id, int line_number, int col_number, int usage_code, int num_other_sym_ids, long *component_sym_id)
void	Cif_EDopts_Rec (FILE *c_i_f, int enable_disable_opts)
void	Cif_Mach_Char_Rec (FILE *c_i_f, char *cpu_type, long memory_speed, long memory_size, int characteristics, long num_memory_banks, long num_cpus, long instruction_buffer_size, long clock_period, long num_cluster_reg_sets, long bank_busy_time, int word_bit_len)
void	Cif_Stmt_Type_Rec (FILE *c_i_f, int stmt_type, int file_id, int line_number, int column_number, int stmt_number)
void	Cif_Continuation_Rec (FILE *c_i_f, int continuation_type, int file_id, int line_number, int column_number)
void	Cif_F90_Callsite_Rec (FILE *c_i_f, int sym_id, int scope_id, int file_id, int line_number, int column_number, int specific_proc_sym_id, int max_num_actual_args, char *arg_sym_id[], int *arg_rank)
void	Cif_F90_Comblk_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int storage_class, int module_sym_id, int common_block_length, int distribution)
void	Cif_F90_Const_Rec (FILE *c_i_f, int sym_id, int scope_id, int scalar_aggregate, char *value, int file_id, int start_line_number, int start_column_number, int end_line_number, int end_column_number)
void	Cif_F90_Entry_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int program_unit_type, int procedure_type, int attributes, int result_sym_id, int module_sym_id, int num_dummy_args, long *dummy_arg_sym_id)
void	Cif_F90_Loop_Rec (FILE *c_i_f, int scope_id, int loop_type, int start_file_id, int start_line_number, int start_column_number, int end_file_id, int end_line_number, int end_column_number, int do_var_sym_id, int term_label_sym_id, int construct_name_sym_id, int end_stmt_num)
void	Cif_F90_Derived_Type_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int derived_type_id, int attributes, int num_components, long *component_sym_id, int module_sym_id)
void	Cif_F90_Label_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int label_class)
void	Cif_F90_Namelist_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int module_sym_id, int num_members, long *member_sym_id)
void	Cif_F90_Object_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int data_type, int symbol_class, int storage_class, int storage_sym_id, int offset, int attributes, int derived_type_id, char *char_len, int num_dimensions, int array_type, Cif_f90_dim *dim, int distribution, int geometry_id, int cri_ptr_sym_id)
void	Cif_F90_Misc_Opts_Rec (FILE *c_i_f, int i_opt_value, int m_opt_value, int V_opt, int t_opt_enabled, int t_opt_value, int num_disabled_msgs, long *msg_num, int num_disabled_cdirs, char *cdir_name[], char *dot_o_name, char *cal_file_name, char *inline_file_name, char *cif_name, int C_opt_flags, int N_opt_value, int num_I_opts, char *I_opt_path_name[], int num_p_opts, char *p_opt_path_name[], int source_form, int R_opt_flags)
void	Cif_F90_Opt_Opts_Rec (FILE *c_i_f, int options, int num_level_opts, Cif_f90_level_opt *level_opt)
void	Cif_F90_Begin_Scope_Rec (FILE *c_i_f, int scope_id, int sym_id, int file_id, int line_number, int column_number, int scope_type, int nesting_level, int parent_scope_id)
void	Cif_F90_End_Scope_Rec (FILE *c_i_f, int scope_id, int file_id, int line_number, int column_number, int scope_in_error)
void	Cif_F90_Scope_Info_Rec (FILE *c_i_f, int scope_id, int attributes, int num_alt_entries, long *alt_entry_sym_id)
void	Cif_F90_Use_Module_Rec (FILE *c_i_f, int module_sym_id, int module_file_id, int flag)
void	Cif_F90_Rename_Rec (FILE *c_i_f, int scope_id, char *name_in_module, int name_in_module_sym_id, int module_sym_id, char *original_name, int original_module_sym_id, long local_name_sym_id)
void	Cif_F90_Int_Block_Rec (FILE *c_i_f, char *name, int sym_id, int scope_id, int int_block_type, int attributes, int num_interfaces, long *specific_proc_sym_id, int module_sym_id)
Variables
static char	USMID [] = "\n@(#)5.0_pl/sources/cifftnrecs.c 5.2 06/17/99 09:28:10\n"

---

Define Documentation

#define CIF_VERSION   3

Definition at line 42 of file cifftnrecs.c.

---

Typedef Documentation

typedef struct Cif_f90_dim_entry Cif_f90_dim

Definition at line 104 of file cifftnrecs.c.

typedef struct Cif_f90_level_opt_entry Cif_f90_level_opt

Definition at line 121 of file cifftnrecs.c.

typedef struct Cif_geometry_dim_entry Cif_geometry_dim

Definition at line 86 of file cifftnrecs.c.

---

Function Documentation

void Cif_Cdir_Rec	(	FILE *	c_i_f,
		int	directive_type,
		int	file_id,
		int	line_number,
		int	column_number,
		int	num_copy_vars,
		long *	copy_var_sym_id
	)

Definition at line 155 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_directive_rec().

Here is the call graph for this function:

void Cif_Continuation_Rec	(	FILE *	c_i_f,
		int	continuation_type,
		int	file_id,
		int	line_number,
		int	column_number
	)

Definition at line 575 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_cont_line_rec().

Here is the call graph for this function:

void Cif_EDopts_Rec	(	FILE *	c_i_f,
		int	enable_disable_opts
	)

Definition at line 394 of file cifftnrecs.c.

References CIF_EDOPTS, Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_enable_disable_rec().

Here is the call graph for this function:

void Cif_Error

(

void

)

Definition at line 5737 of file fecif.c.

void Cif_F90_Begin_Scope_Rec	(	FILE *	c_i_f,
		int	scope_id,
		int	sym_id,
		int	file_id,
		int	line_number,
		int	column_number,
		int	scope_type,
		int	nesting_level,
		int	parent_scope_id
	)

Definition at line 1407 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_begin_scope_rec(), and cif_fake_a_unit().

Here is the call graph for this function:

void Cif_F90_Callsite_Rec	(	FILE *	c_i_f,
		int	sym_id,
		int	scope_id,
		int	file_id,
		int	line_number,
		int	column_number,
		int	specific_proc_sym_id,
		int	max_num_actual_args,
		char *	arg_sym_id[],
		int *	arg_rank
	)

Definition at line 620 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Here is the call graph for this function:

void Cif_F90_Comblk_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	storage_class,
		int	module_sym_id,
		int	common_block_length,
		int	distribution
	)

Definition at line 697 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_send_sytb().

Here is the call graph for this function:

void Cif_F90_Const_Rec	(	FILE *	c_i_f,
		int	sym_id,
		int	scope_id,
		int	scalar_aggregate,
		char *	value,
		int	file_id,
		int	start_line_number,
		int	start_column_number,
		int	end_line_number,
		int	end_column_number
	)

Definition at line 750 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Here is the call graph for this function:

void Cif_F90_Derived_Type_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	derived_type_id,
		int	attributes,
		int	num_components,
		long *	component_sym_id,
		int	module_sym_id
	)

Definition at line 940 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_send_attr().

Here is the call graph for this function:

void Cif_F90_End_Scope_Rec	(	FILE *	c_i_f,
		int	scope_id,
		int	file_id,
		int	line_number,
		int	column_number,
		int	scope_in_error
	)

Definition at line 1456 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_end_scope_rec(), and cif_fake_a_unit().

Here is the call graph for this function:

void Cif_F90_Entry_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	program_unit_type,
		int	procedure_type,
		int	attributes,
		int	result_sym_id,
		int	module_sym_id,
		int	num_dummy_args,
		long *	dummy_arg_sym_id
	)

Definition at line 806 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_call_site_rec(), cif_fake_a_unit(), and cif_send_attr().

Here is the call graph for this function:

void Cif_F90_Int_Block_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	int_block_type,
		int	attributes,
		int	num_interfaces,
		long *	specific_proc_sym_id,
		int	module_sym_id
	)

Definition at line 1645 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_send_attr().

Here is the call graph for this function:

void Cif_F90_Label_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	label_class
	)

Definition at line 1002 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_label_rec().

Here is the call graph for this function:

void Cif_F90_Loop_Rec	(	FILE *	c_i_f,
		int	scope_id,
		int	loop_type,
		int	start_file_id,
		int	start_line_number,
		int	start_column_number,
		int	end_file_id,
		int	end_line_number,
		int	end_column_number,
		int	do_var_sym_id,
		int	term_label_sym_id,
		int	construct_name_sym_id,
		int	end_stmt_num
	)

Definition at line 880 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_loop_def_rec().

Here is the call graph for this function:

void Cif_F90_Misc_Opts_Rec	(	FILE *	c_i_f,
		int	i_opt_value,
		int	m_opt_value,
		int	V_opt,
		int	t_opt_enabled,
		int	t_opt_value,
		int	num_disabled_msgs,
		long *	msg_num,
		int	num_disabled_cdirs,
		char *	cdir_name[],
		char *	dot_o_name,
		char *	cal_file_name,
		char *	inline_file_name,
		char *	cif_name,
		int	C_opt_flags,
		int	N_opt_value,
		int	num_I_opts,
		char *	I_opt_path_name[],
		int	num_p_opts,
		char *	p_opt_path_name[],
		int	source_form,
		int	R_opt_flags
	)

Definition at line 1229 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Here is the call graph for this function:

void Cif_F90_Namelist_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	module_sym_id,
		int	num_members,
		long *	member_sym_id
	)

Definition at line 1046 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Here is the call graph for this function:

void Cif_F90_Object_Rec	(	FILE *	c_i_f,
		char *	name,
		int	sym_id,
		int	scope_id,
		int	data_type,
		int	symbol_class,
		int	storage_class,
		int	storage_sym_id,
		int	offset,
		int	attributes,
		int	derived_type_id,
		char *	char_len,
		int	num_dimensions,
		int	array_type,
		Cif_f90_dim *	dim,
		int	distribution,
		int	geometry_id,
		int	cri_ptr_sym_id
	)

Definition at line 1118 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, fprintf(), and NULL.

Here is the call graph for this function:

void Cif_F90_Opt_Opts_Rec	(	FILE *	c_i_f,
		int	options,
		int	num_level_opts,
		Cif_f90_level_opt *	level_opt
	)

Definition at line 1350 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, fprintf(), Cif_f90_level_opt_entry::level, and Cif_f90_level_opt_entry::option.

Here is the call graph for this function:

void Cif_F90_Rename_Rec	(	FILE *	c_i_f,
		int	scope_id,
		char *	name_in_module,
		int	name_in_module_sym_id,
		int	module_sym_id,
		char *	original_name,
		int	original_module_sym_id,
		long	local_name_sym_id
	)

Definition at line 1594 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_rename_rec().

Here is the call graph for this function:

void Cif_F90_Scope_Info_Rec	(	FILE *	c_i_f,
		int	scope_id,
		int	attributes,
		int	num_alt_entries,
		long *	alt_entry_sym_id
	)

Definition at line 1499 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Here is the call graph for this function:

void Cif_F90_Use_Module_Rec	(	FILE *	c_i_f,
		int	module_sym_id,
		int	module_file_id,
		int	flag
	)

Definition at line 1552 of file cifftnrecs.c.

References Cif_Error(), EOI, EOR, and fprintf().

Referenced by cif_use_module_rec().

Here is the call graph for this function:

void Cif_Include_Rec	(	FILE *	c_i_f,
		int	parent_file_id,
		int	line_number,
		int	column_number,
		int	include_file_id
	)

Definition at line 215 of file cifftnrecs.c.

References Cif_Error(), CIF_INCLUDE, EOI, EOR, and fprintf().

Referenced by cif_include_rec().

Here is the call graph for this function:

void Cif_Mach_Char_Rec	(	FILE *	c_i_f,
		char *	cpu_type,
		long	memory_speed,
		long	memory_size,
		int	characteristics,
		long	num_memory_banks,
		long	num_cpus,
		long	instruction_buffer_size,
		long	clock_period,
		long	num_cluster_reg_sets,
		long	bank_busy_time,
		int	word_bit_len
	)

Definition at line 435 of file cifftnrecs.c.

References Cif_Error(), CIF_MACH_CHAR, EOI, EOR, and fprintf().

Referenced by cif_machine_characteristics_rec().

Here is the call graph for this function:

void Cif_Srcfile_Rec	(	FILE *	c_i_f,
		int	file_id,
		int	source_form
	)

Definition at line 254 of file cifftnrecs.c.

References Cif_Error(), CIF_SRCFILE, EOI, EOR, and fprintf().

Referenced by cif_source_file_rec().

Here is the call graph for this function:

void Cif_Stmt_Type_Rec	(	FILE *	c_i_f,
		int	stmt_type,
		int	file_id,
		int	line_number,
		int	column_number,
		int	stmt_number
	)

Definition at line 490 of file cifftnrecs.c.

References Cif_Error(), CIF_STMT_TYPE, EOI, EOR, and fprintf().

Referenced by cif_stmt_type_rec().

Here is the call graph for this function:

void Cif_Usage_Rec	(	FILE *	c_i_f,
		int	sym_id,
		int	file_id,
		int	line_number,
		int	col_number,
		int	usage_code,
		int	num_other_sym_ids,
		long *	component_sym_id
	)

Definition at line 337 of file cifftnrecs.c.

References Cif_Error(), CIF_USAGE, EOI, EOR, and fprintf().

Referenced by cif_sb_usage_rec(), and cif_usage_rec().

Here is the call graph for this function:

---

Variable Documentation

char USMID[] = "\n@(#)5.0_pl/sources/cifftnrecs.c 5.2 06/17/99 09:28:10\n" [static]

Definition at line 37 of file cifftnrecs.c.