Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
src_input.h File Reference
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Classes

struct  src_stk_entry
struct  msg_queue_entry

Typedefs

typedef enum src_file_values src_file_type
typedef enum dir_prefix_values dir_prefix_type
typedef struct msg_queue_entry msg_queue_type
typedef struct msg_queue_entry next_msg_queue_type
typedef struct src_stk_entry src_stk_type

Enumerations

enum  src_file_values { Stdin_Src, Input_Src, Include_Src }
enum  dir_prefix_values {
  Cdir_Dir, Cmic_Dir, Cpar_Dir, Cstar_Dir,
  Cdollar_Dir, Comp_Dir, Cdbg_Dir, Csgi_Dir,
  Copenad_Dir
}

Functions

boolean parse_cc_line (void)
boolean is_par_directive (int)
boolean is_dollar_directive (int)
boolean is_star_directive (int)
boolean scan_fortran_stmt (void)
boolean scan_fixed_comment (void)
void check_for_continued_macro (void)

Variables

next_msg_queue_typenext_msg_queue
long next_msg_queue_idx = NULL_IDX
int next_msg_queue_inc = 5
int next_msg_queue_init_size = 5
long next_msg_queue_limit = OUR_LONG_MAX
int next_msg_queue_num_wds = NUM_MQ_WDS
long next_msg_queue_size = 0
long next_msg_queue_largest_idx = NULL_IDX
msg_queue_typemsg_queue
long msg_queue_idx = NULL_IDX
int msg_queue_inc = 5
int msg_queue_init_size = 5
long msg_queue_limit = OUR_LONG_MAX
int msg_queue_num_wds = NUM_MQ_WDS
long msg_queue_size = 0
long msg_queue_largest_idx = NULL_IDX
src_stk_type *RESTRICT src_stk
long src_stk_idx = NULL_IDX
int src_stk_inc = 2
int src_stk_init_size = 3
long src_stk_limit = OUR_LONG_MAX
int src_stk_num_wds
long src_stk_size = 0
long src_stk_largest_idx = NULL_IDX
boolean change_source_form = FALSE
int char_delim
int continuation_count
int digit_start
line_type expected_line
boolean first_line = TRUE
boolean first_pound_line = TRUE
boolean cif_file_rec_issued = FALSE
int full_include_name_idx = NULL_IDX
boolean ignore_source_line = FALSE
char include_file [MAX_FILE_NAME_SIZE]
int include_stmt_file_line = 0
int include_stmt_file_col = 0
boolean include_switch
boolean include_complete
boolean include_found
boolean issue_obsolete_src_form_msg = FALSE
char pound_file [MAX_FILE_NAME_SIZE]
boolean change_orig_src_file = FALSE
int line_size
int lines_in_buf
char num_str [5]
int num_idx
int nxt_line [MAX_SRC_LINE_SIZE]
int nxt_line_col [MAX_SRC_LINE_SIZE]
int nxt_line_idx
boolean nxt_line_label
int nxt_line_length
int nxt_line_num
line_type nxt_line_type
int nxt_line_EOL
int nxt_line_prefix_len
boolean nxt_line_mp_line
int nxt_line_start_idx [MAX_FIXED_LINES+1]
int nxt_line_end_idx [MAX_FIXED_LINES+1]
boolean pp_nxt_line_label [MAX_FIXED_LINES+1]
int pp_nxt_line_length [MAX_FIXED_LINES+1]
int pp_nxt_line_num [MAX_FIXED_LINES+1]
line_type pp_nxt_line_type [MAX_FIXED_LINES+1]
int pp_nxt_line_EOL [MAX_FIXED_LINES+1]
int pp_nxt_line_prefix_len [MAX_FIXED_LINES+1]
int pp_nxt_line_idx [MAX_FIXED_LINES+1]
boolean pp_nxt_line_mp_line [MAX_FIXED_LINES+1]
boolean pp_change_source_form [MAX_FIXED_LINES+1]
dir_prefix_type pp_nxt_line_actual_dir_prefix [MAX_FIXED_LINES+1]
dir_prefix_type pp_nxt_line_dir_prefix [MAX_FIXED_LINES+1]
line_type pp_expected_line [MAX_FIXED_LINES+1]
int pp_orig_line_size [MAX_FIXED_LINES+1]
int nxt_line_num_lines
int pp_line_idx
int extra_nxt_line = NULL_IDX
int prev_char_delim = 0
int prev_char_delim_idx
int previous_char
boolean seen_lp_eq_slash
int starting_pt
int stmt_buf [MAX_STMT_CHAR_SIZE]
int stmt_buf_col [MAX_STMT_CHAR_SIZE]
int stmt_buf_idx
line_type stmt_buf_type
int stmt_buf_EOS_idx
int stmt_line_start_idx [MAX_FIXED_LINES+1]
int stmt_line_end_idx [MAX_FIXED_LINES+1]
int stmt_line_idx
int stmt_line_num [MAX_FIXED_LINES+1]
int stmt_line_offset [MAX_FIXED_LINES+1]
int stmt_prefix_len
dir_prefix_type stmt_buf_dir_prefix
dir_prefix_type nxt_line_dir_prefix
dir_prefix_type line_dir_prefix [MAX_FIXED_LINES+1]
dir_prefix_type nxt_line_actual_dir_prefix
int lc_a = 'a'
int uc_a = 'A'
int lc_b = 'b'
int uc_b = 'B'
int lc_c = 'c'
int uc_c = 'C'
int lc_d = 'd'
int uc_d = 'D'
int lc_e = 'e'
int uc_e = 'E'
int lc_f = 'f'
int uc_f = 'F'
int lc_g = 'g'
int uc_g = 'G'
int lc_h = 'h'
int uc_h = 'H'
int lc_i = 'i'
int uc_i = 'I'
int lc_l = 'l'
int uc_l = 'L'
int lc_m = 'm'
int uc_m = 'M'
int lc_n = 'n'
int uc_n = 'N'
int lc_o = 'o'
int uc_o = 'O'
int lc_p = 'p'
int uc_p = 'P'
int lc_r = 'r'
int uc_r = 'R'
int lc_s = 's'
int uc_s = 'S'
int lc_t = 't'
int uc_t = 'T'
int dot = '.'
int star = '*'
int quote = '\''
int db_quote = '"'
int blank = ' '
int marked_blank = (int)(((unsigned)1 << SIGN_BIT) | ' ')
int tab = '\t'
int newline = '\n'
int bang = '!'
int lparen = '('
int rparen = ')'
int lbrkt = '['
int rbrkt = ']'
int equal = '='
int slash = '/'
int underscore = '_'
int dollar = '$'
int amp = '&'
int percent = '%'
int at_sign = '@'
int semi_colon = ';'
int colon = ':'
int eos = 0
int one = '1'
int nine = '9'
int zero = '0'
int comma = ','
int pound = '#'
int greater = '>'
int less = '<'
int format_str [7][2]
int format_idx = -1
boolean in_format = FALSE
int format_start_idx
static boolean have_issued_msg_37
ch_class_type ch_class [MAX_ASCII_CHARS]
static boolean valid_f90_char [MAX_ASCII_CHARS]
static char * line_type_str []
static char * ch_str []
boolean sig_blank
la_type stmt_EOS_la_ch
static boolean havent_issued_tab_ansi
static boolean havent_issued_at_ansi
static boolean havent_issued_dollar_ansi
FILE * dot_i_fptr
boolean angle_brkt_include = FALSE
int save_prev_char_delim
int save_prev_char_delim_idx
int save_previous_char
boolean save_seen_lp_eq_slash
int save_char_delim
int save_digit_start
int save_format_idx
boolean save_in_format
line_type save_expected_line
boolean save_first_line
boolean issue_pound_exit_line = FALSE
char cc_stmt_buf [MAX_STMT_CHAR_SIZE]
int cc_stmt_buf_idx
cc_stmt_buf_line_type cc_stmt_buf_line [200]
long cc_stmt_buf_num_lines
long previous_global_line

Typedef Documentation

Definition at line 72 of file src_input.h.

Definition at line 100 of file src_input.h.

Definition at line 101 of file src_input.h.

Definition at line 48 of file src_input.h.

typedef struct src_stk_entry src_stk_type

Definition at line 102 of file src_input.h.


Enumeration Type Documentation

Enumerator:
Cdir_Dir 
Cmic_Dir 
Cpar_Dir 
Cstar_Dir 
Cdollar_Dir 
Comp_Dir 
Cdbg_Dir 
Csgi_Dir 
Copenad_Dir 

Definition at line 61 of file src_input.h.

Enumerator:
Stdin_Src 
Input_Src 
Include_Src 

Definition at line 44 of file src_input.h.


Function Documentation

void check_for_continued_macro ( void  )

Variable Documentation

int amp = '&'

Definition at line 286 of file src_input.h.

Referenced by cc_get_stmt(), fixed_classify_line(), and free_classify_line().

char* ch_str[] [static]

Definition at line 140 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 146 of file src_input.h.

Referenced by init_src_input(), and open_include_file().

int colon = ':'

Definition at line 290 of file src_input.h.

Referenced by is_substring_ref(), and stmt_has_double_colon().

Definition at line 141 of file src_input.h.

Referenced by fixed_get_stmt(), and free_get_stmt().

