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

Go to the source code of this file.

Defines

#define MD_CURRENT_VERSION   16
#define MD_LAST_1_0_VERSION   3
#define MD_LAST_2_0_VERSION   7
#define MD_LAST_3_0_VERSION   14 /* 3.0 starts at 11 */
#define MD_LAST_4_0_VERSION   15 /* 4.0 starts at 15 */
#define MD_LAST_5_0_VERSION   16 /* 5.0 starts at 16 */
#define MD_PDT_HEADER_BYTE_SIZE   sizeof(pdt_tbl_hdr_type)
#define MD_TBL_BYTE_SIZE   sizeof(mit_header_type)
#define MD_TBL_SIZE   MD_TBL_BYTE_SIZE/TARGET_BYTES_PER_WORD
#define MD_DIRECTORY_BYTE_SIZE   sizeof(mit_descriptor_type)
#define MD_AFTER_PDT   (&mit_header.wd[1])
#define OLD_MD_ALTERNATE_ENTRY   mit_header.old_tbl.alternate_entry
#define OLD_MD_NAME_LEN   mit_header.old_tbl.name_length
#define MD_ALTERNATE_ENTRY   mit_header.tbl.alternate_entry
#define MD_CF77TYPES   mit_header.tbl.cf77types
#define MD_DALIGN   mit_header.tbl.dalign
#define MD_DEFAULT_INTEGER_TYPE   mit_header.tbl.default_integer
#define MD_DEFAULT32   mit_header.tbl.default32
#define MD_DEFAULT64   mit_header.tbl.default64
#define MD_ENABLE_DOUBLE_PRECISION   mit_header.tbl.dp_hit_me
#define MD_FLOAT64   mit_header.tbl.float64
#define MD_HAS_ERRORS   mit_header.tbl.mod_has_errors
#define MD_MODULE   mit_header.tbl.module
#define MD_NAME_LEN   mit_header.tbl.name_length
#define MD_NEW_CONST_TBL   mit_header.tbl.new_cn_tbl
#define MD_POINTER8   mit_header.tbl.pointer8
#define MD_TARGET   mit_header.tbl.target
#define MD_VERSION_NUM   mit_header.tbl.version_num
#define MD_PDT_HDR_TYPE   mit_header.tbl.hdr.hdr_type
#define MD_PDT_HDR_LEN   mit_header.tbl.hdr.hdr_len
#define MD_NAME_PTR   &mit_header.tbl.name_char[0]
#define MD_NAME_LONG   (&mit_header.wd[2])
#define MD_TBL_TYPE(IDX)   mit_descriptor[IDX].fld.tbl_type
#define MD_NUM_ENTRIES(IDX)   mit_descriptor[IDX].fld.num_entries
#define OUTPUT_TBL_TO_MODULE(FILE, MOD_ATTR_IDX, TBL)
#define FSEEK(FILE_PTR, OFFSET, ORIGIN)
#define KEEP_ATTR(AT_IDX)   if (!ML_AT_KEEP_ME(AT_IDX)) set_mod_link_tbl_for_attr(AT_IDX)
#define KEEP_CN(CN_IDX)   if (!ML_CN_KEEP_ME(CN_IDX)) set_mod_link_tbl_for_cn(CN_IDX)
#define KEEP_IR(IR_IDX)   if (!ML_IR_KEEP_ME(IR_IDX)) set_mod_link_tbl_for_ir(IR_IDX)

Define Documentation

#define FSEEK (   FILE_PTR,
  OFFSET,
  ORIGIN 
)
Value:
((fseek(FILE_PTR, OFFSET, ORIGIN) == 0) &&                             \
         (ftell(FILE_PTR) <= mod_file_end_offset))

Definition at line 116 of file module.m.

#define KEEP_IR (   IR_IDX)    if (!ML_IR_KEEP_ME(IR_IDX)) set_mod_link_tbl_for_ir(IR_IDX)
#define MD_AFTER_PDT   (&mit_header.wd[1])

Definition at line 65 of file module.m.

Referenced by read_module_tbl_header(), and srch_for_module_tbl().

#define MD_CF77TYPES   mit_header.tbl.cf77types

Definition at line 72 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

#define MD_CURRENT_VERSION   16

