Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
#define ADD_TO_CC_TOKEN_STR | ( | CH, | |
LEN | |||
) |
if ((LEN) < CC_MAX_ID_LEN) { \ TOKEN_STR(cc_token)[(LEN)] = (CH); \ } \ (LEN)++
Definition at line 110 of file cond_comp.m.
Referenced by cc_get_token().
#define CC_AT_DEFINED | ( | IDX | ) | cc_attr_tbl[IDX].defined |
Definition at line 80 of file cond_comp.m.
Referenced by enter_cmd_line_cc_define(), enter_predefined_macros(), parse_cc_line(), parse_cc_operand(), parse_define_str(), scan_cc_line(), scan_fixed_comment(), and scan_fortran_stmt().
#define CC_AT_DYNAMIC_PREDEF | ( | IDX | ) | cc_attr_tbl[IDX].dynamic_predef |
Definition at line 81 of file cond_comp.m.
Referenced by enter_predefined_macros(), scan_cc_line(), scan_fixed_comment(), and scan_fortran_stmt().
#define CC_AT_NAME_IDX | ( | IDX | ) | cc_attr_tbl[IDX].name_idx |
Definition at line 79 of file cond_comp.m.
Referenced by ntr_cc_sym_tbl().
#define CC_AT_NAME_LEN | ( | IDX | ) | cc_attr_tbl[IDX].name_len |
Definition at line 78 of file cond_comp.m.
Referenced by ntr_cc_sym_tbl().
#define CC_AT_NAME_PTR | ( | IDX | ) | &(str_pool[CC_AT_NAME_IDX(IDX)].name_char) |
Definition at line 87 of file cond_comp.m.
Referenced by copy_define_str(), parse_define_str(), scan_cc_macro(), and scan_fortran_macro().
#define CC_AT_NUM_ARGS | ( | IDX | ) | cc_attr_tbl[IDX].num_args |
Definition at line 84 of file cond_comp.m.
Referenced by parse_define_str(), scan_cc_line(), scan_cc_macro(), scan_fixed_comment(), scan_fortran_macro(), and scan_fortran_stmt().
#define CC_AT_START_COL | ( | IDX | ) | cc_attr_tbl[IDX].start_col |
Definition at line 86 of file cond_comp.m.
Referenced by copy_define_str().
#define CC_AT_START_LINE | ( | IDX | ) | cc_attr_tbl[IDX].start_line |
Definition at line 85 of file cond_comp.m.
Referenced by copy_define_str().
#define CC_AT_STR_IDX | ( | IDX | ) | cc_attr_tbl[IDX].str_idx |
Definition at line 82 of file cond_comp.m.
Referenced by copy_define_str(), and enter_cmd_line_cc_define().
#define CC_AT_STR_LEN | ( | IDX | ) | cc_attr_tbl[IDX].str_len |
Definition at line 83 of file cond_comp.m.
Referenced by copy_define_str(), enter_cmd_line_cc_define(), expanded_macro_len(), parse_define_str(), scan_cc_line(), scan_cc_macro(), scan_fixed_comment(), and scan_fortran_stmt().
#define CC_AT_STR_PTR | ( | IDX | ) | &(str_pool[CC_AT_STR_IDX(IDX)].name_char) |
Definition at line 88 of file cond_comp.m.
Referenced by copy_define_str(), expanded_macro_len(), insert_macro(), parse_define_str(), scan_cc_line(), scan_cc_macro(), scan_fixed_comment(), and scan_fortran_stmt().
#define CC_CURR_BLK_DONE cc_blk_stk_tbl[cc_blk_stk_tbl_idx].already_done |
Definition at line 93 of file cond_comp.m.
Referenced by parse_cc_line().
#define CC_CURR_BLK_IN_ERROR cc_blk_stk_tbl[cc_blk_stk_tbl_idx].in_error |
Definition at line 92 of file cond_comp.m.
Referenced by parse_cc_line().
#define CC_CURR_BLK_IS_ACTIVE cc_blk_stk_tbl[cc_blk_stk_tbl_idx].is_active |
Definition at line 91 of file cond_comp.m.
Referenced by parse_cc_line().
#define CC_CURR_BLK_TYPE cc_blk_stk_tbl[cc_blk_stk_tbl_idx].blk_type |
Definition at line 90 of file cond_comp.m.
Referenced by parse_cc_line().
#define CC_GET_ID_TOKEN |
cc_token = cc_initial_token; \ TOKEN_LEN(cc_token) = 0; \ TOKEN_LINE(cc_token) = PP_LINE_NUM; \ TOKEN_COLUMN(cc_token) = nxt_line_col[cc_stmt_buf_idx]; \ while (nxt_line[cc_stmt_buf_idx] > 0 && \ VALID_CC_ID_CHAR(nxt_line[cc_stmt_buf_idx])) { \ if (TOKEN_LEN(cc_token) < CC_MAX_ID_LEN) { \ ADD_TO_CC_TOKEN_STR(nxt_line[cc_stmt_buf_idx], \ TOKEN_LEN(cc_token)); \ } \ cc_advance_idx(); \ }
Definition at line 152 of file cond_comp.m.
Referenced by scan_fixed_comment(), and scan_fortran_stmt().
#define CC_LA_CH_CLASS cc_la_ch.ch_class |
Definition at line 63 of file cond_comp.m.
Referenced by cc_get_next_char(), cc_get_token(), flush_cc_line(), parse_cc_operand(), parse_define_str(), and scan_cc_line().
#define CC_LA_CH_COLUMN cc_la_ch.column |
Definition at line 64 of file cond_comp.m.
Referenced by cc_get_next_char(), cc_get_token(), flush_cc_line(), parse_cc_line(), and parse_cc_operand().
#define CC_LA_CH_LINE cc_la_ch.line |
Definition at line 65 of file cond_comp.m.
Referenced by cc_get_next_char(), cc_get_token(), flush_cc_line(), parse_cc_line(), and parse_cc_operand().
#define CC_LA_CH_VALUE cc_la_ch.value |
Definition at line 66 of file cond_comp.m.
Referenced by cc_get_next_char(), cc_get_token(), flush_cc_line(), parse_cc_add_opnd(), parse_cc_line(), parse_cc_operand(), parse_define_str(), scan_cc_line(), and scan_cc_macro().
#define CC_LN_ATTR_IDX | ( | IDX | ) | cc_ln_tbl[IDX].attr_idx |
Definition at line 72 of file cond_comp.m.
Referenced by ntr_cc_sym_tbl(), and srch_cc_sym_tbl().
#define CC_LN_NAME_IDX | ( | IDX | ) | cc_ln_tbl[IDX].name_idx |
Definition at line 73 of file cond_comp.m.
Referenced by init_cond_comp(), ntr_cc_sym_tbl(), and srch_cc_sym_tbl().
#define CC_LN_NAME_LEN | ( | IDX | ) | cc_ln_tbl[IDX].name_len |
Definition at line 74 of file cond_comp.m.
Referenced by init_cond_comp(), and ntr_cc_sym_tbl().
#define CC_LN_NAME_LONG | ( | IDX | ) | &(str_pool[CC_LN_NAME_IDX(IDX)].name_long) |
Definition at line 75 of file cond_comp.m.
#define CC_MAX_ID_LEN 133 |
Definition at line 43 of file cond_comp.m.
Referenced by cc_get_token().
#define CC_NEXT_LA_CH cc_get_next_char() |
Definition at line 68 of file cond_comp.m.
Referenced by cc_get_stmt(), cc_get_token(), parse_cc_line(), parse_cc_operand(), parse_define_str(), scan_cc_line(), and scan_cc_macro().
#define CC_NUM_AT_WDS 4 |
Definition at line 49 of file cond_comp.m.
#define CC_NUM_ID_WDS 34 |
Definition at line 48 of file cond_comp.m.
Referenced by init_cond_comp(), and parse_define_str().
#define NTR_CC_ATTR_TBL | ( | ATTR_IDX | ) |
TBL_REALLOC_CK(cc_attr_tbl, 1); \ CLEAR_TBL_NTRY(cc_attr_tbl, cc_attr_tbl_idx); \ ATTR_IDX = cc_attr_tbl_idx;
Definition at line 116 of file cond_comp.m.
Referenced by ntr_cc_sym_tbl().
#define NTR_CC_NAME_POOL | ( | NAME, | |
LEN, | |||
NP_IDX | |||
) |
{register long *_name_id; \ register int _np_idx; \ register int _start_idx; \ register int _wd_len; \ _name_id = NAME; \ _wd_len = WORD_LEN(LEN); \ _start_idx = str_pool_idx + 1; \ NP_IDX = _start_idx; \ TBL_REALLOC_CK(str_pool,_wd_len); \ for (_np_idx = 0; _np_idx < _wd_len; _np_idx++) { \ str_pool[_start_idx+_np_idx].name_long = _name_id[_np_idx]; \ } \ }
Definition at line 121 of file cond_comp.m.
Referenced by enter_cmd_line_cc_define(), and ntr_cc_sym_tbl().
#define POP_CC_BLK_STK cc_blk_stk_tbl_idx--; |
Definition at line 137 of file cond_comp.m.
Referenced by parse_cc_line().
#define PUSH_CC_BLK_STK | ( | NEW_BLK | ) |
TBL_REALLOC_CK (cc_blk_stk_tbl, 1); \ CLEAR_TBL_NTRY(cc_blk_stk_tbl, cc_blk_stk_tbl_idx); \ CC_CURR_BLK_TYPE = NEW_BLK;
Definition at line 140 of file cond_comp.m.
Referenced by parse_cc_line().
#define PUT_VALUE_IN_AT_STR | ( | ATTR_IDX, | |
VALUE | |||
) |
{int _len; sprintf(temp_id_str.string,"%d",VALUE); \ _len = strlen(temp_id_str.string); \ CC_AT_STR_LEN(ATTR_IDX) = _len; \ NTR_CC_NAME_POOL(temp_id_str.words, _len, CC_AT_STR_IDX(ATTR_IDX));}
Definition at line 146 of file cond_comp.m.
Referenced by enter_cmd_line_cc_define(), and enter_predefined_macros().
#define VALID_CC_ID_CHAR | ( | CHAR | ) |
(ch_class[CHAR] == Ch_Class_Letter || \ ch_class[CHAR] == Ch_Class_Digit || \ CHAR == underscore || CHAR == dollar || \ CHAR == at_sign)
Definition at line 100 of file cond_comp.m.
Referenced by cc_advance_idx(), and cc_get_token().