int db_quote = '"'

Definition at line 267 of file src_input.h.

Referenced by fixed_classify_line(), free_classify_line(), and parse_cc_line().

Definition at line 142 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int dot = '.'

Definition at line 264 of file src_input.h.

Referenced by digit_is_format_label(), and DRA_Process_Commons().

Definition at line 144 of file src_input.h.

Referenced by fixed_classify_line().

Definition at line 145 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int format_idx = -1

Definition at line 308 of file src_input.h.

Referenced by cif_message_rec(), fixed_classify_line(), and free_classify_line().

Definition at line 310 of file src_input.h.

Referenced by format_line_n_col(), and set_format_start_idx().

int format_str[7][2]
Initial value:
 {      {'F', 'f'},
                                        {'O', 'o'},
                                        {'R', 'r'},
                                        {'M', 'm'},
                                        {'A', 'a'},
                                        {'T', 't'},
                                        {'(', '('}}

Definition at line 300 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 147 of file src_input.h.

Referenced by open_include_file().

int greater = '>'

Definition at line 297 of file src_input.h.

Referenced by is_implied_do().

Definition at line 313 of file src_input.h.

Referenced by init_src_input(), and read_line().

Definition at line 890 of file src_input.h.

Referenced by fixed_get_char(), free_get_char(), and init_src_input().

Definition at line 891 of file src_input.h.

Referenced by fixed_get_char(), free_get_char(), and init_src_input().

Definition at line 889 of file src_input.h.

Referenced by fixed_get_stmt(), free_get_stmt(), and init_src_input().

Definition at line 309 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 152 of file src_input.h.

Referenced by open_include_file(), and update_global_line().

int lbrkt = '['

Definition at line 280 of file src_input.h.

Referenced by scan_fortran_macro(), set_stmt_type_known(), and whats_after_brkt_group().

int lc_a = 'a'

Definition at line 230 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_b = 'b'

Definition at line 232 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int lc_c = 'c'

Definition at line 234 of file src_input.h.

Referenced by fixed_classify_line(), free_classify_line(), and pp_get_stmt().

int lc_d = 'd'

Definition at line 236 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int lc_e = 'e'

Definition at line 238 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int lc_f = 'f'

Definition at line 240 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_g = 'g'

Definition at line 242 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_h = 'h'

Definition at line 244 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int lc_i = 'i'

Definition at line 246 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_l = 'l'

Definition at line 248 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int lc_m = 'm'

Definition at line 250 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_n = 'n'

Definition at line 252 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_o = 'o'

Definition at line 254 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_p = 'p'

Definition at line 256 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_r = 'r'

Definition at line 258 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int lc_s = 's'

Definition at line 260 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int lc_t = 't'

Definition at line 262 of file src_input.h.

int less = '<'

Definition at line 298 of file src_input.h.

Referenced by is_implied_do().

char* line_type_str[] [static]
Initial value:
 {
                        "Comment_Line",                 
                        "Include_Line",                 
                        "Cond_Comp_Line",               
                        "Dir_Line",                     
                        "Regular_Line",                 
                        "Continuation_Line",            
                        "EOF_Line"                      
                }

Definition at line 837 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int marked_blank = (int)(((unsigned)1 << SIGN_BIT) | ' ')

Definition at line 273 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 115 of file src_input.h.

Referenced by issue_deferred_msgs(), and ntr_msg_queue().

int msg_queue_inc = 5

Definition at line 116 of file src_input.h.

Referenced by print_src_input_tbls().

Definition at line 117 of file src_input.h.

Referenced by print_src_input_tbls().

Definition at line 121 of file src_input.h.

Definition at line 118 of file src_input.h.

Definition at line 119 of file src_input.h.

Referenced by print_src_input_tbls().

long msg_queue_size = 0

Definition at line 120 of file src_input.h.

Referenced by ntr_msg_queue().

Definition at line 106 of file src_input.h.

Referenced by move_up_next_msg_queue(), and ntr_next_msg_queue().

Definition at line 107 of file src_input.h.

Definition at line 108 of file src_input.h.

Definition at line 112 of file src_input.h.

Definition at line 109 of file src_input.h.

Definition at line 110 of file src_input.h.

Definition at line 111 of file src_input.h.

Referenced by ntr_next_msg_queue().

int nine = '9'

Definition at line 293 of file src_input.h.

Referenced by fixed_classify_line().

int num_idx

Definition at line 165 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

char num_str[5]

Definition at line 164 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 175 of file src_input.h.

Referenced by classify_line(), and fixed_get_stmt().

Definition at line 176 of file src_input.h.

Referenced by classify_line().

Definition at line 180 of file src_input.h.

Referenced by classify_line(), fixed_get_stmt(), and free_get_stmt().

int percent = '%'

Definition at line 287 of file src_input.h.

Referenced by next_id_is_imp_control(), set_stmt_type_known(), and stmt_is_DATA_stmt().

int pound = '#'

Definition at line 196 of file src_input.h.

Referenced by adjust_continued_macro().

Definition at line 191 of file src_input.h.

Referenced by adjust_continued_macro(), get_nxt_line(), and read_line().

Definition at line 185 of file src_input.h.

Definition at line 192 of file src_input.h.

Referenced by read_line().

Definition at line 190 of file src_input.h.

Definition at line 197 of file src_input.h.

Referenced by adjust_continued_macro(), and shift_nxt_line().

int prev_char_delim = 0

Definition at line 204 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 205 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 206 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int quote = '\''

Definition at line 266 of file src_input.h.

Referenced by fixed_classify_line(), free_classify_line(), and parse_cc_line().

int rbrkt = ']'

Definition at line 281 of file src_input.h.

Referenced by scan_fortran_macro(), and whats_after_brkt_group().

Definition at line 912 of file src_input.h.

Definition at line 913 of file src_input.h.

Definition at line 916 of file src_input.h.

Referenced by pp_get_stmt().

Definition at line 917 of file src_input.h.

Definition at line 914 of file src_input.h.

Definition at line 915 of file src_input.h.

Definition at line 908 of file src_input.h.

Definition at line 909 of file src_input.h.

Definition at line 910 of file src_input.h.

Definition at line 911 of file src_input.h.

Definition at line 207 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 556 of file main.h.

int src_stk_inc = 2

Definition at line 126 of file src_input.h.

Referenced by print_src_input_tbls().

Definition at line 127 of file src_input.h.

Referenced by print_src_input_tbls().

Definition at line 132 of file src_input.h.

Definition at line 128 of file src_input.h.

Initial value:
 HOST_BYTES_TO_WORDS(
                                                        sizeof(src_stk_type))

Definition at line 129 of file src_input.h.

Referenced by print_src_input_tbls().

long src_stk_size = 0

Definition at line 131 of file src_input.h.

int star = '*'

Definition at line 265 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

Definition at line 208 of file src_input.h.

Referenced by fixed_get_stmt(), free_get_stmt(), and init_src_input().

Definition at line 222 of file src_input.h.

Referenced by fixed_get_stmt(), and free_get_stmt().

Definition at line 557 of file main.h.

Definition at line 220 of file src_input.h.

Referenced by fixed_get_char(), fixed_get_stmt(), free_get_char(), and free_get_stmt().

int uc_a = 'A'

Definition at line 231 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_b = 'B'

Definition at line 233 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int uc_c = 'C'

Definition at line 235 of file src_input.h.

Referenced by fixed_classify_line(), free_classify_line(), and pp_get_stmt().

int uc_d = 'D'

Definition at line 237 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int uc_e = 'E'

Definition at line 239 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int uc_f = 'F'

Definition at line 241 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_g = 'G'

Definition at line 243 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_h = 'H'

Definition at line 245 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int uc_i = 'I'

Definition at line 247 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_l = 'L'

Definition at line 249 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int uc_m = 'M'

Definition at line 251 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_n = 'N'

Definition at line 253 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_o = 'O'

Definition at line 255 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_p = 'P'

Definition at line 257 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_r = 'R'

Definition at line 259 of file src_input.h.

Referenced by digit_is_format_label(), fixed_classify_line(), and free_classify_line().

int uc_s = 'S'

Definition at line 261 of file src_input.h.

Referenced by fixed_classify_line(), and free_classify_line().

int uc_t = 'T'

Definition at line 263 of file src_input.h.

Definition at line 577 of file src_input.h.

Referenced by fixed_classify_line().

int zero = '0'

Definition at line 294 of file src_input.h.

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines