#include <stdio.h>#include "cif.m"#include "cif.h"
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 CIF_VERSION 3 |
Definition at line 42 of file cifftnrecs.c.
| 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.
| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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.

| 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.

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

| 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().

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.
1.6.1