Definition at line 50 of file module.m.

Referenced by find_prog_unit_tbl(), and output_mod_info_file().

#define MD_DALIGN   mit_header.tbl.dalign

Definition at line 73 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

#define MD_DEFAULT32   mit_header.tbl.default32

Definition at line 75 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

#define MD_DEFAULT64   mit_header.tbl.default64

Definition at line 76 of file module.m.

Referenced by find_prog_unit_tbl(), and output_mod_info_file().

#define MD_DEFAULT_INTEGER_TYPE   mit_header.tbl.default_integer

Definition at line 74 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

Definition at line 60 of file module.m.

#define MD_ENABLE_DOUBLE_PRECISION   mit_header.tbl.dp_hit_me

Definition at line 77 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

Definition at line 78 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

#define MD_HAS_ERRORS   mit_header.tbl.mod_has_errors
#define MD_LAST_1_0_VERSION   3

Definition at line 51 of file module.m.

#define MD_LAST_2_0_VERSION   7

Definition at line 52 of file module.m.

#define MD_LAST_3_0_VERSION   14 /* 3.0 starts at 11 */

Definition at line 53 of file module.m.

Referenced by find_prog_unit_tbl().

#define MD_LAST_4_0_VERSION   15 /* 4.0 starts at 15 */
#define MD_LAST_5_0_VERSION   16 /* 5.0 starts at 16 */

Definition at line 55 of file module.m.

#define MD_MODULE   mit_header.tbl.module

Definition at line 80 of file module.m.

Referenced by print_mod_tbl().

#define MD_NAME_LEN   mit_header.tbl.name_length
#define MD_NAME_LONG   (&mit_header.wd[2])
#define MD_NAME_PTR   &mit_header.tbl.name_char[0]

Definition at line 89 of file module.m.

Referenced by dump_pdt(), and print_mod_tbl().

#define MD_NEW_CONST_TBL   mit_header.tbl.new_cn_tbl

Definition at line 82 of file module.m.

Referenced by output_mod_info_file(), and read_sytb_from_module_file().

#define MD_PDT_HDR_LEN   mit_header.tbl.hdr.hdr_len
#define MD_PDT_HDR_TYPE   mit_header.tbl.hdr.hdr_type

Definition at line 57 of file module.m.

Referenced by read_module_tbl_header(), and srch_for_module_tbl().

#define MD_POINTER8   mit_header.tbl.pointer8

Definition at line 83 of file module.m.

Referenced by print_mod_tbl().

Definition at line 84 of file module.m.

Referenced by find_prog_unit_tbl(), output_mod_info_file(), and print_mod_tbl().

#define MD_TBL_BYTE_SIZE   sizeof(mit_header_type)

Definition at line 58 of file module.m.

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

#define MD_TBL_SIZE   MD_TBL_BYTE_SIZE/TARGET_BYTES_PER_WORD

Definition at line 59 of file module.m.

#define MD_TBL_TYPE (   IDX)    mit_descriptor[IDX].fld.tbl_type

Definition at line 97 of file module.m.

Referenced by output_mod_info_file(), print_mod_tbl(), and read_sytb_from_module_file().

#define MD_VERSION_NUM   mit_header.tbl.version_num

Definition at line 68 of file module.m.

#define OLD_MD_NAME_LEN   mit_header.old_tbl.name_length

Definition at line 69 of file module.m.

#define OUTPUT_TBL_TO_MODULE (   FILE,
  MOD_ATTR_IDX,
  TBL 
)
Value:
{int    _num_objs;                                                     \
          if (TBL##_idx > NULL_IDX) {                                          \
             _num_objs  = fwrite(&TBL[1],                                      \
                                 sizeof(TBL##_type),                           \
                                 TBL##_idx,                                    \
                                 FILE);                                        \
             if (_num_objs != TBL##_idx) {                                     \
                PRINTMSG(AT_DEF_LINE(MOD_ATTR_IDX), 726, Error,                \
                         AT_DEF_COLUMN(MOD_ATTR_IDX),                          \
                         AT_OBJ_NAME_PTR(MOD_ATTR_IDX));                       \
             }                                                                 \
           }                                                                   \
         }

Definition at line 101 of file module.m.

Referenced by output_mod_info_file().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines