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

Go to the source code of this file.

Defines

#define CG_INTEGER_DEFAULT_TYPE   init_default_linear_type[Fortran_Integer]
#define CHARACTER_DEFAULT_TYPE   default_linear_type[Fortran_Character]
#define COMPLEX_DEFAULT_TYPE   default_linear_type[Fortran_Complex]
#define DOUBLE_COMPLEX_DEFAULT_TYPE   TYP_LINEAR(DOUBLE_COMPLEX_TYPE_IDX)
#define DOUBLE_DEFAULT_TYPE   TYP_LINEAR(DOUBLE_PRECISION_TYPE_IDX)
#define INTEGER_DEFAULT_TYPE   default_linear_type[Fortran_Integer]
#define LOGICAL_DEFAULT_TYPE   default_linear_type[Fortran_Logical]
#define REAL_DEFAULT_TYPE   default_linear_type[Fortran_Real]
#define TYPELESS_DEFAULT_TYPE   Typeless_8
#define IO_TYPE_CODE_TYPE   TYPELESS_DEFAULT_TYPE
#define MAX_ID_LEN   31 /* Num of chars in ID */
#define MAX_EXTERNAL_ID_LEN   255 /* Num chars in extern*/
#define FALSE   0
#define IDENTICAL   0
#define NULL_IDX   0
#define TRUE   1
#define DEFAULT_SAFEVL   _MAXVL
#define AMP   '&'
#define AT_SIGN   '@'
#define BANG   '!'
#define BK_SLASH   '\\'
#define BLANK   ' '
#define COLON   ':'
#define COMMA   ','
#define DASH   '-'
#define DBL_QUOTE   '"'
#define DOLLAR   '$'
#define DOT   '.'
#define EOS   '\0' /* Use this when you really mean EOS. */
#define EQUAL   '='
#define GT   '>'
#define LBRKT   '['
#define LPAREN   '('
#define LT   '<'
#define MINUS   '-'
#define NEWLINE   '\n'
#define NULL_CHAR   '\0' /* Use this for generic NULL char. */
#define PERCENT   '%'
#define PLUS   '+'
#define QUEST_MARK   '?'
#define QUOTE   '\''
#define RBRKT   ']'
#define RPAREN   ')'
#define SEMI_COLON   ';'
#define SHARP   '#'
#define SLASH   '/'
#define STAR   '*'
#define TAB   '\t'
#define USCORE   '_'
#define ZERO   '0'
#define EOS_STR   "EOS"
#define ALL_RECS   0001 /* a = f + c + i + m + o + x */
#define COMPILER_RECS   0002 /* c = c + f */
#define BASIC_RECS   0004 /* f */
#define INFO_RECS   0010 /* i = i + f */
#define MESSAGE_RECS   0020 /* m = m + f */
#define MISC_RECS   0040 /* o = o + f + i */
#define OUTPUT_TO_STDOUT   0100 /* s */
#define XREF_RECS   0200 /* x = x + f + i */
#define CMD_PROVIDED_CIF   4000 /* The command processor */
#define OPEN_MP_LIST_CNT   19
#define OPEN_MP_IF_IDX   0
#define OPEN_MP_PRIVATE_IDX   1
#define OPEN_MP_SHARED_IDX   2
#define OPEN_MP_FIRSTPRIVATE_IDX   3
#define OPEN_MP_DEFAULT_IDX   4
#define OPEN_MP_COPYIN_IDX   5
#define OPEN_MP_REDUCTION_OPR_IDX   6
#define OPEN_MP_REDUCTION_LIST_IDX   7
#define OPEN_MP_LASTPRIVATE_IDX   8
#define OPEN_MP_ORDERED_IDX   9
#define OPEN_MP_SCHEDULE_TYPE_IDX   10
#define OPEN_MP_SCHEDULE_CHUNK_IDX   11
#define OPEN_MP_COPYPRIVATE_IDX   12
#define OPEN_MP_AFFINITY_IDX   13
#define OPEN_MP_IS_THREAD_IDX   14
#define OPEN_MP_THREAD_DATA_IDX   15
#define OPEN_MP_ONTO_IDX   16
#define OPEN_MP_NEST_IDX   17
#define OPEN_MP_FLUSH_IDX   18
#define MP_DIR_LIST_CNT   14
#define MP_DIR_IF_IDX   0
#define MP_DIR_SHARE_IDX   1
#define MP_DIR_LASTLOCAL_IDX   2
#define MP_DIR_REDUCTION_IDX   3
#define MP_DIR_MP_SCHEDTYPE_IDX   4
#define MP_DIR_CHUNK_IDX   5
#define MP_DIR_AFFINITY_IDX   6
#define MP_DIR_IS_THREAD_IDX   7
#define MP_DIR_THREAD_DATA_IDX   8
#define MP_DIR_LOCAL_IDX   9
#define MP_DIR_ONTO_IDX   10
#define MP_DIR_NEST_IDX   11
#define MP_DIR_LASTTHREAD_IDX   12
#define MP_DIR_ORDERED_IDX   13
#define OPEN_MP_DEFAULT_NONE   1
#define OPEN_MP_DEFAULT_SHARED   2
#define OPEN_MP_DEFAULT_PRIVATE   3
#define MP_SCHEDTYPE_RUNTIME   1
#define MP_SCHEDTYPE_SIMPLE   2
#define MP_SCHEDTYPE_INTERLEAVED   3
#define MP_SCHEDTYPE_DYNAMIC   4
#define MP_SCHEDTYPE_GUIDED   5
#define OPEN_MP_SCHEDULE_RUNTIME   1
#define OPEN_MP_SCHEDULE_STATIC   2
#define OPEN_MP_SCHEDULE_DYNAMIC   4
#define OPEN_MP_SCHEDULE_GUIDED   5
#define DOPREFER_SERIAL   1
#define DOPREFER_CONCURRENT   2
#define DOPREFER_VECTOR   3
#define ASSERT_ARGUMENTALIASING   1
#define ASSERT_NOARGUMENTALIASING   2
#define ASSERT_BOUNDSVIOLATIONS   3
#define ASSERT_NOBOUNDSVIOLATIONS   4
#define ASSERT_CONCURRENTCALL   5
#define ASSERT_NOCONCURRENTCALL   6
#define ASSERT_NORECURRENCE   7
#define ASSERT_DOPREFER   8
#define ASSERT_EQUIVALENCEHAZARD   9
#define ASSERT_NOEQUIVALENCEHAZARD   10
#define ASSERT_LASTVALUENEEDED   11
#define ASSERT_LASTVALUESNEEDED   12
#define ASSERT_NOLASTVALUENEEDED   13
#define ASSERT_NOLASTVALUESNEEDED   14
#define ASSERT_PERMUTATION   15
#define ASSERT_RELATION   16
#define ASSERT_NOSYNC   17
#define ASSERT_TEMPORARIESFORCONSTANTARGUMENTS   18
#define ASSERT_NOTEMPORARIESFORCONSTANTARGUMENTS   19
#define ASSERT_DO   20
#define ASSERT_BENIGN   21
#define ASSERT_DEPENDENCE   22
#define ASSERT_FREQUENCY   23
#define ASSERT_IGNOREANYDEPENDENCES   24
#define ASSERT_IGNOREANYDEPENDENCE   25
#define ASSERT_IGNOREASSUMEDDEPENDENCES   26
#define ASSERT_IGNOREASSUMEDDEPENDENCE   27
#define ASSERT_NOINTERCHANGE   28
#define ASSERT_USECOMPRESS   29
#define ASSERT_USEEXPAND   30
#define ASSERT_USECONTROLLEDSTORE   31
#define ASSERT_USEGATHER   32
#define ASSERT_USESCATTER   33
#define INIT_OPND_TYPE   {0,0,0,0,0,NO_Tbl_Idx,0}
#define COMPILER_INFO_TABLE_TYPE   026 /* Octal */
#define DALIGN_TEST_CONDITION(TYPE_IDX)
#define PACK_HALF_WORD_TEST_CONDITION(TYPE_IDX)
#define PACK_8_BIT_TEST_CONDITION(TYPE_IDX)
#define PACK_16_BIT_TEST_CONDITION(TYPE_IDX)
#define DATE_TIME_STR_SIZE   27
#define RELEASE_LEVEL_LEN   24
#define MAX_CONST_OPT_LENGTH   16
#define MAX_CIITEM_NAME_LENGTH   16
#define MAX_NUM_EXP_FORMS   2
#define MAX_NUM_ALLOWED_TYPES   3
#define MAX_NUM_CONST_OPTS   5
#define NUM_IO_STMT_TYPES   8
#define MAX_NUM_CIITEM   25
#define ALLOCATE_LIB_ENTRY   "_ALLOCATE"
#define ALLOCATE_NAME_LEN   9
#define ARGCHCK_LIB_ENTRY   "_ARGCHCK"
#define ARGCHCK_NAME_LEN   8
#define DEALLOCATE_LIB_ENTRY   "_DEALLOCATE"
#define DEALLOCATE_NAME_LEN   11
#define DEALLOC_LIB_ENTRY   "_DEALLOC"
#define DEALLOC_NAME_LEN   8
#define REALLOC_LIB_ENTRY   "_REALLOC"
#define REALLOC_NAME_LEN   8
#define BACKSPACE_LIB_ENTRY   "_BACK"
#define BACKSPACE_NAME_LEN   5
#define END_LIB_ENTRY   "_END"
#define END_NAME_LEN   4
#define ENDFILE_LIB_ENTRY   "_EOFW"
#define ENDFILE_NAME_LEN   5
#define INQUIRE_LIB_ENTRY   "_INQUIRE"
#define INQUIRE_NAME_LEN   8
#define OPEN_LIB_ENTRY   "_OPEN"
#define OPEN_NAME_LEN   5
#define CLOSE_LIB_ENTRY   "_CLOSE"
#define CLOSE_NAME_LEN   6
#define BUFFER_IN_LIB_ENTRY   "_BUFFERIN"
#define BUFFER_IN_NAME_LEN   9
#define BUFFER_OUT_LIB_ENTRY   "_BUFFEROUT"
#define BUFFER_OUT_NAME_LEN   10
#define REWIND_LIB_ENTRY   "_REWF"
#define REWIND_NAME_LEN   5
#define PAUSE_LIB_ENTRY   "_PAUSE"
#define PAUSE_NAME_LEN   6
#define STOP_LIB_ENTRY   "_STOP"
#define STOP_NAME_LEN   5
#define STOP_ALL_LIB_ENTRY   "STOP_ALL"
#define STOP_ALL_NAME_LEN   8
#define CONFORM_LIB_ENTRY   "_CONFORM_ERROR"
#define CONFORM_NAME_LEN   14
#define BOUNDS_LIB_ENTRY   "_BOUNDS_ERROR"
#define BOUNDS_NAME_LEN   13
#define RBOUNDS_LIB_ENTRY   "_RBOUNDS_ERROR"
#define RBOUNDS_NAME_LEN   14
#define SBOUNDS_LIB_ENTRY   "_SBOUNDS_ERROR"
#define SBOUNDS_NAME_LEN   14
#define PTR_CHK_LIB_ENTRY   "_POINTER_ERROR"
#define PTR_CHK_NAME_LEN   14
#define START_PES_LIB_ENTRY   "start_pes_"
#define START_PES_NAME_LEN   10
#define SET_NUMTHREADS_ENTRY   "mp_set_numthreads_"
#define SET_NUMTHREADS_NAME_LEN   18
#define OPND_LINE_NUM(OPND)   OPND.line_num
#define OPND_COL_NUM(OPND)   OPND.col_num
#define OPND_FLD(OPND)   OPND.fld
#define OPND_IDX(OPND)   OPND.idx
#define OPND_LIST_CNT(OPND)   OPND.line_num
#define CMIC_WORK_DIST_SINGLE   1
#define CMIC_WORK_DIST_VECTOR   2
#define CMIC_WORK_DIST_GUIDED   3
#define CMIC_WORK_DIST_NUMCHUNKS   4
#define CMIC_WORK_DIST_CHUNKSIZE   5
#define CMIC_WORK_DIST_NCPUS_CHUNKS   8
#define RC_OKAY   0 /* Compiler executed successfully. */
#define RC_USER_ERROR   1 /* The program contains at least one */
#define RC_INTERNAL_ERROR   2 /* The compiler error terminated. */
#define EQUAL_STRS(S1, S2)   (strcmp (S1, S2) == IDENTICAL)
#define CREATE_ID(ID, STR, LEN)
#define MEM_ALLOC(PTR, TYPE, SIZE)
#define MEM_FREE(PTR)
#define TBL_FREE(STRUCT)
#define MEM_REALLOC(PTR, TYPE, NEW_SIZE)
#define CHECK_INITIAL_ALLOC(STRUCT, STRUCT_INIT_IDX)
#define CHECK_TBL_ALLOC_SIZE(STRUCT, STRUCT_NEW_SIZE)
#define MEM_TRACE(TRACE_TYPE, NPTR, OPTR, BYTE_SIZE, NUM_ENTRIES)
#define MEM_REPORT(STRUCT)
#define SET_LARGEST_IDX(STRUCT, CHECK_IDX, NEW_IDX)
#define CLEAR_LARGEST_IDX(STRUCT)   STRUCT##_largest_idx = NULL_IDX;
#define MALLOC_CHECK(NUM)
#define NEXT_LA_CH   (*get_char)()
#define NEXT_LA_CH_LITERAL   (*get_char_literal) ()
#define TBL_ALLOC(PTR)   MEM_ALLOC (PTR, PTR##_type, PTR##_size);
#define TBL_REALLOC_CK(PTR, NUM_ENTRIES)
#define GLOBAL_LINE_TO_FILE_LINE(LINE, IDX, ACT_LINE)
#define COPY_OPND(OPND_T, OPND_S)   OPND_T = OPND_S;
#define SET_MESSAGE_TBL(TBL, MSG_NUM)
#define GET_MESSAGE_TBL(TBL, MSG_NUM)
#define SHIFT_ARITH_ARG(VAR, TYPE)
#define SHIFT_ARITH_RESULT(VAR, TYPE)
#define ADD_TMP_TO_SHARED_LIST(ATTR_IDX)
#define ADD_TMP_TO_PRIVATE_LIST(ATTR_IDX)
#define ADD_VAR_TO_SHARED_LIST(ATTR_IDX)
#define ADD_VAR_TO_PRIVATE_LIST(ATTR_IDX)
#define GEN_MAX_ZERO_IR(MAX_IDX, THE_OPND, LINE, COL)
#define FUNCTION_MUST_BE_SUBROUTINE(ATTR_IDX)
#define STMT_EXPAND_BEFORE_START_SH(IDX)   IL_IDX(IR_IDX_R(IDX))
#define STMT_EXPAND_BEFORE_END_SH(IDX)   IL_IDX(IL_NEXT_LIST_IDX(IR_IDX_R(IDX)))
#define STMT_EXPAND_AFTER_START_SH(IDX)   IL_IDX(IL_NEXT_LIST_IDX(IL_NEXT_LIST_IDX(IR_IDX_R(IDX))))
#define STMT_EXPAND_AFTER_END_SH(IDX)   IL_IDX(IL_NEXT_LIST_IDX(IL_NEXT_LIST_IDX(IL_NEXT_LIST_IDX(IR_IDX_R(IDX)))))
#define PUSH_CURR_STMT
#define POP_CURR_STMT
#define INCREMENT_STATEMENT_NUMBER

Define Documentation

#define ADD_TMP_TO_PRIVATE_LIST (   ATTR_IDX)
Value:
if (cdir_switches.parallel_region &&                                        \
       cdir_switches.private_list_idx != NULL_IDX &&                           \
       comp_phase == Pass2_Semantics &&                                        \
       AT_OBJ_CLASS(ATTR_IDX) == Data_Obj &&                                   \
       ATD_CLASS(ATTR_IDX) == Compiler_Tmp &&                                  \
       ! ATD_TASK_PRIVATE(ATTR_IDX) &&                                         \
       ! ATD_TASK_SHARED(ATTR_IDX)) {                                          \
      int       _list_idx;                                                     \
      NTR_IR_LIST_TBL(_list_idx);                                              \
      IL_NEXT_LIST_IDX(_list_idx) = IL_IDX(cdir_switches.private_list_idx);    \
      if (IL_IDX(cdir_switches.private_list_idx) != NULL_IDX) {                \
         IL_PREV_LIST_IDX(IL_IDX(cdir_switches.private_list_idx)) = _list_idx; \
      }                                                                        \
      IL_IDX(cdir_switches.private_list_idx) = _list_idx;                      \
      IL_FLD(cdir_switches.private_list_idx) = IL_Tbl_Idx;                     \
      IL_LIST_CNT(cdir_switches.private_list_idx)++;                           \
      IL_FLD(_list_idx) = AT_Tbl_Idx;                                          \
      IL_IDX(_list_idx) = ATTR_IDX;                                            \
      ATD_TASK_PRIVATE(ATTR_IDX) = TRUE;                                       \
   }

Definition at line 825 of file globals.m.

Referenced by gen_compiler_star(), gen_compiler_tmp(), and gen_compiler_upbd().

#define ADD_VAR_TO_PRIVATE_LIST (   ATTR_IDX)
Value:
if (cdir_switches.parallel_region &&                                        \
       cdir_switches.private_list_idx != NULL_IDX &&                           \
       comp_phase == Pass2_Semantics &&                                        \
       AT_OBJ_CLASS(ATTR_IDX) == Data_Obj &&                                   \
       ! ATD_TASK_PRIVATE(ATTR_IDX) &&                                         \
       ! ATD_TASK_SHARED(ATTR_IDX)) {                                          \
      int       _list_idx;                                                     \
      NTR_IR_LIST_TBL(_list_idx);                                              \
      IL_NEXT_LIST_IDX(_list_idx) = IL_IDX(cdir_switches.private_list_idx);    \
      if (IL_IDX(cdir_switches.private_list_idx) != NULL_IDX) {                \
         IL_PREV_LIST_IDX(IL_IDX(cdir_switches.private_list_idx)) = _list_idx; \
      }                                                                        \
      IL_IDX(cdir_switches.private_list_idx) = _list_idx;                      \
      IL_FLD(cdir_switches.private_list_idx) = IL_Tbl_Idx;                     \
      IL_LIST_CNT(cdir_switches.private_list_idx)++;                           \
      IL_FLD(_list_idx) = AT_Tbl_Idx;                                          \
      IL_IDX(_list_idx) = ATTR_IDX;                                            \
      ATD_TASK_PRIVATE(ATTR_IDX) = TRUE;                                       \
      ATD_WAS_SCOPED(ATTR_IDX) = TRUE;                                         \
   }

Definition at line 869 of file globals.m.

#define ADD_VAR_TO_SHARED_LIST (   ATTR_IDX)
Value:
if (cdir_switches.parallel_region &&                                        \
       comp_phase == Pass2_Semantics &&                                        \
       cdir_switches.shared_list_idx != NULL_IDX &&                            \
       AT_OBJ_CLASS(ATTR_IDX) == Data_Obj &&                                   \
       ! ATD_TASK_PRIVATE(ATTR_IDX) &&                                         \
       ! ATD_TASK_SHARED(ATTR_IDX)) {                                          \
      int       _list_idx;                                                     \
      NTR_IR_LIST_TBL(_list_idx);                                              \
      IL_NEXT_LIST_IDX(_list_idx) = IL_IDX(cdir_switches.shared_list_idx);     \
      if (IL_IDX(cdir_switches.shared_list_idx) != NULL_IDX) {                 \
         IL_PREV_LIST_IDX(IL_IDX(cdir_switches.shared_list_idx)) = _list_idx;  \
      }                                                                        \
      IL_IDX(cdir_switches.shared_list_idx) = _list_idx;                       \
      IL_FLD(cdir_switches.shared_list_idx) = IL_Tbl_Idx;                      \
      IL_LIST_CNT(cdir_switches.shared_list_idx)++;                            \
      IL_FLD(_list_idx) = AT_Tbl_Idx;                                          \
      IL_IDX(_list_idx) = ATTR_IDX;                                            \
      ATD_TASK_SHARED(ATTR_IDX) = TRUE;                                        \
      ATD_WAS_SCOPED(ATTR_IDX) = TRUE;                                         \
   }

Definition at line 847 of file globals.m.

#define ALL_RECS   0001 /* a = f + c + i + m + o + x */

Definition at line 123 of file globals.m.

#define ALLOCATE_LIB_ENTRY   "_ALLOCATE"

Definition at line 359 of file globals.m.

Referenced by allocate_stmt_semantics(), and create_runtime_array_constructor().

#define ALLOCATE_NAME_LEN   9

Definition at line 360 of file globals.m.

Referenced by allocate_stmt_semantics(), and create_runtime_array_constructor().

#define AMP   '&'

Definition at line 81 of file globals.m.

Referenced by free_classify_line().

#define ARGCHCK_LIB_ENTRY   "_ARGCHCK"

Definition at line 365 of file globals.m.

Referenced by insert_argchck_calls().

#define ARGCHCK_NAME_LEN   8

Definition at line 367 of file globals.m.

Referenced by insert_argchck_calls().

#define ASSERT_ARGUMENTALIASING   1

Definition at line 224 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_BENIGN   21

Definition at line 244 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_BOUNDSVIOLATIONS   3

Definition at line 226 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_CONCURRENTCALL   5

Definition at line 228 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_DEPENDENCE   22

Definition at line 245 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_DO   20

Definition at line 243 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_DOPREFER   8

Definition at line 231 of file globals.m.

Referenced by assert_semantics(), parse_assert_directive(), and parse_dir_directives().

#define ASSERT_EQUIVALENCEHAZARD   9

Definition at line 232 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_FREQUENCY   23

Definition at line 246 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_IGNOREANYDEPENDENCE   25

Definition at line 248 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_IGNOREANYDEPENDENCES   24

Definition at line 247 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

Definition at line 250 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

Definition at line 249 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_LASTVALUENEEDED   11

Definition at line 234 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_LASTVALUESNEEDED   12

Definition at line 235 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOARGUMENTALIASING   2

Definition at line 225 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOBOUNDSVIOLATIONS   4

Definition at line 227 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOCONCURRENTCALL   6

Definition at line 229 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOEQUIVALENCEHAZARD   10

Definition at line 233 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOINTERCHANGE   28

Definition at line 251 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOLASTVALUENEEDED   13

Definition at line 236 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOLASTVALUESNEEDED   14

Definition at line 237 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NORECURRENCE   7

Definition at line 230 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_NOSYNC   17

Definition at line 240 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

Definition at line 242 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_PERMUTATION   15

Definition at line 238 of file globals.m.

Referenced by assert_semantics(), parse_assert_directive(), and parse_permutation_mic().

#define ASSERT_RELATION   16

Definition at line 239 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

Definition at line 241 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_USECOMPRESS   29

Definition at line 252 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_USECONTROLLEDSTORE   31

Definition at line 254 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_USEEXPAND   30

Definition at line 253 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_USEGATHER   32

Definition at line 255 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define ASSERT_USESCATTER   33

Definition at line 256 of file globals.m.

Referenced by assert_semantics(), and parse_assert_directive().

#define BACKSPACE_LIB_ENTRY   "_BACK"

Definition at line 379 of file globals.m.

Referenced by parse_backspace_stmt().

#define BACKSPACE_NAME_LEN   5

Definition at line 380 of file globals.m.

Referenced by parse_backspace_stmt().

#define BANG   '!'

Definition at line 83 of file globals.m.

Referenced by free_classify_line().

#define BK_SLASH   '\\'

Definition at line 84 of file globals.m.

#define BOUNDS_LIB_ENTRY   "_BOUNDS_ERROR"

Definition at line 430 of file globals.m.

Referenced by gen_bounds_check_call().

#define BOUNDS_NAME_LEN   13

Definition at line 431 of file globals.m.

Referenced by gen_bounds_check_call().

#define BUFFER_IN_LIB_ENTRY   "_BUFFERIN"

Definition at line 401 of file globals.m.

Referenced by parse_buffer_stmt().

#define BUFFER_IN_NAME_LEN   9

Definition at line 402 of file globals.m.

Referenced by parse_buffer_stmt().

#define BUFFER_OUT_LIB_ENTRY   "_BUFFEROUT"

Definition at line 404 of file globals.m.

Referenced by parse_buffer_stmt().

#define BUFFER_OUT_NAME_LEN   10

Definition at line 405 of file globals.m.

Referenced by parse_buffer_stmt().

Definition at line 46 of file globals.m.

Referenced by add_substring_length(), adjust_char_value_len(), align_bit_length(), allocate_stmt_semantics(), allocated_intrinsic(), arith_if_stmt_semantics(), array_construct_semantics(), assign_offset(), assign_storage_blk(), associated_intrinsic(), attr_semantics(), backspace_stmt_semantics(), bits_and_bytes_to_words(), btest_intrinsic(), buffer_stmt_semantics(), calculate_pad(), call_list_semantics(), cast_to_cg_default(), cc_get_token(), change_section_to_do(), change_section_to_this_element(), character_to_character(), check_and_allocate_common_storage(), check_multiple_entry_func(), check_stat_variable(), cif_named_constant_rec(), clock_intrinsic(), close_stmt_semantics(), compare_cn_and_value(), compute_char_element_len(), concat_opr_handler(), convert_binary_literal(), convert_hex_literal(), copy_from_gl_subtree(), copy_sbtree(), copy_text_for_expansion(), create_alloc_descriptor(), create_argchck_descriptor(), create_constructor_constant(), create_imp_do_loops(), create_io_call_descriptor(), create_kwd_text(), create_loop_stmts(), create_namelist_descriptor(), create_runtime_array_constructor(), create_scalar_type_tbl(), create_strct_tbl(), create_struct_argchck_tbl(), cshift_intrinsic(), cval_to_f_int(), cvrt_exp_to_pdg(), data_imp_do_semantics(), data_stmt_semantics(), determine_slice_size(), determine_tmp_size(), dim_intrinsic(), directive_stmt_semantics(), dope_vector_setup(), dsm_numthreads_intrinsic(), encode_decode_stmt_semantics(), end_select_blk(), endfile_stmt_semantics(), eoshift_intrinsic(), expand_user_bound(), fill_in_struct_argchck_const(), final_arg_work(), final_attr_semantics(), final_equivalence_semantics(), flatten_function_call(), fold_aggragate_expression(), fold_clen_opr(), fold_nested_substrings(), folder_driver(), gen_arg_type_descriptor(), gen_array_element_init(), gen_assumed_shape_copy(), gen_auto_length(), gen_bd_entry(), gen_bounds_check_call(), gen_call_type_descriptor(), gen_common_dv_init(), gen_conform_check_call(), gen_darg_branch_test(), gen_dv_def_loops(), gen_Dv_Set_stmt(), gen_dv_stride_mult(), gen_dv_whole_def(), gen_dv_whole_def_init(), gen_forall_tmp(), gen_init_stmt(), gen_internal_call_stmt(), gen_internal_dope_vector(), gen_ptr_chk_call(), gen_rbounds_check_call(), gen_rbounds_condition(), gen_sbounds_check_call(), gen_section_ref(), gen_sf_dv_whole_def(), gen_static_dv_whole_def(), gen_static_integer_array_tmp(), gen_whole_subscript(), gen_whole_substring(), generate_bounds_list(), get_concat_len(), get_operand_quote(), iand_intrinsic(), ibits_intrinsic(), ibset_intrinsic(), imp_do_metamorphed(), init_const_tbl(), init_directive(), init_parse_prog_unit(), init_whole_array(), inquire_stmt_semantics(), insert_init_stmt_for_tmp(), interpret_adjustl_intrinsic(), interpret_binary_intrinsic_opr(), interpret_binary_opr(), interpret_implied_do(), interpret_index_opr(), interpret_ref(), interpret_repeat_intrinsic(), interpret_reshape_intrinsic(), interpret_shape_intrinsic(), interpret_size_intrinsic(), interpret_transfer_intrinsic(), interpret_trim_intrinsic(), interpret_ubound_intrinsic(), interpret_unary_intrinsic_opr(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), lbound_intrinsic(), linearize_list_for_equiv(), make_triplet_extent_tree(), max_opr_handler(), minval_intrinsic(), mpp_cn_int_to_c(), namelist_static_dv_whole_def(), not_intrinsic(), ntr_int_const_tbl(), ntr_io_string_constant(), nullify_stmt_semantics(), num_images_intrinsic(), open_stmt_semantics(), optimize_whole_array_init(), outmoded_if_stmt_semantics(), parse_assert_directive(), parse_cc_operand(), parse_dir_directives(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_fill_align_symbol(), parse_mp_directive(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_openad_directives(), parse_permutation_mic(), pe_array_dim_resolution(), print_const_entry(), print_stmt_semantics(), process_blockable_dir(), process_deferred_io_list(), process_interchange_dir(), push_data_value(), put_c_str_in_cn(), put_char_const_in_tbl(), put_format_in_tbl(), put_string_in_tmp(), random_seed_intrinsic(), read_stmt_semantics(), repeat_intrinsic(), reshape_intrinsic(), rewind_stmt_semantics(), save_array_syntax_subscripts(), scalar_dope_to_scalar(), section_semantics(), selected_int_kind_intrinsic(), send_procedure(), set_directives_on_label(), set_shape_for_deferred_funcs(), set_stride_for_first_dim(), set_up_pe_offset_attr(), set_up_which_entry_tmp(), shape_intrinsic(), size_offset_logical_calc(), size_offset_min_max_calc(), spacing_intrinsic(), srch_for_calls(), stop_pause_stmt_semantics(), stor_bit_size_of(), storage_blk_resolution(), subscript_opr_handler(), substring_opr_handler(), test_size_stmts(), transfer_intrinsic(), translate_distant_ref2(), triplet_opr_handler(), ubound_intrinsic(), wait_send_semantics(), and write_stmt_semantics().

#define CHECK_INITIAL_ALLOC (   STRUCT,
  STRUCT_INIT_IDX 
)
Value:
if (STRUCT##_size == 0) {       /* wasn't previously alloced */\
                   STRUCT##_size = STRUCT##_init_size;                         \
                   TBL_ALLOC (STRUCT);                                         \
                }                                                              \
                else if (STRUCT##_size > STRUCT##_init_size){ /* too large */  \
                   MEM_REPORT(STRUCT);                                         \
                   MEM_FREE(STRUCT);     /*Don't need TBL_FREE's checks.  */   \
                   STRUCT##_size = STRUCT##_init_size;                         \
                   TBL_ALLOC (STRUCT);                                         \
                }                                                              \
                SET_LARGEST_IDX(STRUCT, NULL_IDX, STRUCT_INIT_IDX);            \
                STRUCT##_idx = STRUCT_INIT_IDX;

Definition at line 594 of file globals.m.

Referenced by init_cond_comp(), init_parse_prog_unit(), init_src_input(), ntr_msg_queue(), and ntr_next_msg_queue().

#define CHECK_TBL_ALLOC_SIZE (   STRUCT,
  STRUCT_NEW_SIZE 
)
Value:
SET_LARGEST_IDX(STRUCT, STRUCT_NEW_SIZE, STRUCT_NEW_SIZE);     \
                if (STRUCT##_size == 0) {       /* wasn't previously alloced */\
                   STRUCT##_size = STRUCT_NEW_SIZE + 1;                        \
                   STRUCT##_init_size = STRUCT##_size;                         \
                   TBL_ALLOC (STRUCT);                                         \
                }                                                              \
                else if (STRUCT##_size <= STRUCT_NEW_SIZE){ /*not big enough */\
                   STRUCT##_size = STRUCT_NEW_SIZE + 1;                        \
                   if (STRUCT##_size > STRUCT##_limit) {                       \
                      char _struct_name[20];                                   \
                      strncpy (_struct_name, #STRUCT, 20);                     \
                      PRINTMSG(stmt_start_line, 237, Limit, 0, _struct_name);  \
                   }                                                           \
                   MEM_REALLOC (STRUCT, STRUCT##_type, STRUCT##_size);         \
                }

Definition at line 613 of file globals.m.

Referenced by allocate_mod_link_tbl(), allocate_pdg_link_tbls(), make_ro_entry(), ntr_msg_queue(), ntr_next_msg_queue(), and read_sytb_from_module_file().

#define CLEAR_LARGEST_IDX (   STRUCT)    STRUCT##_largest_idx = NULL_IDX;

Definition at line 663 of file globals.m.

#define CLOSE_LIB_ENTRY   "_CLOSE"

Definition at line 398 of file globals.m.

Referenced by parse_close_stmt().

#define CLOSE_NAME_LEN   6

Definition at line 399 of file globals.m.

Referenced by parse_close_stmt().

#define CMD_PROVIDED_CIF   4000 /* The command processor */

Definition at line 131 of file globals.m.

Referenced by init_cif(), and output_msg().

#define CMIC_WORK_DIST_GUIDED   3

Definition at line 467 of file globals.m.

Referenced by parse_doall_cmic(), and parse_doparallel_cmic().

Definition at line 470 of file globals.m.

Referenced by parse_doall_cmic(), and parse_doparallel_cmic().

#define CMIC_WORK_DIST_SINGLE   1

Definition at line 465 of file globals.m.

Referenced by parse_doall_cmic(), and parse_doparallel_cmic().

#define CMIC_WORK_DIST_VECTOR   2

Definition at line 466 of file globals.m.

Referenced by parse_doall_cmic(), and parse_doparallel_cmic().

#define COLON   ':'

Definition at line 86 of file globals.m.

#define COMMA   ','

Definition at line 87 of file globals.m.

#define COMPILER_INFO_TABLE_TYPE   026 /* Octal */

Definition at line 269 of file globals.m.

Referenced by output_mod_info_file(), read_module_tbl_header(), and srch_for_module_tbl().

#define COMPILER_RECS   0002 /* c = c + f */

Definition at line 124 of file globals.m.

Referenced by init_cif().

#define CONFORM_LIB_ENTRY   "_CONFORM_ERROR"

Definition at line 427 of file globals.m.

Referenced by gen_conform_check_call().

#define CONFORM_NAME_LEN   14

Definition at line 428 of file globals.m.

Referenced by gen_conform_check_call().

#define COPY_OPND (   OPND_T,
  OPND_S 
)    OPND_T = OPND_S;

Definition at line 722 of file globals.m.

Referenced by abs_intrinsic(), add_substring_length(), adjust_char_value_len(), adjustl_intrinsic(), aimag_intrinsic(), aint_intrinsic(), all_intrinsic(), alloc_obj_opr_handler(), allocate_stmt_semantics(), allocated_intrinsic(), analyse_loops(), and_opr_handler(), anint_intrinsic(), arith_if_stmt_semantics(), array_construct_opr_handler(), array_construct_semantics(), array_dim_resolution(), array_element_to_scalar(), asg_opnd_to_tmp(), assign_stmt_semantics(), assignment_stmt_semantics(), associated_intrinsic(), atan2_intrinsic(), attr_semantics(), backspace_stmt_semantics(), bin_array_syntax_check(), bound_semantics(), btest_intrinsic(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), case_stmt_semantics(), case_value_range_semantics(), cast_to_cg_default(), cast_to_type_idx(), ceiling_intrinsic(), change_asg_to_where(), change_section_to_do(), change_section_to_this_element(), change_subscript(), char_intrinsic(), char_len_resolution(), character_to_character(), check_arg_for_co_array(), check_array_bounds(), check_bd_typ_for_dargs(), check_elemental_conformance(), check_expr_for_elementals(), check_for_constructors(), check_for_dependencies(), check_for_elementals(), check_for_legal_define(), check_stat_variable(), check_type_for_size_address(), cif_call_site_rec(), close_stmt_semantics(), cmplx_intrinsic(), compare_and_swap_intrinsic(), compare_darg_to_actual_arg(), compute_char_element_len(), concat_opr_handler(), conjg_intrinsic(), const_init_semantics(), constant_value_semantics(), copy_and_replace_tmps(), copy_sbtree(), copy_subtree(), copy_text_for_expansion(), create_argchck_descriptor(), create_array_constructor_asg(), create_constructor_constant(), create_imp_do_loops(), create_interp_stmts(), create_io_call_descriptor(), create_kwd_text(), create_loop_stmts(), create_runtime_array_constructor(), create_scalar_type_tbl(), create_strct_tbl(), create_struct_constructor_asg(), create_tmp_asg(), create_tmp_DV_asg(), create_tmp_from_stmt_func(), cshift_intrinsic(), csmg_intrinsic(), cvrt_exp_to_pdg(), cvrt_opr_handler(), data_imp_do_semantics(), data_repeat_semantics(), data_stmt_semantics(), dealloc_obj_opr_handler(), deallocate_stmt_semantics(), decl_semantics(), default_init_semantics(), defined_bin_opr_handler(), defined_un_opr_handler(), determine_num_elements(), determine_slice_size(), determine_tmp_size(), dim_intrinsic(), directive_stmt_semantics(), discombobulate_structure_ref(), do_loop_expr_semantics(), do_single_asg(), do_slice_asg(), do_stmt_semantics(), doall_cmic_semantics(), doall_end_semantics(), doparallel_cmic_semantics(), dope_vector_setup(), dot_product_intrinsic(), dprod_intrinsic(), dshiftl_intrinsic(), dsm_numthreads_intrinsic(), else_stmt_semantics(), encode_decode_stmt_semantics(), end_select_blk(), endfile_stmt_semantics(), eoshift_intrinsic(), eq_opr_handler(), expand_imp_do(), expand_io_list(), exponent_intrinsic(), expr_is_symbolic_constant(), fcd_intrinsic(), fetch_and_add_intrinsic(), final_arg_work(), find_attr_in_il(), find_attr_in_ir(), find_base_attr(), find_left_attr(), find_opnd_line_and_column(), finish_cdir_id(), flatten_function_call(), floor_intrinsic(), fold_aggragate_expression(), fold_all_subscripts(), fold_cc_expr(), fold_clen_opr(), fold_nested_substrings(), forall_mask_needs_tmp(), forall_semantics(), fraction_intrinsic(), free_intrinsic(), gen_arg_type_descriptor(), gen_assumed_shape_copy(), gen_auto_length(), gen_bd_entry(), gen_bias_ref(), gen_call_type_descriptor(), gen_common_dv_init(), gen_darg_branch_test(), gen_dbg_write_stmt(), gen_dv_access_low_bound(), gen_dv_def_loops(), gen_Dv_Set_stmt(), gen_dv_stride_mult(), gen_dv_whole_def(), gen_dv_whole_def_init(), gen_forall_loops(), gen_forall_tmp(), gen_forall_tmp_bd_entry(), gen_init_stmt(), gen_internal_call_stmt(), gen_internal_dope_vector(), gen_loop_end_ir(), gen_runtime_bounds(), gen_runtime_checks(), gen_runtime_substring(), gen_sf_dv_whole_def(), gen_single_automatic_allocate(), gen_static_dv_whole_def(), gen_tmp_equal_max_zero(), gen_whole_subscript(), gen_whole_substring(), generate_bounds_list(), get_char_len(), get_concat_len(), get_ieee_status_intrinsic(), getpos_intrinsic(), goto_stmt_semantics(), iand_intrinsic(), ibits_intrinsic(), ibset_intrinsic(), ichar_intrinsic(), ieee_finite_intrinsic(), ieee_real_intrinsic(), if_stmt_semantics(), implied_do_depth(), index_intrinsic(), inquire_stmt_semantics(), int_intrinsic(), interpret_adjustl_intrinsic(), interpret_array_construct_opr(), interpret_binary_intrinsic_opr(), interpret_binary_opr(), interpret_concat_opr(), interpret_constructor(), interpret_csmg_opr(), interpret_cvmgt_opr(), interpret_implied_do(), interpret_index_opr(), interpret_max_min_opr(), interpret_ref(), interpret_repeat_intrinsic(), interpret_reshape_intrinsic(), interpret_shape_intrinsic(), interpret_sik_intrinsic(), interpret_size_intrinsic(), interpret_srk_intrinsic(), interpret_struct_construct_opr(), interpret_transfer_intrinsic(), interpret_trim_intrinsic(), interpret_ubound_intrinsic(), interpret_unary_intrinsic_opr(), interpret_unary_opr(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), item_has_bounds_chk(), just_find_dope_and_rank(), lbound_intrinsic(), leadz_intrinsic(), len_intrinsic(), len_trim_intrinsic(), length_intrinsic(), lg_opr_handler(), lge_intrinsic(), linearize_pe_dims(), loc_intrinsic(), lock_release_intrinsic(), logical_intrinsic(), look_for_real_div(), lower_ptr_asg(), lt_opr_handler(), make_base_subtree(), make_logical_array_tmp(), make_triplet_extent_tree(), malloc_intrinsic(), mark_attr_defined(), mask_intrinsic(), matmul_intrinsic(), max_intrinsic(), max_opr_handler(), mclr_intrinsic(), merge_parameter(), mergee_intrinsic(), minus_opr_handler(), minval_intrinsic(), mld_intrinsic(), mldmx_intrinsic(), mmx_intrinsic(), mod_intrinsic(), modulo_intrinsic(), mp_directive_semantics(), mul_intrinsic(), mult_opr_handler(), mvbits_intrinsic(), namelist_static_dv_whole_def(), nearest_intrinsic(), nint_intrinsic(), not_intrinsic(), not_opr_handler(), ntr_bnds_sh_tmp_list(), ntr_bnds_tmp_list(), null_intrinsic(), nullify_stmt_semantics(), num_images_intrinsic(), numarg_intrinsic(), object_semantics(), omp_set_lock_intrinsic(), open_mp_directive_semantics(), open_stmt_semantics(), optimize_reshape(), optimize_whole_array_init(), outer_imp_do_count(), outmoded_if_stmt_semantics(), output_struct_ids(), pack_intrinsic(), parallel_cmic_semantics(), paren_opr_handler(), parse_actual_arg_spec(), parse_add_opnd(), parse_allocate_stmt(), parse_and_opnd(), parse_assert_directive(), parse_assign_stmt(), parse_assignment_stmt(), parse_backspace_stmt(), parse_buffer_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_call_stmt(), parse_case_stmt(), parse_cc_add_opnd(), parse_cc_equiv_opnd(), parse_cc_expr(), parse_cc_level_2(), parse_cc_level_3(), parse_cc_level_4(), parse_cc_level_5(), parse_cc_level_6(), parse_cc_level_7(), parse_cc_level_8(), parse_cc_mult_opnd(), parse_cc_operand(), parse_cc_or_opnd(), parse_close_stmt(), parse_cpnt_dcl_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_deref(), parse_dir_directives(), parse_dir_var_list(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_else_stmt(), parse_encode_stmt(), parse_endfile_stmt(), parse_equiv_opnd(), parse_equivalence_stmt(), parse_expr(), parse_fill_align_symbol(), parse_forall(), parse_goto_stmt(), parse_id_directive(), parse_if_stmt(), parse_imp_do(), parse_initializer(), parse_inquire_stmt(), parse_int_or_star_list(), parse_int_spec_expr(), parse_io_control_list(), parse_io_list(), parse_level_1(), parse_level_2(), parse_level_3(), parse_level_4(), parse_level_5(), parse_lhs(), parse_mic_directives(), parse_mp_directive(), parse_mult_opnd(), parse_nullify_stmt(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_open_stmt(), parse_openad_varlist(), parse_operand(), parse_or_opnd(), parse_par_directives(), parse_parallel_cmic(), parse_prefetch_ref(), parse_print_stmt(), parse_read_stmt(), parse_redistribute_dir(), parse_reference_list(), parse_return_stmt(), parse_rewind_stmt(), parse_select_stmt(), parse_star_dir_directives(), parse_star_directives(), parse_stop_pause_stmt(), parse_type_dcl_stmt(), parse_var_common_list(), parse_var_name_list(), parse_where_stmt(), parse_write_stmt(), plus_opr_handler(), power_opr_handler(), prefetch_ref_semantics(), present_intrinsic(), print_stmt_semantics(), process_all_initialized_cpnts(), process_char_len(), process_cpnt_inits(), process_deferred_functions(), process_variable_size_func(), ptr_assign_from_ptr(), put_string_in_tmp(), random_seed_intrinsic(), ranget_intrinsic(), read_stmt_semantics(), real_intrinsic(), repeat_intrinsic(), reshape_intrinsic(), reshape_reference_subscripts(), resolve_ext_opr(), return_stmt_semantics(), rewind_stmt_semantics(), rrspacing_intrinsic(), save_array_syntax_subscripts(), scalar_dope_to_scalar(), scale_intrinsic(), scan_for_ptr_chk(), search_expr_for_dargs(), section_semantics(), select_stmt_semantics(), selected_real_kind_intrinsic(), set_at_actual_arg(), set_directives_on_label(), set_exponent_intrinsic(), set_global_value_variables(), set_ieee_exception_intrinsic(), set_shape_for_deferred_funcs(), shift_intrinsic(), short_circuit_branch(), short_circuit_high_level_if(), sign_intrinsic(), sin_intrinsic(), size_intrinsic(), spacing_intrinsic(), spread_intrinsic(), srch_for_calls(), stmt_expansion_control_end(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), struct_construct_opr_handler(), struct_opr_handler(), subscript_opr_handler(), substring_opr_handler(), test_ieee_interrupt_intrinsic(), transfer_intrinsic(), transform_char_sequence_ref(), translate_distant_dv_ref(), translate_distant_ref1(), translate_distant_ref2(), translate_dv_component(), transpose_intrinsic(), tree_produces_dealloc(), triplet_opr_handler(), type_init_semantics(), ubound_intrinsic(), unit_intrinsic(), unpack_intrinsic(), uplus_opr_handler(), validate_char_len(), vv_subscript_semantics(), wait_send_semantics(), where_stmt_semantics(), and write_stmt_semantics().

#define DALIGN_TEST_CONDITION (   TYPE_IDX)
Value:
TYP_LINEAR(TYPE_IDX) == Integer_8 ||          \
                                TYP_LINEAR(TYPE_IDX) == Logical_8 ||          \
                                TYP_LINEAR(TYPE_IDX) == Real_8    ||          \
                                TYP_LINEAR(TYPE_IDX) == Real_16   ||          \
                                TYP_LINEAR(TYPE_IDX) == Complex_4 ||          \
                                TYP_LINEAR(TYPE_IDX) == Complex_8 ||          \
                                TYP_LINEAR(TYPE_IDX) == Complex_16 ||         \
                                TYP_LINEAR(TYPE_IDX) == Typeless_8 ||         \
                                TYP_LINEAR(TYPE_IDX) == Long_Typeless ||      \
                                (TYP_TYPE(TYPE_IDX) == Structure &&           \
                                ATT_DALIGN_ME(TYP_IDX(TYPE_IDX)))

Definition at line 298 of file globals.m.

Referenced by assign_offset(), final_equivalence_semantics(), ntr_const_tbl(), ntr_unshared_const_tbl(), parse_cpnt_dcl_stmt(), and set_mod_link_tbl_for_cn().

#define DASH   '-'

Definition at line 88 of file globals.m.

Referenced by get_punctuator(), and parse_implicit_stmt().

#define DATE_TIME_STR_SIZE   27

Definition at line 337 of file globals.m.

#define DEALLOC_LIB_ENTRY   "_DEALLOC"
#define DEALLOCATE_LIB_ENTRY   "_DEALLOCATE"

Definition at line 369 of file globals.m.

Referenced by deallocate_stmt_semantics().

#define DEALLOCATE_NAME_LEN   11

Definition at line 370 of file globals.m.

Referenced by deallocate_stmt_semantics().

#define DEFAULT_SAFEVL   _MAXVL

Definition at line 79 of file globals.m.

#define DOPREFER_CONCURRENT   2

Definition at line 221 of file globals.m.

Referenced by parse_assert_directive(), and parse_dir_directives().

#define DOPREFER_SERIAL   1

Definition at line 220 of file globals.m.

Referenced by parse_assert_directive().

#define DOPREFER_VECTOR   3

Definition at line 222 of file globals.m.

Referenced by parse_assert_directive().

#define END_LIB_ENTRY   "_END"

Definition at line 385 of file globals.m.

Referenced by end_program_unit().

#define END_NAME_LEN   4

Definition at line 387 of file globals.m.

Referenced by end_program_unit().

#define ENDFILE_LIB_ENTRY   "_EOFW"

Definition at line 389 of file globals.m.

Referenced by parse_endfile_stmt().

#define ENDFILE_NAME_LEN   5

Definition at line 390 of file globals.m.

Referenced by parse_endfile_stmt().

#define EOS   '\0' /* Use this when you really mean EOS. */

Definition at line 92 of file globals.m.

Referenced by cif_message_rec(), fixed_classify_line(), fixed_get_char(), free_classify_line(), free_get_char(), get_openad_dir_xxx_string(), get_operand_digit(), get_operand_dot(), get_operand_letter(), get_operand_quote(), get_program_str(), get_punctuator(), init_cif(), init_cond_comp(), init_date_time_info(), init_lex(), init_release_level(), init_src_input(), init_sytb(), open_include_file(), parse_access_stmt(), parse_allocate_stmt(), parse_and_opnd(), parse_assign_stmt(), parse_assignment_stmt(), parse_attr_spec(), parse_attrs(), parse_auxiliary_dir(), parse_backspace_stmt(), parse_block_stmt(), parse_buffer_stmt(), parse_cache_bypass_dir(), parse_cache_noalloc(), parse_call_stmt(), parse_case_stmt(), parse_cc_line(), parse_close_stmt(), parse_common_dirs(), parse_common_stmt(), parse_contains_stmt(), parse_continue_stmt(), parse_copy_assumed_shape_dir(), parse_cpnt_dcl_stmt(), parse_cycle_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_define_str(), parse_derived_type_stmt(), parse_dir_directives(), parse_dir_var_list(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_dummy_args(), parse_else_stmt(), parse_encode_stmt(), parse_end_stmt(), parse_endfile_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_err_flush(), parse_exit_stmt(), parse_forall(), parse_format_stmt(), parse_function_stmt(), parse_goto_stmt(), parse_if_stmt(), parse_ignore_tkr(), parse_imp_do(), parse_implicit_stmt(), parse_initializer(), parse_inline_always_never(), parse_inquire_stmt(), parse_interface_stmt(), parse_io_list(), parse_label_list(), parse_mic_directives(), parse_module_stmt(), parse_mp_directive(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_nullify_stmt(), parse_only_spec(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_open_stmt(), parse_openad_directives(), parse_openad_varlist(), parse_operand(), parse_par_directives(), parse_parallel_cmic(), parse_permutation_mic(), parse_pointer_stmt(), parse_prefix_spec(), parse_print_stmt(), parse_program_stmt(), parse_read_stmt(), parse_redistribute_dir(), parse_return_stmt(), parse_rewind_stmt(), parse_save_stmt(), parse_select_stmt(), parse_sequence_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_star_dir_directives(), parse_star_directives(), parse_stmt_func_stmt(), parse_stop_pause_stmt(), parse_subroutine_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_typed_function_stmt(), parse_use_stmt(), parse_vfunction_dir(), parse_where_stmt(), parse_write_stmt(), scan_cc_line(), scan_cc_macro(), and set_function_rslt().

#define EOS_STR   "EOS"

Definition at line 115 of file globals.m.

Referenced by parse_access_stmt(), parse_allocate_stmt(), parse_assign_stmt(), parse_assignment_stmt(), parse_attrs(), parse_auxiliary_dir(), parse_backspace_stmt(), parse_block_stmt(), parse_buffer_stmt(), parse_cache_bypass_dir(), parse_cache_noalloc(), parse_call_stmt(), parse_case_stmt(), parse_cc_line(), parse_close_stmt(), parse_common_dirs(), parse_common_stmt(), parse_contains_stmt(), parse_continue_stmt(), parse_copy_assumed_shape_dir(), parse_cpnt_dcl_stmt(), parse_cycle_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_derived_type_stmt(), parse_dir_directives(), parse_dir_var_list(), parse_do_stmt(), parse_doparallel_cmic(), parse_else_stmt(), parse_encode_stmt(), parse_end_stmt(), parse_endfile_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_exit_stmt(), parse_function_stmt(), parse_goto_stmt(), parse_if_stmt(), parse_ignore_tkr(), parse_implicit_stmt(), parse_inline_always_never(), parse_inquire_stmt(), parse_interface_stmt(), parse_mic_directives(), parse_module_stmt(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_nullify_stmt(), parse_only_spec(), parse_open_mp_directives(), parse_open_stmt(), parse_openad_directives(), parse_par_directives(), parse_permutation_mic(), parse_pointer_stmt(), parse_prefix_spec(), parse_print_stmt(), parse_program_stmt(), parse_read_stmt(), parse_return_stmt(), parse_rewind_stmt(), parse_select_stmt(), parse_sequence_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_stmt_func_stmt(), parse_stop_pause_stmt(), parse_subroutine_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_typed_function_stmt(), parse_use_stmt(), parse_vfunction_dir(), parse_write_stmt(), and set_function_rslt().

#define EQUAL   '='

Definition at line 93 of file globals.m.

#define FALSE   0

Definition at line 74 of file globals.m.

#define FUNCTION_MUST_BE_SUBROUTINE (   ATTR_IDX)
Value:
(TYP_TYPE(ATD_TYPE_IDX(ATTR_IDX)) == Character     ||                       \
    TYP_TYPE(ATD_TYPE_IDX(ATTR_IDX)) == Structure     ||                       \
    ATD_ARRAY_IDX(ATTR_IDX) != NULL_IDX ||                                     \
    ATD_IM_A_DOPE(ATTR_IDX))

Definition at line 915 of file globals.m.

Referenced by attr_semantics(), call_list_semantics(), flatten_function_call(), global_name_semantics(), and ntr_ref_in_global_tbl().

#define GEN_MAX_ZERO_IR (   MAX_IDX,
  THE_OPND,
  LINE,
  COL 
)
Value:
{ int   _list_idx;                                                     \
         NTR_IR_TBL(MAX_IDX);                                                  \
         IR_OPR(MAX_IDX) = Max_Opr;                                            \
         IR_TYPE_IDX(MAX_IDX) = CG_INTEGER_DEFAULT_TYPE;                       \
         IR_LINE_NUM(MAX_IDX) = LINE;                                          \
         IR_COL_NUM(MAX_IDX)  = COL;                                           \
         NTR_IR_LIST_TBL(_list_idx);                                           \
         IR_FLD_L(MAX_IDX) = IL_Tbl_Idx;                                       \
         IR_LIST_CNT_L(MAX_IDX) = 2;                                           \
         IR_IDX_L(MAX_IDX) = _list_idx;                                        \
         IL_FLD(_list_idx) = CN_Tbl_Idx;                                       \
         IL_IDX(_list_idx) = CN_INTEGER_ZERO_IDX;                              \
         IL_LINE_NUM(_list_idx) = LINE;                                        \
         IL_COL_NUM(_list_idx)  = COL;                                         \
         NTR_IR_LIST_TBL(IL_NEXT_LIST_IDX(_list_idx));                         \
         IL_PREV_LIST_IDX(IL_NEXT_LIST_IDX(_list_idx)) = _list_idx;            \
         _list_idx = IL_NEXT_LIST_IDX(_list_idx);                              \
         COPY_OPND(IL_OPND(_list_idx), (THE_OPND));                            \
         IL_LINE_NUM(_list_idx) = LINE;                                        \
         IL_COL_NUM(_list_idx) = COL;                                          \
        }

Definition at line 891 of file globals.m.

Referenced by gen_conform_check_call().

#define GET_MESSAGE_TBL (   TBL,
  MSG_NUM 
)
Value:
(TBL[MSG_NUM/HOST_BITS_PER_WORD] &                                     \
                  1L << (HOST_BITS_PER_WORD-((MSG_NUM % HOST_BITS_PER_WORD)+1)))

Definition at line 732 of file globals.m.

Referenced by check_and_allocate_common_storage(), cif_misc_compiler_opts_rec(), compare_entry_to_func_rslt(), print_cmd_tbl(), PRINTMSG(), and use_stmt_semantics().

#define GT   '>'

Definition at line 94 of file globals.m.

Referenced by get_operator(), get_punctuator(), parse_cpnt_dcl_stmt(), and parse_type_dcl_stmt().

#define INFO_RECS   0010 /* i = i + f */

Definition at line 126 of file globals.m.

Referenced by check_for_dup_derived_type_lbl(), cif_send_sytb(), and merge_parameter().

#define INQUIRE_LIB_ENTRY   "_INQUIRE"

Definition at line 392 of file globals.m.

Referenced by parse_inquire_stmt().

#define INQUIRE_NAME_LEN   8

Definition at line 393 of file globals.m.

Referenced by parse_inquire_stmt().

Definition at line 54 of file globals.m.

Referenced by adjust_char_value_len(), all_intrinsic(), alloc_obj_opr_handler(), and_opr_handler(), arith_if_stmt_semantics(), array_construct_semantics(), array_element_to_scalar(), assign_stmt_semantics(), attr_semantics(), bound_semantics(), btest_intrinsic(), buffer_stmt_semantics(), build_loop_tbl(), calculate_iteration_count(), case_stmt_semantics(), case_value_range_semantics(), ceiling_intrinsic(), compare_entry_to_func_rslt(), complete_intrinsic_definition(), convert_const(), convert_hex_literal(), cshift_intrinsic(), csmg_intrinsic(), cvmgp_intrinsic(), cvrt_exp_to_pdg(), data_repeat_semantics(), digits_intrinsic(), do_loop_expr_semantics(), do_stmt_semantics(), encode_decode_stmt_semantics(), eoshift_intrinsic(), eq_opr_handler(), equivalence_semantics(), exponent_intrinsic(), final_arg_work(), final_equivalence_semantics(), find_prog_unit_tbl(), floor_intrinsic(), fold_all_subscripts(), folder_driver(), gen_loop_end_ir(), gen_whole_subscript(), get_token(), getpos_intrinsic(), goto_stmt_semantics(), iand_intrinsic(), ibits_intrinsic(), ichar_intrinsic(), ieee_finite_intrinsic(), ieee_real_intrinsic(), imp_do_metamorphed(), index_intrinsic(), init_parse_prog_unit(), init_whole_array(), inquire_stmt_semantics(), int_intrinsic(), io_ctl_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), kind_intrinsic(), kind_to_linear_type(), lbound_intrinsic(), leadz_intrinsic(), len_intrinsic(), len_trim_intrinsic(), length_intrinsic(), lg_opr_handler(), linearize_pe_dims(), lt_opr_handler(), mask_intrinsic(), max_intrinsic(), maxexponent_intrinsic(), minexponent_intrinsic(), minval_intrinsic(), mvbits_intrinsic(), my_pe_intrinsic(), nearest_intrinsic(), nint_intrinsic(), not_intrinsic(), ntr_bnds_tmp_list(), num_images_intrinsic(), numarg_intrinsic(), omp_get_max_threads_intrinsic(), outmoded_if_stmt_semantics(), output_mod_info_file(), parse_cpnt_dcl_stmt(), parse_deref(), parse_dummy_args(), parse_goto_stmt(), parse_if_stmt(), parse_int_spec_expr(), parse_open_mp_clauses(), parse_type_spec(), pe_array_dim_resolution(), precision_intrinsic(), print_defines(), process_data_imp_do_target(), radix_intrinsic(), range_intrinsic(), ranget_intrinsic(), readsm_intrinsic(), rrspacing_intrinsic(), section_semantics(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), set_integer_default_type(), shape_intrinsic(), shift_intrinsic(), size_intrinsic(), size_offset_binary_calc(), sizeof_intrinsic(), spread_intrinsic(), start_new_scp(), subscript_opr_handler(), substring_opr_handler(), system_clock_intrinsic(), transform_cri_ch_ptr(), translate_distant_ref2(), trim_intrinsic(), triplet_opr_handler(), ubound_intrinsic(), update_fld_type(), validate_kind(), and vv_subscript_semantics().

Definition at line 55 of file globals.m.

Referenced by allocated_intrinsic(), associated_intrinsic(), backspace_stmt_semantics(), btest_intrinsic(), close_stmt_semantics(), compare_entry_to_func_rslt(), compare_target_consts(), complete_intrinsic_definition(), convert_const(), create_loop_stmts(), cvmgp_intrinsic(), dim_intrinsic(), do_stmt_semantics(), else_stmt_semantics(), endfile_stmt_semantics(), equivalence_semantics(), final_arg_work(), forall_semantics(), gen_assumed_shape_copy(), gen_bd_entry(), gen_bounds_check_call(), gen_branch_around_ir(), gen_conform_check_call(), gen_forall_branch_around(), gen_forall_max_expr(), gen_loop_end_ir(), gen_present_ir(), gen_ptr_chk_call(), gen_rbounds_condition(), gen_sbounds_check_call(), iand_intrinsic(), ieee_finite_intrinsic(), ieee_real_intrinsic(), init_type(), inquire_stmt_semantics(), insert_argchck_calls(), interpret_index_opr(), io_ctl_list_semantics(), ishft_intrinsic(), kind_intrinsic(), kind_to_linear_type(), lbound_intrinsic(), lge_intrinsic(), logical_intrinsic(), make_table_changes(), not_intrinsic(), omp_get_max_threads_intrinsic(), omp_set_lock_intrinsic(), open_stmt_semantics(), outmoded_if_stmt_semantics(), parse_cpnt_dcl_stmt(), parse_else_stmt(), parse_if_stmt(), parse_type_spec(), present_intrinsic(), print_defines(), read_stmt_semantics(), rewind_stmt_semantics(), selected_int_kind_intrinsic(), short_circuit_branch(), short_circuit_high_level_if(), test_ieee_interrupt_intrinsic(), test_size_stmts(), ubound_intrinsic(), validate_kind(), and write_stmt_semantics().

#define LPAREN   '('

Definition at line 96 of file globals.m.

Referenced by _ld_write(), _mr_scan_complex(), create_kwd_text(), determine_stmt_type(), get_format_str(), get_program_str(), get_punctuator(), get_token(), parse_actual_arg_spec(), parse_allocate_stmt(), parse_array_spec(), parse_assert_directive(), parse_assignment_stmt(), parse_attr_spec(), parse_attrs(), parse_backspace_stmt(), parse_buffer_stmt(), parse_call_stmt(), parse_case_stmt(), parse_common_stmt(), parse_cpnt_dcl_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_define_str(), parse_deref(), parse_dir_directives(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_dummy_args(), parse_else_stmt(), parse_encode_stmt(), parse_endfile_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_err_flush(), parse_fill_align_symbol(), parse_forall(), parse_format_stmt(), parse_function_stmt(), parse_generic_spec(), parse_goto_stmt(), parse_if_stmt(), parse_imp_do(), parse_implicit_stmt(), parse_inquire_stmt(), parse_intent_spec(), parse_intent_stmt(), parse_io_control_list(), parse_io_list(), parse_length_selector(), parse_lhs(), parse_mic_directives(), parse_mp_directive(), parse_name_dir(), parse_nullify_stmt(), parse_only_spec(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_openad_varlist(), parse_operand(), parse_par_directives(), parse_parallel_cmic(), parse_parameter_stmt(), parse_permutation_mic(), parse_pointer_stmt(), parse_prefix_spec(), parse_prog_unit(), parse_program_stmt(), parse_read_stmt(), parse_redistribute_dir(), parse_rewind_stmt(), parse_select_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_star_dir_directives(), parse_star_directives(), parse_subroutine_stmt(), parse_type_dcl_stmt(), parse_type_spec(), parse_typed_function_stmt(), parse_where_stmt(), parse_write_stmt(), scan_cc_macro(), and set_function_rslt().

#define LT   '<'

Definition at line 97 of file globals.m.

Referenced by get_operator().

#define MALLOC_CHECK (   NUM)

Definition at line 676 of file globals.m.

#define MAX_CIITEM_NAME_LENGTH   16

Definition at line 346 of file globals.m.

#define MAX_CONST_OPT_LENGTH   16

Definition at line 345 of file globals.m.

#define MAX_EXTERNAL_ID_LEN   255 /* Num chars in extern*/

Definition at line 72 of file globals.m.

Referenced by make_in_parent_string().

#define MAX_NUM_ALLOWED_TYPES   3

Definition at line 348 of file globals.m.

#define MAX_NUM_CIITEM   25

Definition at line 351 of file globals.m.

Referenced by io_ctl_list_semantics().

#define MAX_NUM_CONST_OPTS   5

Definition at line 349 of file globals.m.

#define MAX_NUM_EXP_FORMS   2

Definition at line 347 of file globals.m.

#define MEM_ALLOC (   PTR,
  TYPE,
  SIZE 
)
Value:
PTR = (TYPE *) malloc ((SIZE)*sizeof(TYPE));                   \
                MALLOC_CHECK(0);                                               \
                if (PTR == NULL) {                                             \
                   char _struct_name[20];                                      \
                   strncpy (_struct_name, #PTR, 20);                           \
                   PRINTMSG (stmt_start_line, 14, Limit, 0, _struct_name);     \
                }                                                              \
                MEM_TRACE(Mem_Alloc,PTR,NULL,((SIZE)*(long)sizeof(TYPE)), SIZE)

Definition at line 536 of file globals.m.

Referenced by compare_derived_types(), enlarge_call_list_tables(), enlarge_char_result_buffer(), enlarge_info_list_table(), and init_msg_processing().

#define MEM_FREE (   PTR)
Value:
MALLOC_CHECK(0);                                                       \
        free (PTR);                                                            \
        MEM_TRACE (Mem_Free, PTR, NULL, 0, 0)                                  \
        PTR = NULL_IDX;

Definition at line 548 of file globals.m.

Referenced by init_cif(), pre_parse_format(), and semantics_pass_driver().

#define MEM_REALLOC (   PTR,
  TYPE,
  NEW_SIZE 
)
Value:
{       void *_optr = PTR;                                             \
                MALLOC_CHECK(0);                                               \
                PTR = (TYPE *) realloc ((char *) PTR, (NEW_SIZE)*sizeof(TYPE));\
                if (PTR == NULL) {                                             \
                   char _struct_name[20];                                      \
                   strncpy (_struct_name, #PTR, 20);                           \
                   PRINTMSG (stmt_start_line, 14, Limit, 0, _struct_name);     \
                }                                                              \
                MEM_TRACE (Mem_Realloc, PTR, _optr,                            \
                           ((NEW_SIZE)*(long)sizeof(TYPE)), NEW_SIZE);         \
        }

Definition at line 569 of file globals.m.

Referenced by enlarge_call_list_tables(), enlarge_char_result_buffer(), enlarge_info_list_table(), ntr_boolean_const_tbl(), ntr_boz_const_tbl(), ntr_const_tbl(), and ntr_unshared_const_tbl().

#define MEM_REPORT (   STRUCT)
Value:
if (dump_flags.mem_report) {                                   \
                   char _struct_name[20];                                      \
                   strncpy (_struct_name, #STRUCT, 20);                        \
                   print_mem_usage_report(_struct_name,                        \
                                         STRUCT##_size,                        \
                                         STRUCT##_largest_idx);                \
                }

Definition at line 646 of file globals.m.

Referenced by final_src_input(), and main().

#define MEM_TRACE (   TRACE_TYPE,
  NPTR,
  OPTR,
  BYTE_SIZE,
  NUM_ENTRIES 
)
Value:
if (dump_flags.mtrace_info) {                                  \
                   char _struct_name[20];                                      \
                   strncpy (_struct_name, #NPTR, 20);                          \
                   dump_mem_trace_info (TRACE_TYPE, _struct_name, NPTR,        \
                                        OPTR, BYTE_SIZE, NUM_ENTRIES);         \
                }

Definition at line 634 of file globals.m.

#define MESSAGE_RECS   0020 /* m = m + f */

Definition at line 127 of file globals.m.

Referenced by init_PDGCS(), and PRINTMSG().

#define MINUS   '-'

Definition at line 98 of file globals.m.

#define MP_DIR_AFFINITY_IDX   6

Definition at line 174 of file globals.m.

Referenced by cvrt_exp_to_pdg(), mp_directive_semantics(), and parse_mp_directive().

#define MP_DIR_CHUNK_IDX   5

Definition at line 173 of file globals.m.

Referenced by cvrt_exp_to_pdg(), mp_directive_semantics(), and parse_mp_directive().

#define MP_DIR_IF_IDX   0

Definition at line 168 of file globals.m.

Referenced by cvrt_exp_to_pdg(), mp_directive_semantics(), and parse_mp_directive().

#define MP_DIR_IS_THREAD_IDX   7

Definition at line 175 of file globals.m.

Referenced by cvrt_exp_to_pdg(), mp_directive_semantics(), and parse_mp_directive().

#define MP_DIR_LIST_CNT   14
#define MP_DIR_LOCAL_IDX   9
#define MP_DIR_MP_SCHEDTYPE_IDX   4

Definition at line 172 of file globals.m.

Referenced by cvrt_exp_to_pdg(), and parse_mp_directive().

#define MP_DIR_ONTO_IDX   10

Definition at line 178 of file globals.m.

Referenced by cvrt_exp_to_pdg(), mp_directive_semantics(), and parse_mp_directive().

#define MP_DIR_ORDERED_IDX   13

Definition at line 181 of file globals.m.

Referenced by cvrt_exp_to_pdg(), and parse_mp_directive().

#define MP_DIR_SHARE_IDX   1
#define MP_DIR_THREAD_DATA_IDX   8

Definition at line 176 of file globals.m.

Referenced by cvrt_exp_to_pdg(), mp_directive_semantics(), and parse_mp_directive().

#define MP_SCHEDTYPE_DYNAMIC   4

Definition at line 212 of file globals.m.

Referenced by parse_dollar_directives(), and parse_mp_directive().

#define MP_SCHEDTYPE_GUIDED   5

Definition at line 213 of file globals.m.

Referenced by parse_dollar_directives(), and parse_mp_directive().

#define MP_SCHEDTYPE_INTERLEAVED   3

Definition at line 211 of file globals.m.

Referenced by parse_dollar_directives(), and parse_mp_directive().

#define MP_SCHEDTYPE_RUNTIME   1

Definition at line 209 of file globals.m.

Referenced by parse_dollar_directives(), and parse_mp_directive().

#define MP_SCHEDTYPE_SIMPLE   2

Definition at line 210 of file globals.m.

Referenced by parse_dollar_directives(), and parse_mp_directive().

#define NEWLINE   '\n'

Definition at line 99 of file globals.m.

#define NEXT_LA_CH   (*get_char)()

Definition at line 679 of file globals.m.

Referenced by create_kwd_text(), fixed_get_keyword(), flush_LA_to_symbol(), free_get_keyword(), get_debug_directive(), get_directive(), get_label(), get_micro_directive(), get_open_mp_directive(), get_openad_directive(), get_operand_digit(), get_operand_dot(), get_operand_letter(), get_operand_quote(), get_operator(), get_operator_dot(), get_program_str(), get_punctuator(), get_sgi_directive(), get_token(), init_lex(), paren_grp_is_cplx_const(), parse_access_stmt(), parse_actual_arg_spec(), parse_allocate_stmt(), parse_and_opnd(), parse_array_spec(), parse_assert_directive(), parse_assignment_stmt(), parse_attr_spec(), parse_attrs(), parse_auxiliary_dir(), parse_block_stmt(), parse_buffer_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_cache_noalloc(), parse_case_stmt(), parse_common_dirs(), parse_common_stmt(), parse_contains_stmt(), parse_continue_stmt(), parse_copy_assumed_shape_dir(), parse_cpnt_dcl_stmt(), parse_cycle_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_deref(), parse_derived_type_stmt(), parse_dir_directives(), parse_dir_var_list(), parse_directive_stmt(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_dummy_args(), parse_else_stmt(), parse_encode_stmt(), parse_end_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_exit_stmt(), parse_fill_align_symbol(), parse_forall(), parse_function_stmt(), parse_generic_spec(), parse_goto_stmt(), parse_if_stmt(), parse_ignore_tkr(), parse_imp_do(), parse_implicit_stmt(), parse_initializer(), parse_inline_always_never(), parse_inquire_stmt(), parse_int_or_star_list(), parse_intent_spec(), parse_intent_stmt(), parse_interface_stmt(), parse_io_control_list(), parse_io_list(), parse_label_list(), parse_length_selector(), parse_level_2(), parse_lhs(), parse_mic_directives(), parse_module_stmt(), parse_mp_directive(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_nullify_stmt(), parse_only_spec(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_openad_directives(), parse_openad_varlist(), parse_operand(), parse_par_directives(), parse_parallel_cmic(), parse_parameter_stmt(), parse_pe_array_spec(), parse_permutation_mic(), parse_pointer_stmt(), parse_prefetch_ref(), parse_prefix_spec(), parse_print_stmt(), parse_prog_unit(), parse_program_stmt(), parse_read_stmt(), parse_redistribute_dir(), parse_reference_list(), parse_return_stmt(), parse_save_stmt(), parse_select_stmt(), parse_sequence_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_star_dir_directives(), parse_star_directives(), parse_stmt_func_stmt(), parse_stop_pause_stmt(), parse_subroutine_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_type_spec(), parse_typed_function_stmt(), parse_use_stmt(), parse_var_common_list(), parse_var_name_list(), parse_vfunction_dir(), parse_where_stmt(), parse_write_stmt(), put_char_const_in_tbl(), put_format_in_tbl(), reset_lex(), set_function_rslt(), and stmt_is_save_stmt().

Definition at line 682 of file globals.m.

Referenced by get_openad_dir_xxx_string(), and get_operand_digit().

#define NULL_IDX   0

Definition at line 76 of file globals.m.

Referenced by abs_intrinsic(), add_alt_return_lbl(), add_attr_to_local_list(), adjust_char_value_len(), adjust_continued_macro(), adjustl_intrinsic(), aint_intrinsic(), all_intrinsic(), alloc_obj_opr_handler(), allocate_stmt_semantics(), allocated_intrinsic(), anint_intrinsic(), array_bounds_resolution(), array_construct_semantics(), array_dim_resolution(), assign_new_idxs(), assign_new_idxs_after_input(), assign_offset(), assign_offsets_for_equiv_groups(), assign_stmt_semantics(), assign_storage_blk(), assignment_stmt_semantics(), associated_intrinsic(), attr_init_semantics(), attr_link_resolution(), attr_semantics(), blank_padding(), blk_desc_str(), blk_match_err(), bound_resolution(), bound_semantics(), bounds_cdir_handler(), btest_intrinsic(), build_fwd_ref_entry(), build_loop_tbl(), calculate_iteration_count(), call_list_semantics(), case_stmt_semantics(), case_value_range_semantics(), cast_to_cg_default(), cast_to_type_idx(), cast_typeless_constant(), cc_advance_idx(), cc_get_stmt(), ceiling_intrinsic(), chain_thru_sn_ntries(), change_section_to_do(), change_section_to_this_element(), change_subscript(), char_intrinsic(), char_len_resolution(), character_to_character(), check_actual_and_dummy(), check_and_allocate_common_storage(), check_array_bounds(), check_bd_typ_for_dargs(), check_call_for_global_def(), check_cmic_blk_branches(), check_dependence(), check_elemental_conformance(), check_for_dup_derived_type_lbl(), check_for_elementals(), check_global_pgm_unit(), check_il_for_attrs(), check_label_ref(), check_loop_bottom_nesting(), check_mp_dir_nesting(), check_stat_variable(), check_target_and_value(), chg_data_obj_to_pgm_unit(), cif_begin_scope_rec(), cif_call_site_rec(), cif_loop_def_rec(), cif_misc_compiler_opts_rec(), cif_named_constant_rec(), cif_object_rec_for_func_result(), cif_scope_info_rec(), cif_send_attr(), cif_send_sytb(), cif_use_module_rec(), ck_lbl_construct_name(), clear_cdir_switches(), clock_intrinsic(), cmp_ref_trees(), cmplx_intrinsic(), collapse_interface_blk(), compare_array_entries(), compare_darg_or_rslt_types(), compare_darg_to_actual_arg(), compare_derived_types(), compare_duplicate_interface_bodies(), compare_entry_to_func_rslt(), compare_func_result(), compare_global_array(), compare_global_derived_type(), compare_global_type_rank(), compare_il(), complete_intrinsic_definition(), compress_tbls(), concat_opr_handler(), conform_check(), const_init_semantics(), constant_value_semantics(), continue_stmt_semantics(), convert_const(), convert_hex_literal(), convert_to_do_var_type(), copy_entry_exit_sh_list(), copy_from_gl_subtree(), copy_sbtree(), copy_subtree(), copy_to_gl_subtree(), create_alloc_descriptor(), create_argchck_descriptor(), create_constructor_constant(), create_dv_type_code(), create_format_tmp(), create_loop_stmts(), create_mod_info_file(), create_namelist_descriptor(), create_runtime_array_constructor(), create_scalar_type_tbl(), create_strct_tbl(), create_tmp_asg(), create_tmp_DV_asg(), cshift_intrinsic(), cval_to_f_int(), cvrt_exp_to_pdg(), cvrt_ir_to_pdg(), cvrt_opr_handler(), cvrt_proc_to_pdg(), cvrt_sytb_to_pdg(), cvrt_to_pdg(), data_imp_do_semantics(), data_repeat_semantics(), data_stmt_semantics(), dealloc_obj_opr_handler(), deallocate_local_allocatables(), deallocate_stmt_semantics(), decl_semantics(), decl_semantics_driver(), default_init_semantics(), determine_lb_ub(), determine_struct_tbl_size(), dim_intrinsic(), dim_reshape_pass_driver(), directive_stmt_semantics(), discombobulate_structure_ref(), do_cmic_blk_checks(), do_loop_expr_semantics(), do_read_namelist_semantics(), do_stmt_semantics(), do_write_namelist_semantics(), doall_cmic_semantics(), doall_end_semantics(), doparallel_cmic_semantics(), dope_vector_setup(), dshiftl_intrinsic(), dsm_numthreads_intrinsic(), dump_at_ntry(), dump_blk_ntry(), dump_cn_tree(), dump_eq_ntry(), dump_fp_ntry(), dump_ga_ntry(), dump_hn_ntry(), dump_il_ntry(), dump_ir_ntry(), dump_ln_ntry(), dump_ro_ntry(), dump_sb_ntry(), dump_scp_ntry(), dump_stmt_ntry(), dump_typ_ntry(), else_stmt_semantics(), encode_decode_stmt_semantics(), end_blk_mp_semantics(), end_blockdata(), end_contains(), end_do_blk(), end_do_parallel_blk(), end_forall_blk(), end_forall_semantics(), end_function(), end_function_semantics(), end_if_blk(), end_interface_blk(), end_interface_body(), end_internal_proc(), end_labeled_do(), end_module(), end_module_proc(), end_open_mp_do_blk(), end_open_mp_parallel_do_blk(), end_parallel_blk(), end_pdo_blk(), end_program_unit(), end_select_blk(), end_SGI_parallel_blk(), end_stmt_semantics(), end_subroutine(), end_subroutine_semantics(), end_task_do_blk(), end_where_blk(), end_where_semantics(), endparallel_cmic_semantics(), enter_cmd_line_cc_define(), enter_intrinsic_info(), enter_predefined_macros(), eoshift_intrinsic(), equivalence_semantics(), expand_io_list(), fill_in_global_attr_ntry(), fill_in_struct_argchck_const(), final_arg_work(), final_attr_semantics(), final_decl_semantics(), final_equivalence_semantics(), find_attr_in_il(), find_attrs_in_il(), find_attrs_used_in_bound(), find_base_attr(), find_files_in_directory(), find_host_associated_attrs_in_il(), find_left_attr(), find_prog_unit_tbl(), finish_cdir_id(), fixed_classify_line(), fixed_get_stmt(), flatten_function_call(), floor_intrinsic(), fnd_semantic_err(), fold_aggragate_expression(), folder_driver(), forall_semantics(), format_line_n_col(), free_attr_list(), free_classify_line(), free_get_stmt(), free_ir_list(), free_stmt_tmp_tbl(), free_tables(), gen_alloc_header_const(), gen_allocatable_ptr_ptee(), gen_arg_type_descriptor(), gen_assumed_shape_copy(), gen_attr_and_IR_for_lbl(), gen_auto_length(), gen_bd_entry(), gen_bias_ref(), gen_bounds_check_call(), gen_call_type_descriptor(), gen_conform_check_call(), gen_copyin_bounds_stmt(), gen_darg_branch_test(), gen_debug_lbl_stmt(), gen_dv_access_low_bound(), gen_dv_def_loops(), gen_dv_whole_def(), gen_end_prologue_debug_label(), gen_forall_branch_around(), gen_forall_derived_type(), gen_forall_if_mask(), gen_forall_tmp(), gen_gl_sh(), gen_if_stmt(), gen_il(), gen_init_stmt(), gen_ir_at_this_entry(), gen_loop_end_ir(), gen_loop_lbl_name(), gen_ptr_chk_call(), gen_rbounds_check_call(), gen_runtime_bounds(), gen_runtime_substring(), gen_sbounds_check_call(), gen_section_ref(), gen_sf_dv_whole_def(), gen_sh(), gen_single_automatic_allocate(), gen_split_alloc(), gen_static_dv_whole_def(), gen_tmp_eq_zero_ir(), gen_tmp_equal_max_zero(), gen_whole_subscript(), generate_bounds_list(), generic_spec_semantics(), get_basic_type(), get_char_len(), get_dummy_arg_type(), get_ieee_status_intrinsic(), get_next_array_expr_element(), get_operand_digit(), get_operand_dot(), get_operand_letter(), get_operand_quote(), get_operator_dot(), get_shape_from_attr(), get_stmt_tmp(), get_type_desc(), global_name_semantics(), goto_stmt_semantics(), has_been_reprivatized(), host_associated_attr_semantics(), iand_intrinsic(), ibits_intrinsic(), ibset_intrinsic(), ichar_intrinsic(), ieee_real_intrinsic(), if_stmt_semantics(), il_is_symbolic_constant(), imp_do_metamorphed(), implicit_use_semantics(), index_intrinsic(), init_call_structs(), init_cond_comp(), init_const_tbl(), init_directive(), init_parse_prog_unit(), init_src_input(), init_whole_array(), inline_processing(), insert_argchck_calls(), insert_constant(), insert_global_sh(), insert_init_stmt_for_tmp(), insert_sh_after_entries(), insert_sh_chain(), insert_sh_chain_after_entries(), insert_unordered_constant(), int_intrinsic(), interface_semantics_pass_driver(), interpret_adjustl_intrinsic(), interpret_array_construct_opr(), interpret_constructor(), interpret_csmg_opr(), interpret_cvmgt_opr(), interpret_implied_do(), interpret_index_opr(), interpret_max_min_opr(), interpret_ref(), interpret_srk_intrinsic(), interpret_unary_intrinsic_opr(), interpret_unary_opr(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), iss_blk_stk_err(), issue_deferred_msgs(), issue_undefined_type_msg(), just_find_dope_and_rank(), label_ref_semantics(), lbound_intrinsic(), len_trim_intrinsic(), linearize_list_for_equiv(), loc_intrinsic(), logical_intrinsic(), loop_end_processing(), loop_thru_sn_ntries(), loop_top_is_perfectly_nested(), lower_ptr_asg(), main(), make_base_assumed_size(), make_base_subtree(), make_copy_of_routine(), make_in_parent_string(), make_new_bd_entries(), make_ro_entry(), mask_intrinsic(), match_blk(), max_intrinsic(), max_opr_handler(), merge_access(), merge_automatic(), merge_dimension(), merge_entry_list_count(), merge_entry_lists(), merge_equivalence_groups1(), merge_equivalence_groups2(), merge_external(), merge_intent(), merge_interfaces(), merge_intrinsic(), merge_parameter(), merge_pointer(), merge_target(), merge_type(), minval_intrinsic(), move_up_next_msg_queue(), mp_directive_semantics(), mpp_cn_int_to_c(), multiple_clause_err(), must_reassign_XT_temp(), mvbits_intrinsic(), namelist_resolution(), namelist_static_dv_whole_def(), nint_intrinsic(), not_intrinsic(), not_opr_handler(), not_visible_semantics(), ntr_abnormal_ieee_const(), ntr_attr_list_tbl(), ntr_bnds_sh_tmp_list(), ntr_bnds_tmp_list(), ntr_common_in_global_attr_tbl(), ntr_const_tbl(), ntr_file_in_fp_tbl(), ntr_global_attr_tbl(), ntr_global_bounds_tbl(), ntr_global_name_tbl(), ntr_global_type_tbl(), ntr_hidden_name_tbl(), ntr_int_const_tbl(), ntr_io_string_constant(), ntr_ir_list_tbl(), ntr_ir_tbl(), ntr_ref_in_global_tbl(), ntr_sh_tbl(), ntr_unshared_const_tbl(), null_intrinsic(), nullify_stmt_semantics(), num_images_intrinsic(), open_include_file(), open_module_file(), open_mp_directive_semantics(), optimize_reshape(), optimize_whole_array_init(), output_mod_info_file(), output_msg(), pack_intrinsic(), parallel_cmic_semantics(), paren_grp_is_cplx_const(), parse_access_stmt(), parse_actual_arg_spec(), parse_allocate_stmt(), parse_and_opnd(), parse_array_spec(), parse_assert_directive(), parse_assign_stmt(), parse_assignment_stmt(), parse_attrs(), parse_auxiliary_dir(), parse_backspace_stmt(), parse_block_stmt(), parse_buffer_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_cache_noalloc(), parse_call_stmt(), parse_case_stmt(), parse_cc_level_2(), parse_cc_level_3(), parse_cc_line(), parse_cc_mult_opnd(), parse_cc_operand(), parse_close_stmt(), parse_common_dirs(), parse_common_stmt(), parse_copy_assumed_shape_dir(), parse_cpnt_dcl_stmt(), parse_cycle_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_deref(), parse_derived_type_stmt(), parse_dir_directives(), parse_dir_var_list(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_dummy_args(), parse_else_stmt(), parse_encode_stmt(), parse_end_stmt(), parse_endfile_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_exit_stmt(), parse_expr(), parse_fill_align_symbol(), parse_forall(), parse_format_stmt(), parse_goto_stmt(), parse_id_directive(), parse_if_stmt(), parse_ignore_tkr(), parse_imp_do(), parse_implicit_stmt(), parse_initializer(), parse_inline_always_never(), parse_inquire_stmt(), parse_int_or_star_list(), parse_int_spec_expr(), parse_interface_stmt(), parse_io_control_list(), parse_io_list(), parse_label_list(), parse_level_1(), parse_level_2(), parse_lhs(), parse_mic_directives(), parse_module_stmt(), parse_mp_directive(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_nullify_stmt(), parse_only_spec(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_open_stmt(), parse_operand(), parse_par_directives(), parse_parallel_cmic(), parse_parameter_stmt(), parse_pe_array_spec(), parse_permutation_mic(), parse_pointer_stmt(), parse_prefetch_ref(), parse_print_stmt(), parse_prog_unit(), parse_read_stmt(), parse_redistribute_dir(), parse_reference_list(), parse_return_stmt(), parse_rewind_stmt(), parse_select_stmt(), parse_sequence_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_star_dir_directives(), parse_star_directives(), parse_stmt_func_stmt(), parse_stop_pause_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_type_spec(), parse_typed_function_stmt(), parse_use_stmt(), parse_var_common_list(), parse_var_name_list(), parse_vfunction_dir(), parse_where_stmt(), parse_write_stmt(), pe_array_dim_resolution(), pgm_unit_semantics(), pop_and_err_blk_stk(), pop_task_blk(), pre_parse_format(), prefetch_ref_semantics(), present_intrinsic(), print_al_list(), print_all_text(), print_at_by_name(), print_at_name(), print_attr_f(), print_attr_name(), print_bd_tbl(), print_cmd_tbl(), print_Dv_Whole_Def_Opr(), print_eq_tbl(), print_expanded_il(), print_expanded_stmt_for_scp(), print_fld_idx(), print_fp_includes(), print_fp_tbl(), print_gb_tbl(), print_global_type_f(), print_list(), print_ln_by_name(), print_ml_tbl(), print_mp_dir_opr(), print_open_mp_dir_opr(), print_ro_tbl(), print_sb_by_name(), print_sytb(), print_type_f(), PRINTMSG(), process_all_initialized_cpnts(), process_attr_list(), process_blockable_dir(), process_cpnt_inits(), process_data_imp_do_target(), process_deferred_functions(), process_deferred_io_list(), process_interchange_dir(), process_procs_for_inlining(), process_variable_size_func(), push_data_value(), put_char_const_in_tbl(), put_format_in_tbl(), random_number_intrinsic(), random_seed_intrinsic(), ranget_intrinsic(), read_in_module_tbl(), read_line(), read_module_tbl_header(), read_stmt_semantics(), real_intrinsic(), remove_hidden_name_tbl(), rename_only_semantics(), reserve_array_ntry(), reshape_array_semantics(), reshape_intrinsic(), reshape_reference_subscripts(), resolve_all_components(), resolve_attr(), resolve_ext_opr(), resolve_fwd_lbl_refs(), resolve_used_modules(), return_stmt_semantics(), runtime_ptr_chk_driver(), scan_cc_line(), scan_fixed_comment(), scan_fortran_stmt(), search_expr_for_dargs(), section_semantics(), select_stmt_semantics(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), semantics_pass_driver(), send_attr_ntry(), send_darg_list(), send_derived_type(), send_dummy_procedure(), send_interface_list(), send_label_def(), send_mod_file_name(), send_namelist_group(), send_procedure(), send_stor_blk(), set_attr_flds_for_output(), set_directives_on_label(), set_function_rslt(), set_global_value_variables(), set_inline_state(), set_mod_link_tbl_for_attr(), set_mod_link_tbl_for_cn(), set_mod_link_tbl_for_il(), set_mod_link_tbl_for_typ(), set_mp_task_flags(), set_open_mp_task_flags(), set_shape_for_deferred_funcs(), set_up_allocate_as_call(), set_up_fake_dt_blk(), set_up_logical_constant(), set_up_pe_offset_attr(), set_up_which_entry_tmp(), setup_interchange_level_list(), shift_nxt_line(), size_intrinsic(), spread_intrinsic(), srch_cc_sym_tbl(), srch_for_calls(), srch_for_module_tbl(), srch_hidden_name_tbl(), srch_host_stor_blk_tbl(), srch_host_sym_tbl(), srch_kwd_name(), srch_linked_sn(), srch_stor_blk_tbl(), srch_sym_tbl(), start_new_prog_unit(), start_new_scp(), start_new_subpgm(), stmt_expansion_control_end(), stmt_level_semantics(), stop_pause_stmt_semantics(), stor_bit_size_of(), storage_blk_resolution(), struct_construct_opr_handler(), subscript_opr_handler(), system_clock_intrinsic(), test_size_stmts(), tmp_il_resolution(), transfer_intrinsic(), transform_char_sequence_ref(), transform_cri_ch_ptr(), translate_distant_dv_ref(), translate_distant_ref1(), translate_distant_ref2(), tree_produces_dealloc(), trim_intrinsic(), type_init_semantics(), ubound_intrinsic(), update_components(), update_fld_type(), update_global_line(), update_idxs_in_attr_entry(), update_intrinsic(), uplus_opr_handler(), use_stmt_semantics(), verify_interface(), wait_send_semantics(), where_stmt_semantics(), write_constant(), and write_stmt_semantics().

#define NUM_IO_STMT_TYPES   8

Definition at line 350 of file globals.m.

#define OPEN_LIB_ENTRY   "_OPEN"

Definition at line 395 of file globals.m.

Referenced by parse_open_stmt().

#define OPEN_MP_AFFINITY_IDX   13

Definition at line 155 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_DEFAULT_NONE   1

Definition at line 193 of file globals.m.

Referenced by parse_open_mp_clauses().

#define OPEN_MP_DEFAULT_PRIVATE   3

Definition at line 195 of file globals.m.

Referenced by parse_open_mp_clauses().

#define OPEN_MP_DEFAULT_SHARED   2

Definition at line 194 of file globals.m.

Referenced by parse_open_mp_clauses().

#define OPEN_MP_IF_IDX   0

Definition at line 142 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_IS_THREAD_IDX   14

Definition at line 156 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_ONTO_IDX   16

Definition at line 158 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_ORDERED_IDX   9
#define OPEN_MP_REDUCTION_OPR_IDX   6

Definition at line 148 of file globals.m.

Referenced by cvrt_exp_to_pdg(), and parse_open_mp_clauses().

#define OPEN_MP_SCHEDULE_CHUNK_IDX   11

Definition at line 153 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_SCHEDULE_DYNAMIC   4

Definition at line 217 of file globals.m.

Referenced by open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_SCHEDULE_GUIDED   5

Definition at line 218 of file globals.m.

Referenced by open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_SCHEDULE_RUNTIME   1

Definition at line 215 of file globals.m.

Referenced by open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_SCHEDULE_STATIC   2

Definition at line 216 of file globals.m.

Referenced by open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_SCHEDULE_TYPE_IDX   10

Definition at line 152 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_MP_THREAD_DATA_IDX   15

Definition at line 157 of file globals.m.

Referenced by cvrt_exp_to_pdg(), open_mp_directive_semantics(), and parse_open_mp_clauses().

#define OPEN_NAME_LEN   5

Definition at line 396 of file globals.m.

Referenced by parse_open_stmt().

#define OPND_COL_NUM (   OPND)    OPND.col_num

Definition at line 455 of file globals.m.

Referenced by abs_intrinsic(), adjustl_intrinsic(), align_bit_length(), allocate_stmt_semantics(), analyse_loops(), and_opr_handler(), array_dim_resolution(), array_element_to_scalar(), assignment_stmt_semantics(), bit_size_intrinsic(), bits_and_bytes_to_words(), bound_semantics(), build_loop_tbl(), change_subscript(), char_intrinsic(), char_len_resolution(), check_for_legal_define(), check_forall_triplet_for_index(), check_stat_variable(), check_target_and_value(), check_type_for_size_address(), concat_opr_handler(), constant_value_semantics(), create_argchck_descriptor(), create_constructor_constant(), create_namelist_descriptor(), create_runtime_array_constructor(), create_runtime_struct_constructor(), create_tmp_asg(), csmg_intrinsic(), cvrt_exp_to_pdg(), cvrt_opr_handler(), data_stmt_semantics(), decl_semantics(), determine_slice_size(), digits_intrinsic(), dim_intrinsic(), distribution_resolution(), do_read_namelist_semantics(), do_single_asg(), do_stmt_semantics(), doall_cmic_semantics(), doparallel_cmic_semantics(), epsilon_intrinsic(), eq_opr_handler(), equivalence_semantics(), final_arg_work(), find_base_attr(), find_opnd_line_and_column(), finish_cdir_id(), flatten_function_call(), fold_aggragate_expression(), fold_cc_expr(), fold_clen_opr(), gen_arg_type_descriptor(), gen_assumed_shape_copy(), gen_auto_length(), gen_call_type_descriptor(), gen_default_init_code(), gen_dv_stride_mult(), gen_dv_whole_def(), gen_entry_dope_code(), gen_loop_end_ir(), gen_opnd(), gen_runtime_substring(), gen_tmp_equal_max_zero(), get_char_len(), get_shape_from_attr(), huge_intrinsic(), ichar_intrinsic(), index_intrinsic(), init_directive(), init_whole_array(), insert_argchck_calls(), int_intrinsic(), interpret_adjustl_intrinsic(), interpret_constructor(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), interpret_unary_intrinsic_opr(), is_attr_referenced_in_bound(), kind_intrinsic(), kind_to_linear_type(), lbound_intrinsic(), len_trim_intrinsic(), lg_opr_handler(), lge_intrinsic(), lt_opr_handler(), make_base_subtree(), mask_intrinsic(), max_intrinsic(), max_opr_handler(), maxexponent_intrinsic(), merge_type(), minexponent_intrinsic(), minus_opr_handler(), mod_intrinsic(), modulo_intrinsic(), mult_opr_handler(), nint_intrinsic(), not_opr_handler(), object_semantics(), optimize_whole_array_init(), parse_cc_operand(), parse_data_imp_do(), parse_data_stmt(), parse_deref(), parse_dollar_directives(), parse_equivalence_stmt(), parse_id_directive(), parse_int_or_star_list(), parse_kind_selector(), parse_length_selector(), parse_lhs(), parse_mic_directives(), parse_operand(), parse_var_common_list(), pe_array_dim_resolution(), plus_opr_handler(), power_opr_handler(), precision_intrinsic(), process_char_len(), process_data_imp_do_target(), put_string_in_tmp(), radix_intrinsic(), range_intrinsic(), repeat_intrinsic(), reshape_intrinsic(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), set_global_value_variables(), shape_intrinsic(), shift_intrinsic(), short_circuit_high_level_if(), sign_intrinsic(), size_intrinsic(), size_offset_binary_calc(), size_offset_min_max_calc(), sizeof_intrinsic(), spread_intrinsic(), stmt_func_call_opr_handler(), substring_opr_handler(), tiny_intrinsic(), transfer_intrinsic(), translate_distant_ref1(), translate_distant_ref2(), trim_intrinsic(), type_init_semantics(), ubound_intrinsic(), uplus_opr_handler(), and wait_send_semantics().

#define OPND_FLD (   OPND)    OPND.fld

Definition at line 456 of file globals.m.

Referenced by abs_intrinsic(), adjustl_intrinsic(), align_bit_length(), allocate_stmt_semantics(), allocated_intrinsic(), analyse_loops(), and_opr_handler(), array_construct_opr_handler(), array_construct_semantics(), array_dim_resolution(), array_element_to_scalar(), assign_stmt_semantics(), assignment_stmt_semantics(), associated_intrinsic(), bin_array_syntax_check(), bit_size_intrinsic(), bits_and_bytes_to_words(), bound_semantics(), build_loop_tbl(), calculate_iteration_count(), call_list_semantics(), call_stmt_semantics(), case_stmt_semantics(), cast_opnd_to_type_idx(), cast_to_cg_default(), cast_to_type_idx(), change_section_to_do(), change_section_to_this_element(), change_subscript(), char_intrinsic(), char_len_resolution(), character_to_character(), check_actual_and_dummy(), check_arg_for_co_array(), check_array_bounds(), check_dependence(), check_elemental_conformance(), check_expr_for_elementals(), check_for_constructors(), check_for_dependencies(), check_for_legal_define(), check_forall_triplet_for_index(), check_stat_variable(), check_target_and_value(), check_type_for_size_address(), check_where_conformance(), cif_call_site_rec(), cif_usage_rec(), cmp_ref_trees(), compare_darg_to_actual_arg(), compare_opnds(), compute_char_element_len(), concat_opr_handler(), constant_value_semantics(), copy_and_replace_tmps(), copy_entry_exit_sh_list(), copy_sbtree(), copy_subtree(), create_argchck_descriptor(), create_array_constructor_asg(), create_bd_ntry_for_const(), create_constructor_constant(), create_imp_do_loops(), create_kwd_text(), create_loop_stmts(), create_namelist_descriptor(), create_runtime_array_constructor(), create_runtime_struct_constructor(), create_scalar_type_tbl(), create_strct_tbl(), create_struct_constructor_asg(), create_tmp_asg(), csmg_intrinsic(), cvrt_exp_to_pdg(), cvrt_opr_handler(), data_repeat_semantics(), data_stmt_semantics(), deallocate_stmt_semantics(), decl_semantics(), default_init_semantics(), determine_num_elements(), determine_slice_size(), determine_tmp_size(), digits_intrinsic(), dim_intrinsic(), dim_reshape_pass_driver(), directive_stmt_semantics(), discombobulate_structure_ref(), distribution_resolution(), do_loop_expr_semantics(), do_single_asg(), do_stmt_semantics(), doall_cmic_semantics(), doparallel_cmic_semantics(), dope_vector_setup(), else_stmt_semantics(), encode_decode_stmt_semantics(), end_blk_mp_semantics(), epsilon_intrinsic(), eq_opr_handler(), equivalence_semantics(), expand_io_list(), expand_user_bound(), expr_is_symbolic_constant(), final_arg_work(), find_base_attr(), find_left_attr(), find_opnd_line_and_column(), finish_cdir_id(), flatten_function_call(), fold_aggragate_expression(), fold_all_subscripts(), fold_cc_expr(), fold_clen_opr(), fold_nested_substrings(), forall_mask_needs_tmp(), forall_semantics(), gen_arg_type_descriptor(), gen_array_element_init(), gen_assumed_shape_copy(), gen_auto_length(), gen_bd_entry(), gen_bias_ref(), gen_bounds_check_call(), gen_call_type_descriptor(), gen_darg_branch_test(), gen_dbg_write_stmt(), gen_default_init_code(), gen_dv_access_low_bound(), gen_dv_def_loops(), gen_dv_stride_mult(), gen_dv_whole_def(), gen_entry_dope_code(), gen_forall_branch_around(), gen_forall_max_expr(), gen_forall_tmp(), gen_forall_tmp_bd_entry(), gen_if_stmt(), gen_init_stmt(), gen_internal_call_stmt(), gen_internal_dope_vector(), gen_lb_array_ref(), gen_loop_end_ir(), gen_opnd(), gen_ptr_chk_call(), gen_rbounds_check_call(), gen_rbounds_condition(), gen_runtime_bounds(), gen_runtime_checks(), gen_runtime_substring(), gen_sbounds_check_call(), gen_sf_dv_whole_def(), gen_tmp_equal_max_zero(), gen_whole_subscript(), gen_whole_substring(), generate_bounds_list(), get_char_len(), get_concat_len(), get_shape_from_attr(), goto_stmt_semantics(), has_been_reprivatized(), huge_intrinsic(), ibset_intrinsic(), ichar_intrinsic(), imp_do_metamorphed(), implied_do_depth(), index_intrinsic(), init_directive(), insert_argchck_calls(), int_intrinsic(), interpret_adjustl_intrinsic(), interpret_constructor(), interpret_data_imp_do(), interpret_implied_do(), interpret_ref(), interpret_repeat_intrinsic(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), interpret_trim_intrinsic(), interpret_unary_intrinsic_opr(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), item_has_bounds_chk(), just_find_dope_and_rank(), kind_intrinsic(), kind_to_linear_type(), lbound_intrinsic(), len_trim_intrinsic(), lg_opr_handler(), lge_intrinsic(), linearize_pe_dims(), look_for_real_div(), lt_opr_handler(), make_base_assumed_size(), make_base_subtree(), make_triplet_extent_tree(), mark_attr_defined(), mask_intrinsic(), matmul_intrinsic(), max_intrinsic(), max_opr_handler(), maxexponent_intrinsic(), merge_parameter(), minexponent_intrinsic(), minus_opr_handler(), mod_intrinsic(), modulo_intrinsic(), mp_directive_semantics(), mult_opr_handler(), namelist_static_dv_whole_def(), nint_intrinsic(), not_opr_handler(), ntr_bnds_sh_tmp_list(), ntr_bnds_tmp_list(), ntr_ref_in_global_tbl(), null_intrinsic(), nullify_stmt_semantics(), num_images_intrinsic(), object_semantics(), open_mp_directive_semantics(), optimize_reshape(), optimize_whole_array_init(), outer_imp_do_count(), output_struct_ids(), pack_intrinsic(), paren_grp_is_cplx_const(), parse_actual_arg_spec(), parse_add_opnd(), parse_and_opnd(), parse_assert_directive(), parse_assign_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_case_stmt(), parse_cc_add_opnd(), parse_cc_equiv_opnd(), parse_cc_level_2(), parse_cc_level_3(), parse_cc_level_4(), parse_cc_level_5(), parse_cc_level_6(), parse_cc_level_7(), parse_cc_level_8(), parse_cc_mult_opnd(), parse_cc_operand(), parse_cc_or_opnd(), parse_cpnt_dcl_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deref(), parse_distribution_dir(), parse_dollar_directives(), parse_equiv_opnd(), parse_equivalence_stmt(), parse_expr(), parse_forall(), parse_id_directive(), parse_imp_do(), parse_initializer(), parse_int_or_star_list(), parse_int_spec_expr(), parse_io_control_list(), parse_io_list(), parse_kind_selector(), parse_level_1(), parse_level_2(), parse_level_3(), parse_level_4(), parse_level_5(), parse_lhs(), parse_mic_directives(), parse_mp_directive(), parse_mult_opnd(), parse_name_dir(), parse_open_mp_clauses(), parse_operand(), parse_or_opnd(), parse_reference_list(), parse_star_directives(), parse_stmt_func_stmt(), parse_type_dcl_stmt(), parse_var_common_list(), parse_var_name_list(), pe_array_dim_resolution(), plus_opr_handler(), pop_task_blk(), power_opr_handler(), precision_intrinsic(), prefetch_ref_semantics(), present_intrinsic(), print_expanded_opnd(), process_all_initialized_cpnts(), process_attr_links(), process_char_len(), process_cpnt_inits(), process_deferred_functions(), process_variable_size_func(), ptr_assign_from_ptr(), push_task_blk(), put_string_in_tmp(), radix_intrinsic(), random_seed_intrinsic(), range_intrinsic(), repeat_intrinsic(), reshape_intrinsic(), reshape_reference_subscripts(), resolve_ext_opr(), scalar_dope_to_scalar(), scan_for_ptr_chk(), search_expr_for_dargs(), section_semantics(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), set_at_actual_arg(), set_global_value_variables(), set_shape_for_deferred_funcs(), set_up_exp_desc(), shape_intrinsic(), shift_intrinsic(), short_circuit_branch(), short_circuit_high_level_if(), sign_intrinsic(), size_intrinsic(), size_offset_binary_calc(), size_offset_min_max_calc(), sizeof_intrinsic(), spread_intrinsic(), srch_for_calls(), stmt_expansion_control_end(), stmt_func_call_opr_handler(), stmt_func_semantics(), struct_construct_opr_handler(), struct_opr_handler(), subscript_opr_handler(), substring_opr_handler(), tiny_intrinsic(), transfer_intrinsic(), transform_char_sequence_ref(), transform_cri_ch_ptr(), translate_distant_ref1(), translate_distant_ref2(), translate_dv_component(), tree_produces_dealloc(), trim_intrinsic(), type_init_semantics(), ubound_intrinsic(), unpack_intrinsic(), update_components(), uplus_opr_handler(), validate_char_len(), wait_send_semantics(), and where_stmt_semantics().

#define OPND_IDX (   OPND)    OPND.idx

Definition at line 457 of file globals.m.

Referenced by abs_intrinsic(), adjust_char_value_len(), adjustl_intrinsic(), aimag_intrinsic(), aint_intrinsic(), align_bit_length(), all_intrinsic(), alloc_obj_opr_handler(), allocate_stmt_semantics(), allocated_intrinsic(), analyse_loops(), and_opr_handler(), anint_intrinsic(), array_construct_opr_handler(), array_construct_semantics(), array_dim_resolution(), array_element_to_scalar(), assign_stmt_semantics(), assignment_stmt_semantics(), associated_intrinsic(), atan2_intrinsic(), bin_array_syntax_check(), bit_size_intrinsic(), bits_and_bytes_to_words(), bound_semantics(), btest_intrinsic(), buffer_stmt_semantics(), build_loop_tbl(), calculate_iteration_count(), call_list_semantics(), call_stmt_semantics(), case_stmt_semantics(), case_value_range_semantics(), cast_opnd_to_type_idx(), cast_to_cg_default(), cast_to_type_idx(), ceiling_intrinsic(), change_section_to_do(), change_section_to_this_element(), change_subscript(), char_intrinsic(), char_len_resolution(), character_to_character(), check_actual_and_dummy(), check_arg_for_co_array(), check_array_bounds(), check_dependence(), check_elemental_conformance(), check_expr_for_elementals(), check_for_constructors(), check_for_dependencies(), check_for_legal_define(), check_forall_triplet_for_index(), check_mp_dir_nesting(), check_stat_variable(), check_target_and_value(), check_type_for_size_address(), check_where_conformance(), cif_call_site_rec(), cif_usage_rec(), clock_intrinsic(), cmp_ref_trees(), cmplx_intrinsic(), compare_and_swap_intrinsic(), compare_darg_to_actual_arg(), compare_opnds(), compute_char_element_len(), concat_opr_handler(), conjg_intrinsic(), const_init_semantics(), constant_value_semantics(), copy_and_replace_tmps(), copy_entry_exit_sh_list(), copy_sbtree(), copy_subtree(), create_argchck_descriptor(), create_array_constructor_asg(), create_bd_ntry_for_const(), create_constructor_constant(), create_imp_do_loops(), create_kwd_text(), create_loop_stmts(), create_namelist_descriptor(), create_runtime_array_constructor(), create_runtime_struct_constructor(), create_scalar_type_tbl(), create_strct_tbl(), create_struct_constructor_asg(), create_tmp_asg(), cshift_intrinsic(), csmg_intrinsic(), cvmgp_intrinsic(), cvrt_exp_to_pdg(), cvrt_opr_handler(), data_repeat_semantics(), data_stmt_semantics(), dealloc_obj_opr_handler(), deallocate_stmt_semantics(), decl_semantics(), default_init_semantics(), defined_bin_opr_handler(), defined_un_opr_handler(), determine_num_elements(), determine_slice_size(), determine_tmp_size(), digits_intrinsic(), dim_intrinsic(), dim_reshape_pass_driver(), directive_stmt_semantics(), discombobulate_structure_ref(), distribution_resolution(), do_loop_expr_semantics(), do_read_namelist_semantics(), do_single_asg(), do_stmt_semantics(), do_write_namelist_semantics(), doall_cmic_semantics(), doparallel_cmic_semantics(), dope_vector_setup(), dot_product_intrinsic(), dprod_intrinsic(), dshiftl_intrinsic(), dsm_numthreads_intrinsic(), else_stmt_semantics(), encode_decode_stmt_semantics(), end_blk_mp_semantics(), eoshift_intrinsic(), epsilon_intrinsic(), eq_opr_handler(), equivalence_semantics(), exit_intrinsic(), expand_io_list(), expand_user_bound(), exponent_intrinsic(), expr_is_symbolic_constant(), fcd_intrinsic(), fetch_and_add_intrinsic(), final_arg_work(), find_base_attr(), find_left_attr(), find_opnd_line_and_column(), finish_cdir_id(), flatten_function_call(), floor_intrinsic(), fold_aggragate_expression(), fold_all_subscripts(), fold_cc_expr(), fold_clen_opr(), fold_nested_substrings(), forall_mask_needs_tmp(), forall_semantics(), fraction_intrinsic(), free_intrinsic(), gen_arg_type_descriptor(), gen_array_element_init(), gen_assumed_shape_copy(), gen_auto_length(), gen_bd_entry(), gen_bias_ref(), gen_bounds_check_call(), gen_call_type_descriptor(), gen_darg_branch_test(), gen_default_init_code(), gen_dv_access_low_bound(), gen_dv_def_loops(), gen_dv_stride_mult(), gen_dv_whole_def(), gen_entry_dope_code(), gen_forall_branch_around(), gen_forall_max_expr(), gen_forall_tmp(), gen_forall_tmp_bd_entry(), gen_if_stmt(), gen_init_stmt(), gen_internal_call_stmt(), gen_internal_dope_vector(), gen_lb_array_ref(), gen_loop_end_ir(), gen_opnd(), gen_ptr_chk_call(), gen_rbounds_check_call(), gen_rbounds_condition(), gen_runtime_bounds(), gen_runtime_checks(), gen_runtime_substring(), gen_sbounds_check_call(), gen_section_ref(), gen_sf_dv_whole_def(), gen_tmp_equal_max_zero(), gen_whole_subscript(), gen_whole_substring(), generate_bounds_list(), get_char_len(), get_concat_len(), get_ieee_status_intrinsic(), get_shape_from_attr(), getpos_intrinsic(), goto_stmt_semantics(), has_been_reprivatized(), huge_intrinsic(), iand_intrinsic(), ibits_intrinsic(), ibset_intrinsic(), ichar_intrinsic(), idate_intrinsic(), ieee_finite_intrinsic(), ieee_real_intrinsic(), ilen_intrinsic(), imp_do_metamorphed(), implied_do_depth(), index_intrinsic(), init_directive(), init_whole_array(), insert_argchck_calls(), int_intrinsic(), interpret_adjustl_intrinsic(), interpret_binary_intrinsic_opr(), interpret_binary_opr(), interpret_concat_opr(), interpret_constructor(), interpret_csmg_opr(), interpret_cvmgt_opr(), interpret_data_imp_do(), interpret_implied_do(), interpret_index_opr(), interpret_max_min_opr(), interpret_ref(), interpret_repeat_intrinsic(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), interpret_trim_intrinsic(), interpret_unary_intrinsic_opr(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), item_has_bounds_chk(), just_find_dope_and_rank(), kind_intrinsic(), kind_to_linear_type(), lbound_intrinsic(), leadz_intrinsic(), len_intrinsic(), len_trim_intrinsic(), length_intrinsic(), lg_opr_handler(), lge_intrinsic(), linearize_pe_dims(), loc_intrinsic(), lock_release_intrinsic(), logical_intrinsic(), look_for_real_div(), lt_opr_handler(), make_base_assumed_size(), make_base_subtree(), make_triplet_extent_tree(), malloc_intrinsic(), mark_attr_defined(), mask_intrinsic(), matmul_intrinsic(), max_intrinsic(), max_opr_handler(), maxexponent_intrinsic(), mclr_intrinsic(), memory_barrier_intrinsic(), merge_parameter(), mergee_intrinsic(), minexponent_intrinsic(), minus_opr_handler(), minval_intrinsic(), mld_intrinsic(), mldmx_intrinsic(), mmx_intrinsic(), mod_intrinsic(), modulo_intrinsic(), mp_directive_semantics(), mul_intrinsic(), mult_opr_handler(), must_reassign_XT_temp(), mvbits_intrinsic(), my_pe_intrinsic(), namelist_static_dv_whole_def(), nearest_intrinsic(), nint_intrinsic(), not_intrinsic(), not_opr_handler(), ntr_bnds_sh_tmp_list(), ntr_bnds_tmp_list(), ntr_ref_in_global_tbl(), null_intrinsic(), nullify_stmt_semantics(), num_images_intrinsic(), numarg_intrinsic(), object_semantics(), omp_get_max_threads_intrinsic(), omp_set_lock_intrinsic(), open_mp_directive_semantics(), optimize_reshape(), optimize_whole_array_init(), outer_imp_do_count(), output_struct_ids(), pack_intrinsic(), paren_grp_is_cplx_const(), paren_opr_handler(), parse_actual_arg_spec(), parse_add_opnd(), parse_and_opnd(), parse_assign_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_cc_add_opnd(), parse_cc_equiv_opnd(), parse_cc_expr(), parse_cc_level_2(), parse_cc_level_3(), parse_cc_level_4(), parse_cc_level_5(), parse_cc_level_6(), parse_cc_level_7(), parse_cc_level_8(), parse_cc_mult_opnd(), parse_cc_operand(), parse_cc_or_opnd(), parse_cpnt_dcl_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deref(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_equiv_opnd(), parse_equivalence_stmt(), parse_expr(), parse_id_directive(), parse_imp_do(), parse_initializer(), parse_int_or_star_list(), parse_int_spec_expr(), parse_io_control_list(), parse_io_list(), parse_kind_selector(), parse_level_1(), parse_level_2(), parse_level_3(), parse_level_4(), parse_level_5(), parse_lhs(), parse_mic_directives(), parse_mp_directive(), parse_mult_opnd(), parse_name_dir(), parse_open_mp_clauses(), parse_operand(), parse_or_opnd(), parse_parallel_cmic(), parse_reference_list(), parse_stmt_func_stmt(), parse_type_dcl_stmt(), parse_var_common_list(), parse_var_name_list(), pe_array_dim_resolution(), plus_opr_handler(), pop_task_blk(), power_opr_handler(), precision_intrinsic(), prefetch_ref_semantics(), present_intrinsic(), print_expanded_opnd(), process_all_initialized_cpnts(), process_attr_links(), process_blockable_dir(), process_char_len(), process_cpnt_inits(), process_data_imp_do_target(), process_deferred_functions(), process_interchange_dir(), process_variable_size_func(), ptr_assign_from_ptr(), push_task_blk(), put_string_in_tmp(), radix_intrinsic(), random_number_intrinsic(), random_seed_intrinsic(), ranf_intrinsic(), range_intrinsic(), ranget_intrinsic(), readsm_intrinsic(), real_intrinsic(), remote_write_barrier_intrinsic(), repeat_intrinsic(), reshape_intrinsic(), reshape_reference_subscripts(), resolve_ext_opr(), rrspacing_intrinsic(), rtc_intrinsic(), scalar_dope_to_scalar(), scale_intrinsic(), scan_for_ptr_chk(), search_expr_for_dargs(), section_semantics(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), set_at_actual_arg(), set_exponent_intrinsic(), set_global_value_variables(), set_ieee_exception_intrinsic(), set_shape_for_deferred_funcs(), set_up_exp_desc(), setup_interchange_level_list(), shape_intrinsic(), shift_intrinsic(), short_circuit_branch(), short_circuit_high_level_if(), sign_intrinsic(), sin_intrinsic(), size_intrinsic(), size_offset_binary_calc(), size_offset_min_max_calc(), sizeof_intrinsic(), spacing_intrinsic(), spread_intrinsic(), srch_for_calls(), stmt_expansion_control_end(), stmt_func_call_opr_handler(), stmt_func_semantics(), struct_construct_opr_handler(), struct_opr_handler(), subscript_opr_handler(), substring_opr_handler(), synchronize_intrinsic(), system_clock_intrinsic(), test_ieee_interrupt_intrinsic(), tiny_intrinsic(), transfer_intrinsic(), transform_char_sequence_ref(), transform_cri_ch_ptr(), translate_distant_dv_ref(), translate_distant_ref(), translate_distant_ref1(), translate_distant_ref2(), translate_dv_component(), transpose_intrinsic(), tree_produces_dealloc(), trim_intrinsic(), triplet_opr_handler(), type_init_semantics(), ubound_intrinsic(), unit_intrinsic(), unpack_intrinsic(), update_components(), uplus_opr_handler(), validate_char_len(), wait_send_semantics(), where_stmt_semantics(), and write_memory_barrier_intrinsic().

#define OPND_LINE_NUM (   OPND)    OPND.line_num

Definition at line 454 of file globals.m.

Referenced by abs_intrinsic(), adjustl_intrinsic(), align_bit_length(), allocate_stmt_semantics(), analyse_loops(), and_opr_handler(), array_dim_resolution(), array_element_to_scalar(), assignment_stmt_semantics(), bit_size_intrinsic(), bits_and_bytes_to_words(), bound_semantics(), build_loop_tbl(), change_subscript(), char_intrinsic(), char_len_resolution(), check_for_legal_define(), check_forall_triplet_for_index(), check_stat_variable(), check_target_and_value(), check_type_for_size_address(), concat_opr_handler(), constant_value_semantics(), create_argchck_descriptor(), create_constructor_constant(), create_namelist_descriptor(), create_runtime_array_constructor(), create_runtime_struct_constructor(), create_tmp_asg(), csmg_intrinsic(), cvrt_exp_to_pdg(), cvrt_opr_handler(), data_stmt_semantics(), decl_semantics(), determine_slice_size(), digits_intrinsic(), dim_intrinsic(), distribution_resolution(), do_read_namelist_semantics(), do_single_asg(), do_stmt_semantics(), doall_cmic_semantics(), doparallel_cmic_semantics(), epsilon_intrinsic(), eq_opr_handler(), equivalence_semantics(), final_arg_work(), find_base_attr(), find_opnd_line_and_column(), finish_cdir_id(), flatten_function_call(), fold_aggragate_expression(), fold_cc_expr(), fold_clen_opr(), gen_arg_type_descriptor(), gen_assumed_shape_copy(), gen_auto_length(), gen_call_type_descriptor(), gen_default_init_code(), gen_dv_stride_mult(), gen_dv_whole_def(), gen_entry_dope_code(), gen_loop_end_ir(), gen_opnd(), gen_runtime_substring(), gen_tmp_equal_max_zero(), get_char_len(), get_shape_from_attr(), huge_intrinsic(), ichar_intrinsic(), index_intrinsic(), init_directive(), init_whole_array(), insert_argchck_calls(), int_intrinsic(), interpret_adjustl_intrinsic(), interpret_constructor(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), interpret_unary_intrinsic_opr(), is_attr_referenced_in_bound(), kind_intrinsic(), kind_to_linear_type(), lbound_intrinsic(), len_trim_intrinsic(), lg_opr_handler(), lge_intrinsic(), lt_opr_handler(), make_base_subtree(), mask_intrinsic(), max_intrinsic(), max_opr_handler(), maxexponent_intrinsic(), merge_type(), minexponent_intrinsic(), minus_opr_handler(), mod_intrinsic(), modulo_intrinsic(), mult_opr_handler(), nint_intrinsic(), not_opr_handler(), object_semantics(), optimize_whole_array_init(), parse_cc_operand(), parse_data_imp_do(), parse_data_stmt(), parse_deref(), parse_dollar_directives(), parse_equivalence_stmt(), parse_id_directive(), parse_int_or_star_list(), parse_kind_selector(), parse_length_selector(), parse_lhs(), parse_mic_directives(), parse_operand(), parse_var_common_list(), pe_array_dim_resolution(), plus_opr_handler(), power_opr_handler(), precision_intrinsic(), process_char_len(), process_data_imp_do_target(), put_string_in_tmp(), radix_intrinsic(), range_intrinsic(), repeat_intrinsic(), reshape_intrinsic(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), set_global_value_variables(), shape_intrinsic(), shift_intrinsic(), short_circuit_high_level_if(), sign_intrinsic(), size_intrinsic(), size_offset_binary_calc(), size_offset_min_max_calc(), sizeof_intrinsic(), spread_intrinsic(), stmt_func_call_opr_handler(), substring_opr_handler(), tiny_intrinsic(), transfer_intrinsic(), translate_distant_ref1(), translate_distant_ref2(), trim_intrinsic(), type_init_semantics(), ubound_intrinsic(), uplus_opr_handler(), and wait_send_semantics().

#define OUTPUT_TO_STDOUT   0100 /* s */

Definition at line 129 of file globals.m.

#define PACK_16_BIT_TEST_CONDITION (   TYPE_IDX)
Value:
(TYP_LINEAR(TYPE_IDX) == Integer_1 ||          \
                                 TYP_LINEAR(TYPE_IDX) == Logical_1 ||          \
                                 TYP_LINEAR(TYPE_IDX) == Integer_2 ||          \
                                 TYP_LINEAR(TYPE_IDX) == Logical_2 ||          \
                                (TYP_TYPE(TYPE_IDX) == Structure &&            \
                                (ATT_ALIGNMENT(TYP_IDX(TYPE_IDX)) == Align_8 ||\
                                 ATT_ALIGNMENT(TYP_IDX(TYPE_IDX)) == Align_16)))

Definition at line 324 of file globals.m.

Referenced by assign_offset(), final_equivalence_semantics(), linearize_list_for_equiv(), parse_cpnt_dcl_stmt(), and send_attr_ntry().

#define PACK_8_BIT_TEST_CONDITION (   TYPE_IDX)
Value:
(TYP_LINEAR(TYPE_IDX) == Integer_1 ||          \
                                 TYP_LINEAR(TYPE_IDX) == Logical_1 ||          \
                                (TYP_TYPE(TYPE_IDX) == Structure &&            \
                                ATT_ALIGNMENT(TYP_IDX(TYPE_IDX)) == Align_8))

Definition at line 318 of file globals.m.

Referenced by assign_offset(), final_equivalence_semantics(), linearize_list_for_equiv(), parse_cpnt_dcl_stmt(), and send_attr_ntry().

#define PACK_HALF_WORD_TEST_CONDITION (   TYPE_IDX)
Value:
TARGET_MAX_HALF_WORD_STORAGE_TYPE(TYPE_IDX) || \
                                (TYP_TYPE(TYPE_IDX) == Structure &&            \
                                ATT_ALIGNMENT(TYP_IDX(TYPE_IDX))== Align_32)

Definition at line 313 of file globals.m.

Referenced by assign_offset(), attr_semantics(), final_equivalence_semantics(), linearize_list_for_equiv(), parse_cpnt_dcl_stmt(), and send_attr_ntry().

#define PAUSE_LIB_ENTRY   "_PAUSE"

Definition at line 417 of file globals.m.

Referenced by stop_pause_stmt_semantics().

#define PAUSE_NAME_LEN   6

Definition at line 418 of file globals.m.

Referenced by stop_pause_stmt_semantics().

#define PLUS   '+'

Definition at line 102 of file globals.m.

#define POP_CURR_STMT
Value:
if (curr_stmt_stk_il_idx) { int _save_list_idx;                             \
      curr_stmt_sh_idx = IL_IDX(curr_stmt_stk_il_idx);                         \
      _save_list_idx = curr_stmt_stk_il_idx;                                   \
      curr_stmt_stk_il_idx = IL_NEXT_LIST_IDX(curr_stmt_stk_il_idx);           \
      FREE_IR_LIST_NODE(_save_list_idx);                                       \
   }

Definition at line 951 of file globals.m.

Referenced by stmt_expansion_control_end().

#define PTR_CHK_LIB_ENTRY   "_POINTER_ERROR"

Definition at line 439 of file globals.m.

Referenced by gen_ptr_chk_call().

#define PTR_CHK_NAME_LEN   14

Definition at line 440 of file globals.m.

Referenced by gen_ptr_chk_call().

#define PUSH_CURR_STMT
Value:
{ int _list_idx;                                                            \
      NTR_IR_LIST_TBL(_list_idx);                                              \
      IL_FLD(_list_idx) = SH_Tbl_Idx;                                          \
      IL_IDX(_list_idx) = curr_stmt_sh_idx;                                    \
      if (curr_stmt_stk_il_idx == NULL_IDX) {                                  \
         curr_stmt_stk_il_idx = _list_idx;                                     \
      } else {                                                                 \
         IL_NEXT_LIST_IDX(_list_idx) = curr_stmt_stk_il_idx;                   \
         curr_stmt_stk_il_idx = _list_idx;                                     \
      }                                                                        \
   }

Definition at line 938 of file globals.m.

Referenced by stmt_expansion_control_start().

#define QUEST_MARK   '?'

Definition at line 103 of file globals.m.

#define RBOUNDS_LIB_ENTRY   "_RBOUNDS_ERROR"

Definition at line 433 of file globals.m.

Referenced by gen_rbounds_check_call().

#define RBOUNDS_NAME_LEN   14

Definition at line 434 of file globals.m.

Referenced by gen_rbounds_check_call().

#define RBRKT   ']'

Definition at line 105 of file globals.m.

Referenced by parse_deref(), parse_lhs(), and parse_pe_array_spec().

#define RC_INTERNAL_ERROR   2 /* The compiler error terminated. */
#define RC_OKAY   0 /* Compiler executed successfully. */

Definition at line 495 of file globals.m.

Referenced by init_compiler(), and main().

#define REALLOC_LIB_ENTRY   "_REALLOC"

Definition at line 376 of file globals.m.

Referenced by create_runtime_array_constructor(), and test_size_stmts().

#define REALLOC_NAME_LEN   8

Definition at line 377 of file globals.m.

Referenced by create_runtime_array_constructor(), and test_size_stmts().

#define RELEASE_LEVEL_LEN   24

Definition at line 338 of file globals.m.

Referenced by init_release_level().

#define REWIND_LIB_ENTRY   "_REWF"

Definition at line 407 of file globals.m.

Referenced by parse_rewind_stmt().

#define REWIND_NAME_LEN   5

Definition at line 408 of file globals.m.

Referenced by parse_rewind_stmt().

#define RPAREN   ')'

Definition at line 106 of file globals.m.

Referenced by _ld_write(), _mr_scan_complex(), create_kwd_text(), get_operator(), get_program_str(), get_punctuator(), paren_grp_is_cplx_const(), parse_actual_arg_spec(), parse_allocate_stmt(), parse_array_spec(), parse_assert_directive(), parse_buffer_stmt(), parse_case_stmt(), parse_data_imp_do(), parse_deallocate_stmt(), parse_decode_stmt(), parse_define_str(), parse_deref(), parse_dir_directives(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_dummy_args(), parse_else_stmt(), parse_encode_stmt(), parse_equivalence_stmt(), parse_err_flush(), parse_fill_align_symbol(), parse_forall(), parse_generic_spec(), parse_if_stmt(), parse_imp_do(), parse_implicit_stmt(), parse_inquire_stmt(), parse_intent_spec(), parse_io_control_list(), parse_io_list(), parse_label_list(), parse_length_selector(), parse_lhs(), parse_mic_directives(), parse_mp_directive(), parse_name_dir(), parse_nullify_stmt(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_openad_varlist(), parse_operand(), parse_par_directives(), parse_parallel_cmic(), parse_parameter_stmt(), parse_permutation_mic(), parse_pointer_stmt(), parse_redistribute_dir(), parse_select_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_star_dir_directives(), parse_star_directives(), parse_stmt_func_stmt(), parse_type_dcl_stmt(), parse_type_spec(), parse_where_stmt(), scan_cc_macro(), and set_function_rslt().

#define SBOUNDS_LIB_ENTRY   "_SBOUNDS_ERROR"

Definition at line 436 of file globals.m.

Referenced by gen_sbounds_check_call().

#define SBOUNDS_NAME_LEN   14

Definition at line 437 of file globals.m.

Referenced by gen_sbounds_check_call().

#define SEMI_COLON   ';'

Definition at line 107 of file globals.m.

#define SET_LARGEST_IDX (   STRUCT,
  CHECK_IDX,
  NEW_IDX 
)
Value:
if (STRUCT##_largest_idx < CHECK_IDX) {                        \
                   STRUCT##_largest_idx = NEW_IDX;                             \
                }

Definition at line 659 of file globals.m.

#define SET_MESSAGE_TBL (   TBL,
  MSG_NUM 
)
Value:
{int    _shift, _idx;                                                  \
                _idx   = MSG_NUM / HOST_BITS_PER_WORD;                         \
                _shift = HOST_BITS_PER_WORD - ((MSG_NUM%HOST_BITS_PER_WORD)+1);\
                TBL[_idx] |= 1 << _shift;                                      \
        }

Definition at line 725 of file globals.m.

#define SET_NUMTHREADS_ENTRY   "mp_set_numthreads_"

Definition at line 450 of file globals.m.

Referenced by parse_dir_directives(), and parse_mic_directives().

#define SET_NUMTHREADS_NAME_LEN   18

Definition at line 451 of file globals.m.

Referenced by parse_dir_directives(), and parse_mic_directives().

#define SHARP   '#'

Definition at line 108 of file globals.m.

#define SHIFT_ARITH_ARG (   VAR,
  TYPE 
)

Definition at line 793 of file globals.m.

Referenced by convert_to_string(), f_int_to_cval(), and folder_driver().

#define SHIFT_ARITH_RESULT (   VAR,
  TYPE 
)
#define START_PES_LIB_ENTRY   "start_pes_"

Definition at line 446 of file globals.m.

Referenced by decl_semantics().

#define START_PES_NAME_LEN   10

Definition at line 447 of file globals.m.

Definition at line 929 of file globals.m.

Referenced by process_deferred_functions(), and stmt_expansion_control_end().

#define STMT_EXPAND_BEFORE_START_SH (   IDX)    IL_IDX(IR_IDX_R(IDX))

Definition at line 926 of file globals.m.

Referenced by process_deferred_functions(), and stmt_expansion_control_end().

#define STOP_ALL_LIB_ENTRY   "STOP_ALL"

Definition at line 424 of file globals.m.

Referenced by stop_pause_stmt_semantics().

#define STOP_ALL_NAME_LEN   8

Definition at line 425 of file globals.m.

Referenced by stop_pause_stmt_semantics().

#define STOP_LIB_ENTRY   "_STOP"

Definition at line 420 of file globals.m.

Referenced by stop_pause_stmt_semantics().

#define STOP_NAME_LEN   5

Definition at line 421 of file globals.m.

Referenced by stop_pause_stmt_semantics().

#define TAB   '\t'

Definition at line 111 of file globals.m.

Referenced by get_operand_letter(), and get_operand_quote().

#define TBL_ALLOC (   PTR)    MEM_ALLOC (PTR, PTR##_type, PTR##_size);

Definition at line 693 of file globals.m.

Referenced by init_compiler().

#define TBL_FREE (   STRUCT)
Value:
if (STRUCT != NULL) {           /* wasn't previously alloced */        \
           MEM_REPORT(STRUCT);                                                 \
           CLEAR_LARGEST_IDX(STRUCT);                                          \
           MEM_FREE(STRUCT);                                                   \
           STRUCT##_idx = 0;                                                   \
           STRUCT##_size = 0;                                                  \
        }

Definition at line 554 of file globals.m.

Referenced by collapse_interface_blk(), cvrt_to_pdg(), find_prog_unit_tbl(), free_tables(), output_mod_info_file(), parse_prog_unit(), semantics_pass_driver(), and use_stmt_semantics().

#define TBL_REALLOC_CK (   PTR,
  NUM_ENTRIES 
)
#define TRUE   1

Definition at line 77 of file globals.m.

Definition at line 59 of file globals.m.

Referenced by adjust_char_value_len(), analyse_loops(), assignment_stmt_semantics(), attr_semantics(), btest_intrinsic(), buffer_stmt_semantics(), call_list_semantics(), cast_typeless_constant(), change_section_to_do(), change_subscript(), check_multiple_entry_func(), ck_lbl_construct_name(), convert_hex_literal(), create_argchck_descriptor(), create_constructor_constant(), create_format_tmp(), create_imp_do_loops(), create_kwd_text(), create_loop_stmts(), create_runtime_array_constructor(), create_struct_argchck_tbl(), create_tmp_asg(), csmg_intrinsic(), cvmgp_intrinsic(), data_imp_do_semantics(), data_stmt_semantics(), deallocate_local_allocatables(), determine_lb_ub(), do_stmt_semantics(), dshiftl_intrinsic(), else_stmt_semantics(), end_function(), end_if_blk(), end_internal_proc(), end_module_proc(), end_program_unit(), end_select_blk(), end_subroutine(), end_task_do_blk(), exit_intrinsic(), final_arg_work(), final_decl_semantics(), find_attrs_used_in_bound(), flatten_function_call(), fold_aggragate_expression(), free_intrinsic(), gen_arg_type_descriptor(), gen_assumed_shape_copy(), gen_attr_and_IR_for_lbl(), gen_bd_entry(), gen_bounds_check_call(), gen_branch_around_ir(), gen_call_type_descriptor(), gen_conform_check_call(), gen_copyin_bounds_stmt(), gen_dbg_write_stmt(), gen_debug_lbl_stmt(), gen_directive_ir(), gen_end_prologue_debug_label(), gen_forall_branch_around(), gen_forall_tmp(), gen_if_ir(), gen_if_stmt(), gen_init_stmt(), gen_initialized_tmp(), gen_loop_end_ir(), gen_present_ir(), gen_ptr_chk_call(), gen_rbounds_check_call(), gen_sbounds_check_call(), gen_single_automatic_allocate(), gen_stmt_expansion_opr(), gen_temp_init(), gen_user_code_start_opr(), iand_intrinsic(), ibits_intrinsic(), imp_do_metamorphed(), init_call_structs(), insert_argchck_calls(), insert_init_stmt_for_tmp(), io_ctl_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), loop_end_processing(), mask_intrinsic(), mclr_intrinsic(), merge_parameter(), mld_intrinsic(), mldmx_intrinsic(), mmx_intrinsic(), mul_intrinsic(), mvbits_intrinsic(), not_intrinsic(), null_intrinsic(), num_images_intrinsic(), outmoded_if_stmt_semantics(), parse_allocate_stmt(), parse_assign_stmt(), parse_backspace_stmt(), parse_buffer_stmt(), parse_call_stmt(), parse_case_stmt(), parse_close_stmt(), parse_cpnt_dcl_stmt(), parse_cycle_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_do_stmt(), parse_else_stmt(), parse_encode_stmt(), parse_endfile_stmt(), parse_entry_stmt(), parse_exit_stmt(), parse_forall(), parse_goto_stmt(), parse_imp_do(), parse_inquire_stmt(), parse_nullify_stmt(), parse_open_stmt(), parse_print_stmt(), parse_prog_unit(), parse_read_stmt(), parse_return_stmt(), parse_rewind_stmt(), parse_select_stmt(), parse_stop_pause_stmt(), parse_type_dcl_stmt(), parse_type_spec(), parse_use_stmt(), parse_where_stmt(), parse_write_stmt(), process_all_initialized_cpnts(), ptr_assign_from_ptr(), put_string_in_tmp(), random_seed_intrinsic(), ranget_intrinsic(), read_stmt_semantics(), resolve_ext_opr(), set_function_rslt(), set_up_allocate_as_call(), shift_intrinsic(), short_circuit_branch(), srch_for_calls(), start_new_prog_unit(), start_new_subpgm(), stop_pause_stmt_semantics(), storage_blk_resolution(), synchronize_intrinsic(), system_clock_intrinsic(), test_size_stmts(), transfer_intrinsic(), translate_distant_dv_ref(), translate_dv_component(), use_stmt_semantics(), verify_interface(), vv_subscript_semantics(), and write_stmt_semantics().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines