!*** MODULE ELFDEF IDENT X-39 ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
	PARAMETER EHDR$K_EI_NIDENT = '00000010'X
	PARAMETER EHDR$SC_EF_VMS_COMCOD = '00000000'X
	PARAMETER ehdr$m_ef_vms_comcod = '00000003'X
	PARAMETER EHDR$SC_EF_VMS_LINKAGES = '00000002'X
	PARAMETER ehdr$m_ef_vms_linkages = '00000004'X
	PARAMETER ehdr$m_ef_fill_1 = '00000008'X
	PARAMETER EHDR$SC_EF_IA_64_ABI64 = '00000004'X
	PARAMETER ehdr$m_ef_ia_64_abi64 = '00000010'X
	PARAMETER EHDR$SC_EF_IA_64_REDUCEDFP = '00000005'X
	PARAMETER ehdr$m_ef_ia_64_reducedfp = '00000020'X
	PARAMETER EHDR$SC_EF_IA_64_CONS_GP = '00000006'X
	PARAMETER ehdr$m_ef_ia_64_cons_gp = '00000040'X
	PARAMETER EHDR$SC_EF_IA_64_NOFD_CONS_GP = '00000007'X
	PARAMETER ehdr$m_ef_ia_64_nofd_cons_gp = '00000080'X
	PARAMETER EHDR$SC_EF_IA_64_ABSOLUTE = '00000008'X
	PARAMETER ehdr$m_ef_ia_64_absolute = '00000100'X
	PARAMETER ehdr$m_ef_fill_2 = '00FFFE00'X
	PARAMETER EHDR$SC_EF_IA_64_ARCH = '00000018'X
	PARAMETER ehdr$m_ef_ia_64_arch = 'FF000000'X
	PARAMETER EHDR$SC_EF_IA_64_LOOS = '00000000'X
	PARAMETER ehdr$m_ef_ia_64_loos = '0000000F'X
	PARAMETER ehdr$m_ef_fill_1a = '0000FFF0'X
	PARAMETER EHDR$SC_EF_IA_64_HIOS = '00000010'X
	PARAMETER ehdr$m_ef_ia_64_hios = '00FF0000'X
	PARAMETER ELF64_EHDR$K_E_SIZE = '00000040'X
	PARAMETER ELF64_EHDR$C_E_SIZE = '00000040'X
	PARAMETER ELF64_EHDR$S_VMS_OBJECT_V1 = '00000040'X
	PARAMETER ELF64_EHDR$S_VMS_IMAGE_V1 = '00000048'X
	STRUCTURE /Elf64_Ehdr/
	    UNION
	        MAP
	        BYTE      ehdr$t_e_ident(1:16)
	        END MAP
	        MAP
	            BYTE      ehdr$b_ei_mag0
	            BYTE      ehdr$b_ei_mag1
	            BYTE      ehdr$b_ei_mag2
	            BYTE      ehdr$b_ei_mag3
	            BYTE      ehdr$b_ei_class
	            BYTE      ehdr$b_ei_data
	            BYTE      ehdr$b_ei_version
	            BYTE      ehdr$b_ei_osabi
	            BYTE      ehdr$b_ei_abiversion
	            BYTE      ehdr$b_ei_pad(1:7)
	        END MAP
	    END UNION
	    INTEGER*2 ehdr$w_e_type  ! type is "Elf64_Half"
	    INTEGER*2 ehdr$w_e_machine  ! type is "Elf64_Half"
	    INTEGER*4 ehdr$l_e_version  ! type is "Elf64_Word"
	    INTEGER*8 ehdr$pq_e_entry  ! type is "Elf64_Addr"
	    INTEGER*4 ehdr$q_e_phoff(2)  ! type is "Elf64_Off"
	    INTEGER*4 ehdr$q_e_shoff(2)  ! type is "Elf64_Off"
	    UNION
	        MAP
	        INTEGER*4 ehdr$l_e_flags  ! type is "Elf64_Word"
	        END MAP
	        MAP
	            PARAMETER ehdr$S_ef_vms_comcod = 2
	            PARAMETER ehdr$V_ef_vms_comcod = 0
	            PARAMETER ehdr$S_ef_vms_linkages = 1
	            PARAMETER ehdr$V_ef_vms_linkages = 2
	            PARAMETER ehdr$S_ef_fill_1 = 1
	            PARAMETER ehdr$V_ef_fill_1 = 3
	            PARAMETER ehdr$S_ef_ia_64_abi64 = 1
	            PARAMETER ehdr$V_ef_ia_64_abi64 = 4
	            PARAMETER ehdr$S_ef_ia_64_reducedfp = 1
	            PARAMETER ehdr$V_ef_ia_64_reducedfp = 5
	            PARAMETER ehdr$S_ef_ia_64_cons_gp = 1
	            PARAMETER ehdr$V_ef_ia_64_cons_gp = 6
	            PARAMETER ehdr$S_ef_ia_64_nofd_cons_gp = 1
	            PARAMETER ehdr$V_ef_ia_64_nofd_cons_gp = 7
	            PARAMETER ehdr$S_ef_ia_64_absolute = 1
	            PARAMETER ehdr$V_ef_ia_64_absolute = 8
	            PARAMETER ehdr$S_ef_fill_2 = 15
	            PARAMETER ehdr$V_ef_fill_2 = 9
	            PARAMETER ehdr$S_ef_ia_64_arch = 8
	            PARAMETER ehdr$V_ef_ia_64_arch = 24
	            BYTE %FILL (4)
	        END MAP
	        MAP
	            PARAMETER ehdr$S_ef_ia_64_loos = 4
	            PARAMETER ehdr$V_ef_ia_64_loos = 0
	            PARAMETER ehdr$S_ef_fill_1a = 12
	            PARAMETER ehdr$V_ef_fill_1a = 4
	            PARAMETER ehdr$S_ef_ia_64_hios = 8
	            PARAMETER ehdr$V_ef_ia_64_hios = 16
	            BYTE %FILL (3)
	        END MAP
	    END UNION
	    INTEGER*2 ehdr$w_e_ehsize  ! type is "Elf64_Half"
	    INTEGER*2 ehdr$w_e_phentsize  ! type is "Elf64_Half"
	    INTEGER*2 ehdr$w_e_phnum  ! type is "Elf64_Half"
	    INTEGER*2 ehdr$w_e_shentsize  ! type is "Elf64_Half"
	    INTEGER*2 ehdr$w_e_shnum  ! type is "Elf64_Half"
	    INTEGER*2 ehdr$w_e_shstrndx  ! type is "Elf64_Half"
	    INTEGER*4 ehdr$q_e_vms_needed_cnt(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_Ehdr
	PARAMETER EHDR$K_EI_MAG0 = '00000000'X
	PARAMETER EHDR$K_EI_MAG1 = '00000001'X
	PARAMETER EHDR$K_EI_MAG2 = '00000002'X
	PARAMETER EHDR$K_EI_MAG3 = '00000003'X
	PARAMETER EHDR$K_EI_CLASS = '00000004'X
	PARAMETER EHDR$K_EI_DATA = '00000005'X
	PARAMETER EHDR$K_EI_VERSION = '00000006'X
	PARAMETER EHDR$K_EI_OSABI = '00000007'X
	PARAMETER EHDR$K_EI_ABIVERSION = '00000008'X
	PARAMETER EHDR$K_EI_PAD = '00000009'X
	PARAMETER EHDR$K_ELFMAG0 = '0000007F'X
	PARAMETER EHDR$K_ELFMAG1 = '00000045'X
	PARAMETER EHDR$K_ELFMAG2 = '0000004C'X
	PARAMETER EHDR$K_ELFMAG3 = '00000046'X
	PARAMETER EHDR$K_ELFCLASSNONE = '00000000'X
	PARAMETER EHDR$K_ELFCLASS32 = '00000001'X
	PARAMETER EHDR$K_ELFCLASS64 = '00000002'X
	PARAMETER EHDR$K_ELFDATANONE = '00000000'X
	PARAMETER EHDR$K_ELFDATA2LSB = '00000001'X
	PARAMETER EHDR$K_ELFDATA2MSB = '00000002'X
	PARAMETER EHDR$K_ELFOSABI_NONE = '00000000'X
	PARAMETER EHDR$K_ELFOSABI_OPENVMS = '0000000D'X
	PARAMETER EHDR$K_ELFABIVERSION_VMS_CURR = '00000002'X
	PARAMETER EHDR$K_ELFABIVERSION_VMS_OBJ = '00000002'X
	PARAMETER EHDR$K_ELFABIVERSION_VMS_IMG = '00000002'X
	PARAMETER EHDR$K_ET_NONE = '00000000'X
	PARAMETER EHDR$K_ET_REL = '00000001'X
	PARAMETER EHDR$K_ET_EXEC = '00000002'X
	PARAMETER EHDR$K_ET_DYN = '00000003'X
	PARAMETER EHDR$K_ET_CORE = '00000004'X
	PARAMETER EHDR$K_ET_LOOS = '0000FE00'X
	PARAMETER EHDR$K_ET_HIOS = '0000FEFF'X
	PARAMETER EHDR$K_ET_LOPROC = '0000FF00'X
	PARAMETER EHDR$K_ET_HIPROC = '0000FFFF'X
	PARAMETER EHDR$K_ET_VMS_LINK_STB = '0000FE00'X
	PARAMETER EHDR$K_ET_VMS_DSF = '0000FE01'X
	PARAMETER EHDR$K_EM_NONE = '00000000'X
	PARAMETER EHDR$K_EM_IA_64 = '00000032'X
	PARAMETER IIHA$K_VMSXFER_SIZE = '00000030'X
	PARAMETER IIHA$C_VMSXFER_SIZE = '00000030'X
	STRUCTURE /transfer_address/
	    INTEGER*4 iiha$l_size  ! type is "Elf64_Word"
	    INTEGER*4 iiha$l_spare  ! type is "Elf64_Word"
	    UNION
	        MAP
	        INTEGER*8 iiha$ar_tfradr(1:5)  ! type is "Elf64_Addr"
	        END MAP
	        MAP
	            INTEGER*8 iiha$pq_tfradr1  ! type is "Elf64_Addr"
	            INTEGER*8 iiha$pq_tfradr2  ! type is "Elf64_Addr"
	            INTEGER*8 iiha$pq_tfradr3  ! type is "Elf64_Addr"
	            INTEGER*8 iiha$pq_tfradr4  ! type is "Elf64_Addr"
	            INTEGER*8 iiha$pq_tfradr5  ! type is "Elf64_Addr"
	        END MAP
	    END UNION
	END STRUCTURE	! transfer_address
	PARAMETER IIHA$C_INIT = '00000001'X
	PARAMETER IIHA$C_MAIN = '00000002'X
	PARAMETER IIHA$C_EXE_INIT = '00000003'X
	PARAMETER EHDR$K_EV_NONE = '00000000'X
	PARAMETER EHDR$K_EV_CURRENT = '00000001'X
	PARAMETER EHDR$K_VMS_COMCOD_SUCCESS = '00000000'X
	PARAMETER EHDR$K_VMS_COMCOD_WARNING = '00000001'X
	PARAMETER EHDR$K_VMS_COMCOD_ERROR = '00000002'X
	PARAMETER EHDR$K_VMS_COMCOD_ABORT = '00000003'X
	PARAMETER EHDR$K_EF_IA_64_MASKOS = '00FF000F'X
	PARAMETER EHDR$K_EF_IA_64_ARCHVERSION = '00000001'X
	PARAMETER SHDR$SC_SHF_WRITE = '00000000'X
	PARAMETER shdr$m_shf_write = '00000001'X
	PARAMETER SHDR$SC_SHF_ALLOC = '00000001'X
	PARAMETER shdr$m_shf_alloc = '00000002'X
	PARAMETER SHDR$SC_SHF_EXECINSTR = '00000002'X
	PARAMETER shdr$m_shf_execinstr = '00000004'X
	PARAMETER shdr$m_shf_f64_bitfill_1 = '00000008'X
	PARAMETER SHDR$SC_SHF_MERGE = '00000004'X
	PARAMETER shdr$m_shf_merge = '00000010'X
	PARAMETER SHDR$SC_SHF_STRINGS = '00000005'X
	PARAMETER shdr$m_shf_strings = '00000020'X
	PARAMETER SHDR$SC_SHF_INFO_LINK = '00000006'X
	PARAMETER shdr$m_shf_info_link = '00000040'X
	PARAMETER SHDR$SC_SHF_LINK_ORDER = '00000007'X
	PARAMETER shdr$m_shf_link_order = '00000080'X
	PARAMETER SHDR$SC_SHF_OS_NONCONFORMING = '00000008'X
	PARAMETER shdr$m_shf_os_nonconforming = '00000100'X
	PARAMETER SHDR$SC_SHF_GROUP = '00000009'X
	PARAMETER shdr$m_shf_group = '00000200'X
	PARAMETER SHDR$SC_SHF_TLS = '0000000A'X
	PARAMETER shdr$m_shf_tls = '00000400'X
	PARAMETER shdr$m_shf_f64_bitfill_2 = '0FFFF800'X
	PARAMETER SHDR$SC_SHF_IA_64_SHORT = '0000001C'X
	PARAMETER shdr$m_shf_ia_64_short = '10000000'X
	PARAMETER SHDR$SC_SHF_IA_64_NORECOV = '0000001D'X
	PARAMETER shdr$m_shf_ia_64_norecov = '20000000'X
	PARAMETER shdr$m_shf_f64_bitfill_3 = 'C0000000'X
	PARAMETER SHDR$SC_SHF_VMS_GLOBAL = '00000020'X
	PARAMETER shdr$m_shf_vms_global = '00000000'X
	PARAMETER SHDR$SC_SHF_VMS_OVERLAID = '00000021'X
	PARAMETER shdr$m_shf_vms_overlaid = '00000000'X
	PARAMETER SHDR$SC_SHF_VMS_SHARED = '00000022'X
	PARAMETER shdr$m_shf_vms_shared = '00000000'X
	PARAMETER SHDR$SC_SHF_VMS_VECTOR = '00000023'X
	PARAMETER shdr$m_shf_vms_vector = '00000000'X
	PARAMETER SHDR$SC_SHF_VMS_ALLOC_64BIT = '00000024'X
	PARAMETER shdr$m_shf_vms_alloc_64bit = '00000000'X
	PARAMETER SHDR$SC_SHF_VMS_PROTECTED = '00000025'X
	PARAMETER shdr$m_shf_vms_protected = '00000000'X
	PARAMETER shdr$m_shf_f64_bitfill_4 = '00000000'X
	PARAMETER shdr$m_shf_f64_osfill_1 = '000FFFFF'X
	PARAMETER SHDR$SC_SHF_MASK_LOOS = '00000014'X
	PARAMETER shdr$m_shf_mask_loos = '0FF00000'X
	PARAMETER shdr$m_shf_f64_osfill_2 = 'F0000000'X
	PARAMETER SHDR$SC_SHF_MASK_HIOS = '00000020'X
	PARAMETER shdr$m_shf_mask_hios = '00000000'X
	PARAMETER shdr$m_shf_f64_procfill_1 = '0FFFFFFF'X
	PARAMETER SHDR$SC_SHF_MASKLOPROC = '0000001C'X
	PARAMETER shdr$m_shf_maskloproc = 'F0000000'X
	PARAMETER SHDR$SC_SHF_MASKHIPROC = '00000020'X
	PARAMETER shdr$m_shf_maskhiproc = '00000000'X
	PARAMETER ELF64_SHDR$K_SH_SIZE = '00000040'X
	PARAMETER ELF64_SHDR$C_SH_SIZE = '00000040'X
	STRUCTURE /Elf64_Shdr/
	    INTEGER*4 shdr$l_sh_name  ! type is "Elf64_Word"
	    INTEGER*4 shdr$l_sh_type  ! type is "Elf64_Word"
	    UNION
	        MAP
	        INTEGER*4 shdr$q_sh_flags(2)  ! type is "Elf64_Xword"
	        END MAP
	        MAP
	            PARAMETER shdr$S_shf_write = 1
	            PARAMETER shdr$V_shf_write = 0
	            PARAMETER shdr$S_shf_alloc = 1
	            PARAMETER shdr$V_shf_alloc = 1
	            PARAMETER shdr$S_shf_execinstr = 1
	            PARAMETER shdr$V_shf_execinstr = 2
	            PARAMETER shdr$S_shf_f64_bitfill_1 = 1
	            PARAMETER shdr$V_shf_f64_bitfill_1 = 3
	            PARAMETER shdr$S_shf_merge = 1
	            PARAMETER shdr$V_shf_merge = 4
	            PARAMETER shdr$S_shf_strings = 1
	            PARAMETER shdr$V_shf_strings = 5
	            PARAMETER shdr$S_shf_info_link = 1
	            PARAMETER shdr$V_shf_info_link = 6
	            PARAMETER shdr$S_shf_link_order = 1
	            PARAMETER shdr$V_shf_link_order = 7
	            PARAMETER shdr$S_shf_os_nonconforming = 1
	            PARAMETER shdr$V_shf_os_nonconforming = 8
	            PARAMETER shdr$S_shf_group = 1
	            PARAMETER shdr$V_shf_group = 9
	            PARAMETER shdr$S_shf_tls = 1
	            PARAMETER shdr$V_shf_tls = 10
	            PARAMETER shdr$S_shf_f64_bitfill_2 = 17
	            PARAMETER shdr$V_shf_f64_bitfill_2 = 11
	            PARAMETER shdr$S_shf_ia_64_short = 1
	            PARAMETER shdr$V_shf_ia_64_short = 28
	            PARAMETER shdr$S_shf_ia_64_norecov = 1
	            PARAMETER shdr$V_shf_ia_64_norecov = 29
	            PARAMETER shdr$S_shf_f64_bitfill_3 = 2
	            PARAMETER shdr$V_shf_f64_bitfill_3 = 30
	            PARAMETER shdr$S_shf_vms_global = 1
	            PARAMETER shdr$V_shf_vms_global = 32
	            PARAMETER shdr$S_shf_vms_overlaid = 1
	            PARAMETER shdr$V_shf_vms_overlaid = 33
	            PARAMETER shdr$S_shf_vms_shared = 1
	            PARAMETER shdr$V_shf_vms_shared = 34
	            PARAMETER shdr$S_shf_vms_vector = 1
	            PARAMETER shdr$V_shf_vms_vector = 35
	            PARAMETER shdr$S_shf_vms_alloc_64bit = 1
	            PARAMETER shdr$V_shf_vms_alloc_64bit = 36
	            PARAMETER shdr$S_shf_vms_protected = 1
	            PARAMETER shdr$V_shf_vms_protected = 37
	            PARAMETER shdr$S_shf_f64_bitfill_4 = 26
	            PARAMETER shdr$V_shf_f64_bitfill_4 = 38
	            BYTE %FILL (8)
	        END MAP
	        MAP
	            PARAMETER shdr$S_shf_f64_osfill_1 = 20
	            PARAMETER shdr$V_shf_f64_osfill_1 = 0
	            PARAMETER shdr$S_shf_mask_loos = 8
	            PARAMETER shdr$V_shf_mask_loos = 20
	            PARAMETER shdr$S_shf_f64_osfill_2 = 4
	            PARAMETER shdr$V_shf_f64_osfill_2 = 28
	            PARAMETER shdr$S_shf_mask_hios = 32
	            PARAMETER shdr$V_shf_mask_hios = 32
	            BYTE %FILL (8)
	        END MAP
	        MAP
	            PARAMETER shdr$S_shf_f64_procfill_1 = 28
	            PARAMETER shdr$V_shf_f64_procfill_1 = 0
	            PARAMETER shdr$S_shf_maskloproc = 4
	            PARAMETER shdr$V_shf_maskloproc = 28
	            PARAMETER shdr$S_shf_maskhiproc = 32
	            PARAMETER shdr$V_shf_maskhiproc = 32
	            BYTE %FILL (8)
	        END MAP
	    END UNION
	    INTEGER*8 shdr$pq_sh_addr  ! type is "Elf64_Addr"
	    INTEGER*4 shdr$q_sh_offset(2)  ! type is "Elf64_Off"
	    INTEGER*4 shdr$q_sh_size(2)  ! type is "Elf64_Xword"
	    INTEGER*4 shdr$l_sh_link  ! type is "Elf64_Word"
	    INTEGER*4 shdr$l_sh_info  ! type is "Elf64_Word"
	    INTEGER*4 shdr$q_sh_addralign(2)  ! type is "Elf64_Xword"
	    INTEGER*4 shdr$q_sh_entsize(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_Shdr
	PARAMETER SHDR$K_SHN_UNDEF = '00000000'X
	PARAMETER SHDR$K_SHN_LORESERVE = '0000FF00'X
	PARAMETER SHDR$K_SHN_LOPROC = '0000FF00'X
	PARAMETER SHDR$K_SHN_HIPROC = '0000FF1F'X
	PARAMETER SHDR$K_SHN_LOOS = '0000FF20'X
	PARAMETER SHDR$K_SHN_VMS_SYMVEC = '0000FF20'X
	PARAMETER SHDR$K_SHN_HIOS = '0000FF3F'X
	PARAMETER SHDR$K_SHN_ABS = '0000FFF1'X
	PARAMETER SHDR$K_SHN_COMMON = '0000FFF2'X
	PARAMETER SHDR$K_SHN_XINDEX = '0000FFFF'X
	PARAMETER SHDR$K_SHN_HIRESERVE = '0000FFFF'X
	PARAMETER SHDR$K_SHT_NULL = '00000000'X
	PARAMETER SHDR$K_SHT_PROGBITS = '00000001'X
	PARAMETER SHDR$K_SHT_SYMTAB = '00000002'X
	PARAMETER SHDR$K_SHT_STRTAB = '00000003'X
	PARAMETER SHDR$K_SHT_RELA = '00000004'X
	PARAMETER SHDR$K_SHT_HASH = '00000005'X
	PARAMETER SHDR$K_SHT_DYNAMIC = '00000006'X
	PARAMETER SHDR$K_SHT_NOTE = '00000007'X
	PARAMETER SHDR$K_SHT_NOBITS = '00000008'X
	PARAMETER SHDR$K_SHT_REL = '00000009'X
	PARAMETER SHDR$K_SHT_SHLIB = '0000000A'X
	PARAMETER SHDR$K_SHT_DYNSYM = '0000000B'X
	PARAMETER SHDR$K_SHT_UNUSED_12 = '0000000C'X
	PARAMETER SHDR$K_SHT_UNUSED_13 = '0000000D'X
	PARAMETER SHDR$K_SHT_INIT_ARRAY = '0000000E'X
	PARAMETER SHDR$K_SHT_FINI_ARRAY = '0000000F'X
	PARAMETER SHDR$K_SHT_PREINIT_ARRAY = '00000010'X
	PARAMETER SHDR$K_SHT_GROUP = '00000011'X
	PARAMETER SHDR$K_SHT_SYMTAB_SHNDX = '00000012'X
	PARAMETER GRPSEC$M_COMDAT_FLAG = '00000001'X
	PARAMETER SHDR$K_SHT_LOOS = '60000000'X
	PARAMETER SHDR$K_SHT_HIOS = '6FFFFFFF'X
	PARAMETER SHDR$K_SHT_LOPROC = '70000000'X
	PARAMETER SHDR$K_SHT_HIPROC = '7FFFFFFF'X
	PARAMETER SHDR$K_SHT_LOUSER = '80000000'X
	PARAMETER SHDR$K_SHT_HIUSER = -1
	PARAMETER SHDR$K_SHT_VMS_TRACE = '60000000'X
	PARAMETER SHDR$K_SHT_VMS_TIE_SIGNATURES = '60000001'X
	PARAMETER SHDR$K_SHT_VMS_DEBUG = '60000002'X
	PARAMETER SHDR$K_SHT_VMS_DEBUG_STR = '60000003'X
	PARAMETER SHDR$K_SHT_VMS_LINKAGES = '60000004'X
	PARAMETER SHDR$K_SHT_VMS_SYMBOL_VECTOR = '60000005'X
	PARAMETER SHDR$K_SHT_VMS_FIXUP = '60000006'X
	PARAMETER SHDR$K_SHT_VMS_DISPLAY_NAME_INF = '60000007'X
	PARAMETER SHDR$K_SHT_IA_64_LOPSREG = '78000000'X
	PARAMETER SHDR$K_SHT_IA_64_HIPSREG = '7FFFFFFF'X
	PARAMETER SHDR$K_SHT_IA_64_EXT = '70000000'X
	PARAMETER SHDR$K_SHT_IA_64_UNWIND = '70000001'X
	PARAMETER SHDR$K_SHT_IA_64_PRIORITY_INIT = '79000000'X
	PARAMETER VMSSIG$$K_SIZE = '00000008'X
	PARAMETER VMSSIG$$C_SIZE = '00000008'X
	STRUCTURE /VMSSigEntry/
	    INTEGER*4 vmssig$l_se_symbol  ! type is "Elf64_Word"
	    INTEGER*4 vmssig$l_se_offset  ! type is "Elf64_Word"
	END STRUCTURE	! VMSSigEntry
	PARAMETER UNWIND$K_SIZE = '00000018'X
	PARAMETER UNWIND$C_SIZE = '00000018'X
	STRUCTURE /IA_64_Unwind_Entry/
	    INTEGER*8 unwind$pq_ue_start  ! type is "Elf64_Addr"
	    INTEGER*8 unwind$pq_ue_end  ! type is "Elf64_Addr"
	    INTEGER*8 unwind$pq_ue_info  ! type is "Elf64_Addr"
	END STRUCTURE	! IA_64_Unwind_Entry
	PARAMETER ELF64_NHDR$K_NH_SIZE = '00000018'X
	PARAMETER ELF64_NHDR$C_NH_SIZE = '00000018'X
	STRUCTURE /Elf64_Nhdr/
	    INTEGER*4 nhdr$q_nh_namesz(2)  ! type is "Elf64_Xword"
	    INTEGER*4 nhdr$q_nh_descsz(2)  ! type is "Elf64_Xword"
	    INTEGER*4 nhdr$q_nh_type(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_Nhdr
	PARAMETER ELF64_MHDR$K_MH_SIZE = '00000022'X
	PARAMETER ELF64_MHDR$C_MH_SIZE = '00000022'X
	STRUCTURE /Elf64_Mhdr/
	    BYTE      mhdr$b_mh_create_date(1:17)
	    BYTE      mhdr$b_mh_patch_date(1:17)
	    BYTE      mhdr$b_mh_name_version
	    BYTE      %FILL(0:4)
	END STRUCTURE	! Elf64_Mhdr
	PARAMETER ELF64_ORIGDYN$K_MAJOR_ID = '00000001'X
	PARAMETER ELF64_ORIGDYN$K_MINOR_ID = '00000003'X
	STRUCTURE /Elf64_OrigDyn/
	    INTEGER*4 origdyn$l_major_id
	    INTEGER*4 origdyn$l_minor_id
	    INTEGER*4 origdyn$q_manipulation_date(2)
	    INTEGER*4 origdyn$q_link_flags(2)
	    INTEGER*4 origdyn$l_elf_flags
	    INTEGER*4 %FILL
	    BYTE      origdyn$b_imgid(1:1)
	    BYTE      %FILL(0:6)
	END STRUCTURE	! Elf64_OrigDyn
	PARAMETER NHDR$K_NT_VMS_MHD = '00000001'X
	PARAMETER NHDR$K_NT_VMS_LNM = '00000002'X
	PARAMETER NHDR$K_NT_VMS_SRC = '00000003'X
	PARAMETER NHDR$K_NT_VMS_TITLE = '00000004'X
	PARAMETER NHDR$K_NT_VMS_EIDC = '00000005'X
	PARAMETER NHDR$K_NT_VMS_FPMODE = '00000006'X
	PARAMETER NHDR$K_NT_VMS_LINKTIME = '00000065'X
	PARAMETER NHDR$K_NT_VMS_IMGNAM = '00000066'X
	PARAMETER NHDR$K_NT_VMS_IMGID = '00000067'X
	PARAMETER NHDR$K_NT_VMS_LINKID = '00000068'X
	PARAMETER NHDR$K_NT_VMS_IMGBID = '00000069'X
	PARAMETER NHDR$K_NT_VMS_GSTNAM = '0000006A'X
	PARAMETER NHDR$K_NT_VMS_ORIG_DYN = '0000006B'X
	PARAMETER NHDR$K_NT_VMS_PATCHTIME = '0000006C'X
	PARAMETER NHDR$K_VMS_EIDC_ERRSEV_WARNING = '00000000'X
	PARAMETER NHDR$K_VMS_EIDC_ERRSEV_SUCCESS = '00000001'X
	PARAMETER NHDR$K_VMS_EIDC_ERRSEV_ERROR = '00000002'X
	PARAMETER NHDR$K_VMS_EIDC_ERRSEV_SEVERE = '00000004'X
	PARAMETER ELF64_SYM$K_ST_SIZE = '00000018'X
	PARAMETER ELF64_SYM$C_ST_SIZE = '00000018'X
	STRUCTURE /Elf64_Sym/
	    INTEGER*4 symtab$l_st_name  ! type is "Elf64_Word"
	    BYTE      symtab$b_st_info
	    BYTE      symtab$b_st_other
	    INTEGER*2 symtab$w_st_shndx  ! type is "Elf64_Half"
	    INTEGER*8 symtab$pq_st_value  ! type is "Elf64_Addr"
	    INTEGER*4 symtab$q_st_size(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_Sym
	PARAMETER SYMTAB$K_STB_LOCAL = '00000000'X
	PARAMETER SYMTAB$K_STB_GLOBAL = '00000001'X
	PARAMETER SYMTAB$K_STB_WEAK = '00000002'X
	PARAMETER SYMTAB$K_STB_LOOS = '0000000A'X
	PARAMETER SYMTAB$K_STB_VMS_WEAK = '0000000B'X
	PARAMETER SYMTAB$K_STB_VMS_SYSTEM = '0000000C'X
	PARAMETER SYMTAB$K_STB_HIOS = '0000000C'X
	PARAMETER SYMTAB$K_STB_LOPROC = '0000000D'X
	PARAMETER SYMTAB$K_STB_HIPROC = '0000000F'X
	PARAMETER SYMTAB$K_STT_NOTYPE = '00000000'X
	PARAMETER SYMTAB$K_STT_OBJECT = '00000001'X
	PARAMETER SYMTAB$K_STT_FUNC = '00000002'X
	PARAMETER SYMTAB$K_STT_SECTION = '00000003'X
	PARAMETER SYMTAB$K_STT_FILE = '00000004'X
	PARAMETER SYMTAB$K_STT_COMMON = '00000005'X
	PARAMETER SYMTAB$K_STT_TLS = '00000006'X
	PARAMETER SYMTAB$K_STT_LOOS = '0000000A'X
	PARAMETER SYMTAB$K_STT_HIOS = '0000000C'X
	PARAMETER SYMTAB$K_STT_LOPROC = '0000000D'X
	PARAMETER SYMTAB$K_STT_HIPROC = '0000000F'X
	PARAMETER SYMTAB$K_STV_DEFAULT = '00000000'X
	PARAMETER SYMTAB$K_STV_INTERNAL = '00000001'X
	PARAMETER SYMTAB$K_STV_HIDDEN = '00000002'X
	PARAMETER SYMTAB$K_STV_PROTECTED = '00000003'X
	PARAMETER SYMTAB$K_STV_UNIVERSAL = '00000003'X
	PARAMETER SYMTAB$K_VMS_STO_VISIBILITY = '00000003'X
	PARAMETER SYMTAB$K_VMS_STO_FUNC_TYPE = '00000030'X
	PARAMETER SYMTAB$K_VMS_STO_LINKAGE = '000000C0'X
	PARAMETER SYMTAB$K_VMS_SFT_CODE_ADDR = '00000000'X
	PARAMETER SYMTAB$K_VMS_SFT_SYMV_IDX = '00000001'X
	PARAMETER SYMTAB$K_VMS_SFT_FD = '00000002'X
	PARAMETER SYMTAB$K_VMS_SFT_RESERVE = '00000003'X
	PARAMETER SYMTAB$K_VMS_STL_IGNORE = '00000000'X
	PARAMETER SYMTAB$K_VMS_STL_RESERVED = '00000001'X
	PARAMETER SYMTAB$K_VMS_STL_STD = '00000002'X
	PARAMETER SYMTAB$K_VMS_STL_LNK = '00000003'X
	PARAMETER ELF64_RELA64$K_R_SIZE = '00000018'X
	PARAMETER ELF64_RELA64$C_R_SIZE = '00000018'X
	STRUCTURE /Elf64_Rela64/
	    INTEGER*8 rela$pq_r_offset  ! type is "Elf64_Addr"
	    UNION
	        MAP
	        INTEGER*4 rela$q_r_info(2)  ! type is "Elf64_Xword"
	        END MAP
	        MAP
	            INTEGER*4 rela$l_r_type  ! type is "Elf64_Word"
	            INTEGER*4 rela$l_r_sym  ! type is "Elf64_Word"
	        END MAP
	    END UNION
	    INTEGER*4 rela$q_r_addend(2)  ! type is "Elf64_Sxword"
	END STRUCTURE	! Elf64_Rela64
	PARAMETER RELA$K_R_IA_64_NONE = '00000000'X
	PARAMETER RELA$K_R_IA_64_IMM14 = '00000021'X
	PARAMETER RELA$K_R_IA_64_IMM22 = '00000022'X
	PARAMETER RELA$K_R_IA_64_IMM64 = '00000023'X
	PARAMETER RELA$K_R_IA_64_DIR32MSB = '00000024'X
	PARAMETER RELA$K_R_IA_64_DIR32LSB = '00000025'X
	PARAMETER RELA$K_R_IA_64_DIR64MSB = '00000026'X
	PARAMETER RELA$K_R_IA_64_DIR64LSB = '00000027'X
	PARAMETER RELA$K_R_IA_64_GPREL22 = '0000002A'X
	PARAMETER RELA$K_R_IA_64_GPREL64I = '0000002B'X
	PARAMETER RELA$K_R_IA_64_GPREL32MSB = '0000002C'X
	PARAMETER RELA$K_R_IA_64_GPREL32LSB = '0000002D'X
	PARAMETER RELA$K_R_IA_64_GPREL64MSB = '0000002E'X
	PARAMETER RELA$K_R_IA_64_GPREL64LSB = '0000002F'X
	PARAMETER RELA$K_R_IA_64_LTOFF22 = '00000032'X
	PARAMETER RELA$K_R_IA_64_LTOFF64I = '00000033'X
	PARAMETER RELA$K_R_IA_64_PLTOFF22 = '0000003A'X
	PARAMETER RELA$K_R_IA_64_PLTOFF64I = '0000003B'X
	PARAMETER RELA$K_R_IA_64_PLTOFF64MSB = '0000003E'X
	PARAMETER RELA$K_R_IA_64_PLTOFF64LSB = '0000003F'X
	PARAMETER RELA$K_R_IA_64_FPTR64I = '00000043'X
	PARAMETER RELA$K_R_IA_64_FPTR32MSB = '00000044'X
	PARAMETER RELA$K_R_IA_64_FPTR32LSB = '00000045'X
	PARAMETER RELA$K_R_IA_64_FPTR64MSB = '00000046'X
	PARAMETER RELA$K_R_IA_64_FPTR64LSB = '00000047'X
	PARAMETER RELA$K_R_IA_64_PCREL60B = '00000048'X
	PARAMETER RELA$K_R_IA_64_PCREL21B = '00000049'X
	PARAMETER RELA$K_R_IA_64_PCREL21M = '0000004A'X
	PARAMETER RELA$K_R_IA_64_PCREL21F = '0000004B'X
	PARAMETER RELA$K_R_IA_64_PCREL32MSB = '0000004C'X
	PARAMETER RELA$K_R_IA_64_PCREL32LSB = '0000004D'X
	PARAMETER RELA$K_R_IA_64_PCREL64MSB = '0000004E'X
	PARAMETER RELA$K_R_IA_64_PCREL64LSB = '0000004F'X
	PARAMETER RELA$K_R_IA_64_LTOFF_FPTR22 = '00000052'X
	PARAMETER RELA$K_R_IA_64_LTOFF_FPTR64I = '00000053'X
	PARAMETER RELA$K_R_IA_64_LTOFF_FPTR32MSB = '00000054'X
	PARAMETER RELA$K_R_IA_64_LTOFF_FPTR32LSB = '00000055'X
	PARAMETER RELA$K_R_IA_64_LTOFF_FPTR64MSB = '00000056'X
	PARAMETER RELA$K_R_IA_64_LTOFF_FPTR64LSB = '00000057'X
	PARAMETER RELA$K_R_IA_64_SEGREL32MSB = '0000005C'X
	PARAMETER RELA$K_R_IA_64_SEGREL32LSB = '0000005D'X
	PARAMETER RELA$K_R_IA_64_SEGREL64MSB = '0000005E'X
	PARAMETER RELA$K_R_IA_64_SEGREL64LSB = '0000005F'X
	PARAMETER RELA$K_R_IA_64_SECREL32MSB = '00000064'X
	PARAMETER RELA$K_R_IA_64_SECREL32LSB = '00000065'X
	PARAMETER RELA$K_R_IA_64_SECREL64MSB = '00000066'X
	PARAMETER RELA$K_R_IA_64_SECREL64LSB = '00000067'X
	PARAMETER RELA$K_R_IA_64_REL32MSB = '0000006C'X
	PARAMETER RELA$K_R_IA_64_REL32LSB = '0000006D'X
	PARAMETER RELA$K_R_IA_64_REL64MSB = '0000006E'X
	PARAMETER RELA$K_R_IA_64_REL64LSB = '0000006F'X
	PARAMETER RELA$K_R_IA_64_LTV32MSB = '00000074'X
	PARAMETER RELA$K_R_IA_64_LTV32LSB = '00000075'X
	PARAMETER RELA$K_R_IA_64_LTV64MSB = '00000076'X
	PARAMETER RELA$K_R_IA_64_LTV64LSB = '00000077'X
	PARAMETER RELA$K_R_IA_64_PCREL21BI = '00000079'X
	PARAMETER RELA$K_R_IA_64_PCREL22 = '0000007A'X
	PARAMETER RELA$K_R_IA_64_PCREL64I = '0000007B'X
	PARAMETER RELA$K_R_IA_64_IPLTMSB = '00000080'X
	PARAMETER RELA$K_R_IA_64_IPLTLSB = '00000081'X
	PARAMETER RELA$K_R_IA_64_COPY = '00000084'X
	PARAMETER RELA$K_R_IA_64_SUB = '00000085'X
	PARAMETER RELA$K_R_IA_64_LTOFF22X = '00000086'X
	PARAMETER RELA$K_R_IA_64_LDXMOV = '00000087'X
	PARAMETER RELA$K_R_IA_64_TPREL14 = '00000091'X
	PARAMETER RELA$K_R_IA_64_TPREL22 = '00000092'X
	PARAMETER RELA$K_R_IA_64_TPREL64I = '00000093'X
	PARAMETER RELA$K_R_IA_64_TPREL64MSB = '00000096'X
	PARAMETER RELA$K_R_IA_64_TPREL64LSB = '00000097'X
	PARAMETER RELA$K_R_IA_64_LTOFF_TP22 = '0000009A'X
	PARAMETER RELA$K_R_IA_64_DTPMOD64MSB = '000000A6'X
	PARAMETER RELA$K_R_IA_64_DTPMOD64LSB = '000000A7'X
	PARAMETER RELA$K_R_IA_64_LTOFF_DTPMOD22 = '000000AA'X
	PARAMETER RELA$K_R_IA_64_DTPREL14 = '000000B1'X
	PARAMETER RELA$K_R_IA_64_DTPREL22 = '000000B2'X
	PARAMETER RELA$K_R_IA_64_DTPREL64I = '000000B3'X
	PARAMETER RELA$K_R_IA_64_DTPREL32MSB = '000000B4'X
	PARAMETER RELA$K_R_IA_64_DTPREL32LSB = '000000B5'X
	PARAMETER RELA$K_R_IA_64_DTPREL64MSB = '000000B6'X
	PARAMETER RELA$K_R_IA_64_DTPREL64LSB = '000000B7'X
	PARAMETER RELA$K_R_IA_64_LTOFF_DTPREL22 = '000000BA'X
	PARAMETER RELA$K_R_IA_64_LOOS = '70000000'X
	PARAMETER RELA$K_R_IA_64_HIOS = -1
	PARAMETER RELA$K_R_IA_64_DIR8 = '70000000'X
	PARAMETER RELA$K_R_IA_64_DIR16LSB = '70000001'X
	PARAMETER RELA$K_R_IA_64_VMS_CALL_SIG = '70000002'X
	PARAMETER RELA$K_R_IA_64_VMS_EXECLET_FUNC = '70000003'X
	PARAMETER RELA$K_R_IA_64_VMS_EXECLET_DATA = '70000004'X
	PARAMETER RELA$K_R_IA_64_VMS_FIX8 = '70000005'X
	PARAMETER RELA$K_R_IA_64_VMS_FIX16 = '70000006'X
	PARAMETER RELA$K_R_IA_64_VMS_FIX32 = '70000007'X
	PARAMETER RELA$K_R_IA_64_VMS_FIX64 = '70000008'X
	PARAMETER RELA$K_R_IA_64_VMS_FIXFD = '70000009'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_LOAD = '7000000A'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_ADD = '7000000B'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_SUB = '7000000C'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_MUL = '7000000D'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_DIV = '7000000E'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_AND = '7000000F'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_IOR = '70000010'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_EOR = '70000011'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_ASH = '70000012'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_STO8 = '70000014'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_STO16LSB = '70000015'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_STO32LSB = '70000016'X
	PARAMETER RELA$K_R_IA_64_VMS_ACC_STO64LSB = '70000017'X
 ! 	Display Name Info (dni) - aka Demangler info - entries
 ! 	Internally some more structures and names are used. However, a 
 ! 	developer should only use the types Elf64_vms_dni32 and
 ! 	Elf64_vms_dni64, both contain all necessary fields. In C notation
 ! 	all the necesary 32 bit fields are:
 ! 		dni32$l_dni_format
 ! 		dni32$l_fmt1_info[i].fmt1$l_dni_demangler
 ! 		dni32$l_fmt1_info[i].fmt1$l_dni_symbol
 ! 		dni32$l_fmt1_info[i].fmt1$l_dni_data
 ! 		dni32$l_fmt2_info[i].fmt2$l_dni_symbol
 ! 		dni32$l_fmt2_info[i].fmt2$l_dni_data
 ! 		dni32$l_fmt3.fmt3$l_dni_demangler
 ! 		dni32$l_fmt4.fmt4$l_dni_demangler
 ! 		dni32$l_fmt4_info[i].fmt4$l_dni_symbol
 ! 		dni32$l_fmt4_info[i].fmt4$l_dni_data
	PARAMETER DNI$_SUCCESS = '00000001'X
	PARAMETER DNI$_NORMAL = '00000001'X	 !  demangled string is in result buffer
	PARAMETER DNI$_ERROR = '00000002'X	 !  error in demangling
	PARAMETER DNI$_ALTERNATE_SUCCESS = '00000009'X
	PARAMETER DNI$_SAME = '00000009'X	 !  demangled string identical to input string
 !  Data representations (0,4,8)
	PARAMETER DNI$_DATA_ULEB = '00000000'X	 !  ULEBs (see DWARF spec)
	PARAMETER DNI$_DATA_WORD = '00000004'X	 !  ELF64_Word, VMS Longword
	PARAMETER DNI$_DATA_XWORD = '00000008'X	 !  ELF64_Xword, VMS Quadword
 !  DNI formats (1, ..., 4)
	PARAMETER DNI$_FMT1 = '00000001'X
	PARAMETER DNI$_FMT2 = '00000002'X
	PARAMETER DNI$_FMT3 = '00000003'X
	PARAMETER DNI$_FMT4 = '00000004'X
 ! 
 !  32 bit variants
 ! 
	STRUCTURE /Elf64_vms_dni32_fmt1/
	    INTEGER*4 fmt1$l_dni_demangler  ! type is "Elf64_Word"
	    INTEGER*4 fmt1$l_dni_symbol  ! type is "Elf64_Word"
	    INTEGER*4 fmt1$l_dni_data  ! type is "Elf64_Word"
	END STRUCTURE	! Elf64_vms_dni32_fmt1
	STRUCTURE /Elf64_vms_dni32_fmt2/
	    INTEGER*4 fmt2$l_dni_symbol  ! type is "Elf64_Word"
	    INTEGER*4 fmt2$l_dni_data  ! type is "Elf64_Word"
	END STRUCTURE	! Elf64_vms_dni32_fmt2
	STRUCTURE /Elf64_vms_dni32_fmt3/
	    INTEGER*4 fmt3$l_dni_demangler  ! type is "Elf64_Word"
	END STRUCTURE	! Elf64_vms_dni32_fmt3
	STRUCTURE /Elf64_vms_dni32_fmt4/
	    INTEGER*4 fmt4$l_dni_demangler  ! type is "Elf64_Word"
	END STRUCTURE	! Elf64_vms_dni32_fmt4
	STRUCTURE /Elf64_vms_dni32_fmt4_sub/
	    INTEGER*4 fmt4$l_dni_symbol  ! type is "Elf64_Word"
	    INTEGER*4 fmt4$l_dni_data  ! type is "Elf64_Word"
	END STRUCTURE	! Elf64_vms_dni32_fmt4_sub
	STRUCTURE /Elf64_vms_dni32/
	    INTEGER*4 dni32$l_dni_format  ! type is "Elf64_Word"
	    UNION
	        MAP
	            RECORD /Elf64_vms_dni32_fmt1/ dni32$l_fmt1_info(1:1)
	        END MAP
	        MAP
	            RECORD /Elf64_vms_dni32_fmt2/ dni32$l_fmt2_info(1:1)
	        END MAP
	        MAP
	            RECORD /Elf64_vms_dni32_fmt3/ dni32$l_fmt3
	        END MAP
	        MAP
	            RECORD /Elf64_vms_dni32_fmt4/ dni32$l_fmt4
	            RECORD /Elf64_vms_dni32_fmt4_sub/ dni32$l_fmt4_info(1:1)
	        END MAP
	    END UNION
	END STRUCTURE	! Elf64_vms_dni32
 ! 
 !  64 bit variants
 ! 
	STRUCTURE /Elf64_vms_dni64_fmt1/
	    INTEGER*4 fmt1$q_dni_demangler(2)  ! type is "Elf64_Xword"
	    INTEGER*4 fmt1$q_dni_symbol(2)  ! type is "Elf64_Xword"
	    INTEGER*4 fmt1$q_dni_data(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_vms_dni64_fmt1
	STRUCTURE /Elf64_vms_dni64_fmt2/
	    INTEGER*4 fmt2$q_dni_symbol(2)  ! type is "Elf64_Xword"
	    INTEGER*4 fmt2$q_dni_data(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_vms_dni64_fmt2
	STRUCTURE /Elf64_vms_dni64_fmt3/
	    INTEGER*4 fmt3$q_dni_demangler(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_vms_dni64_fmt3
	STRUCTURE /Elf64_vms_dni64_fmt4/
	    INTEGER*4 fmt4$q_dni_demangler(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_vms_dni64_fmt4
	STRUCTURE /Elf64_vms_dni64_fmt4_sub/
	    INTEGER*4 fmt4$q_dni_symbol(2)  ! type is "Elf64_Xword"
	    INTEGER*4 fmt4$q_dni_data(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_vms_dni64_fmt4_sub
	STRUCTURE /Elf64_vms_dni64/
	    INTEGER*4 dni64$q_dni_format(2)  ! type is "Elf64_Xword"
	    UNION
	        MAP
	            RECORD /Elf64_vms_dni64_fmt1/ dni64$q_fmt1_info(1:1)
	        END MAP
	        MAP
	            RECORD /Elf64_vms_dni64_fmt2/ dni64$q_fmt2_info(1:1)
	        END MAP
	        MAP
	            RECORD /Elf64_vms_dni64_fmt3/ dni64$q_fmt3
	        END MAP
	        MAP
	            RECORD /Elf64_vms_dni64_fmt4/ dni64$q_fmt4
	            RECORD /Elf64_vms_dni64_fmt4_sub/ dni64$q_fmt4_info(1:1)
	        END MAP
	    END UNION
	END STRUCTURE	! Elf64_vms_dni64
	PARAMETER PHDR$SC_PF_X = '00000000'X
	PARAMETER phdr$m_pf_x = '00000001'X
	PARAMETER PHDR$SC_PF_W = '00000001'X
	PARAMETER phdr$m_pf_w = '00000002'X
	PARAMETER PHDR$SC_PF_R = '00000002'X
	PARAMETER phdr$m_pf_r = '00000004'X
	PARAMETER phdr$m_pf_fill_3to19 = '000FFFF8'X
	PARAMETER PHDR$SC_PF_VMS_NOWRIT_RELOC = '00000014'X
	PARAMETER phdr$m_pf_vms_nowrit_reloc = '00100000'X
	PARAMETER PHDR$SC_PF_VMS_INITIALCODE = '00000015'X
	PARAMETER phdr$m_pf_vms_initialcode = '00200000'X
	PARAMETER PHDR$SC_PF_VMS_RESIDENT = '00000016'X
	PARAMETER phdr$m_pf_vms_resident = '00400000'X
	PARAMETER PHDR$SC_PF_VMS_VECTOR = '00000017'X
	PARAMETER phdr$m_pf_vms_vector = '00800000'X
	PARAMETER PHDR$SC_PF_VMS_PROTECT = '00000018'X
	PARAMETER phdr$m_pf_vms_protect = '01000000'X
	PARAMETER PHDR$SC_PF_VMS_NOWRIT_FIXUP = '00000019'X
	PARAMETER phdr$m_pf_vms_nowrit_fixup = '02000000'X
	PARAMETER PHDR$SC_PF_VMS_SHORT = '0000001A'X
	PARAMETER phdr$m_pf_vms_short = '04000000'X
	PARAMETER PHDR$SC_PF_VMS_SHARED = '0000001B'X
	PARAMETER phdr$m_pf_vms_shared = '08000000'X
	PARAMETER PHDR$SC_PF_IA_64_NORECOV = '0000001F'X
	PARAMETER phdr$m_pf_ia_64_norecov = '80000000'X
	PARAMETER phdr$m_fill_1 = '000FFFFF'X
	PARAMETER PHDR$SC_PF_MASKOS = '00000014'X
	PARAMETER phdr$m_pf_maskos = '0FF00000'X
	PARAMETER PHDR$SC_PF_MASKPROC = '0000001C'X
	PARAMETER phdr$m_pf_maskproc = 'F0000000'X
	PARAMETER ELF64_PHDR$K_SIZE = '00000038'X
	PARAMETER ELF64_PHDR$C_SIZE = '00000038'X
	STRUCTURE /Elf64_Phdr/
	    INTEGER*4 phdr$l_p_type  ! type is "Elf64_Word"
	    UNION
	        MAP
	        INTEGER*4 phdr$l_p_flags  ! type is "Elf64_Word"
	        END MAP
	        MAP
	            PARAMETER phdr$S_pf_x = 1
	            PARAMETER phdr$V_pf_x = 0
	            PARAMETER phdr$S_pf_w = 1
	            PARAMETER phdr$V_pf_w = 1
	            PARAMETER phdr$S_pf_r = 1
	            PARAMETER phdr$V_pf_r = 2
	            PARAMETER phdr$S_pf_fill_3to19 = 17
	            PARAMETER phdr$V_pf_fill_3to19 = 3
	            PARAMETER phdr$S_pf_vms_nowrit_reloc = 1
	            PARAMETER phdr$V_pf_vms_nowrit_reloc = 20
	            PARAMETER phdr$S_pf_vms_initialcode = 1
	            PARAMETER phdr$V_pf_vms_initialcode = 21
	            PARAMETER phdr$S_pf_vms_resident = 1
	            PARAMETER phdr$V_pf_vms_resident = 22
	            PARAMETER phdr$S_pf_vms_vector = 1
	            PARAMETER phdr$V_pf_vms_vector = 23
	            PARAMETER phdr$S_pf_vms_protect = 1
	            PARAMETER phdr$V_pf_vms_protect = 24
	            PARAMETER phdr$S_pf_vms_nowrit_fixup = 1
	            PARAMETER phdr$V_pf_vms_nowrit_fixup = 25
	            PARAMETER phdr$S_pf_vms_short = 1
	            PARAMETER phdr$V_pf_vms_short = 26
	            PARAMETER phdr$S_pf_vms_shared = 1
	            PARAMETER phdr$V_pf_vms_shared = 27
	            PARAMETER phdr$S_pf_fill_24to30 = 3
	            PARAMETER phdr$V_pf_fill_24to30 = 28
	            PARAMETER phdr$S_pf_ia_64_norecov = 1
	            PARAMETER phdr$V_pf_ia_64_norecov = 31
	            BYTE %FILL (4)
	        END MAP
	        MAP
	            PARAMETER phdr$S_fill_1 = 20
	            PARAMETER phdr$V_fill_1 = 0
	            PARAMETER phdr$S_pf_maskos = 8
	            PARAMETER phdr$V_pf_maskos = 20
	            PARAMETER phdr$S_pf_maskproc = 4
	            PARAMETER phdr$V_pf_maskproc = 28
	            BYTE %FILL (4)
	        END MAP
	    END UNION
	    INTEGER*4 phdr$q_p_offset(2)  ! type is "Elf64_Off"
	    INTEGER*8 phdr$pq_p_vaddr  ! type is "Elf64_Addr"
	    INTEGER*8 phdr$pq_p_paddr  ! type is "Elf64_Addr"
	    INTEGER*4 phdr$q_p_filesz(2)  ! type is "Elf64_Xword"
	    INTEGER*4 phdr$q_p_memsz(2)  ! type is "Elf64_Xword"
	    INTEGER*4 phdr$q_p_align(2)  ! type is "Elf64_Xword"
	END STRUCTURE	! Elf64_Phdr
	PARAMETER PHDR$K_PT_NULL = '00000000'X
	PARAMETER PHDR$K_PT_LOAD = '00000001'X
	PARAMETER PHDR$K_PT_DYNAMIC = '00000002'X
	PARAMETER PHDR$K_PT_INTERP = '00000003'X
	PARAMETER PHDR$K_PT_NOTE = '00000004'X
	PARAMETER PHDR$K_PT_SHLIB = '00000005'X
	PARAMETER PHDR$K_PT_PHDR = '00000006'X
	PARAMETER PHDR$K_PT_TLS = '00000007'X
	PARAMETER PHDR$K_PT_LOOS = '60000000'X
	PARAMETER PHDR$K_PT_HIOS = '6FFFFFFF'X
	PARAMETER PHDR$K_PT_LOPROC = '70000000'X
	PARAMETER PHDR$K_PT_HIPROC = '7FFFFFFF'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_CALL_DEBUG = '00000000'X
	PARAMETER dynseg$m_dt_vms_lf_call_debug = '00000001'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_NOP0BUFS = '00000001'X
	PARAMETER dynseg$m_dt_vms_lf_nop0bufs = '00000002'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_P0IMAGE = '00000002'X
	PARAMETER dynseg$m_dt_vms_lf_p0image = '00000004'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_MKTHREADS = '00000003'X
	PARAMETER dynseg$m_dt_vms_lf_mkthreads = '00000008'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_UPCALLS = '00000004'X
	PARAMETER dynseg$m_dt_vms_lf_upcalls = '00000010'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_IMGSTA = '00000005'X
	PARAMETER dynseg$m_dt_vms_lf_imgsta = '00000020'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_INITIALIZE = '00000006'X
	PARAMETER dynseg$m_dt_vms_lf_initialize = '00000040'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_MAIN = '00000007'X
	PARAMETER dynseg$m_dt_vms_lf_main = '00000080'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_UNUSED = '00000008'X
	PARAMETER dynseg$m_dt_vms_lf_unused = '00000100'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_EXE_INIT = '00000009'X
	PARAMETER dynseg$m_dt_vms_lf_exe_init = '00000200'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_TBK_IN_IMG = '0000000A'X
	PARAMETER dynseg$m_dt_vms_lf_tbk_in_img = '00000400'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_DBG_IN_IMG = '0000000B'X
	PARAMETER dynseg$m_dt_vms_lf_dbg_in_img = '00000800'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_TBK_IN_DSF = '0000000C'X
	PARAMETER dynseg$m_dt_vms_lf_tbk_in_dsf = '00001000'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_DBG_IN_DSF = '0000000D'X
	PARAMETER dynseg$m_dt_vms_lf_dbg_in_dsf = '00002000'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_SIGNATURES = '0000000E'X
	PARAMETER dynseg$m_dt_vms_lf_signatures = '00004000'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_REL_SEG_OFF = '0000000F'X
	PARAMETER dynseg$m_dt_vms_lf_rel_seg_off = '00008000'X
	PARAMETER DYNSEG$SC_DT_VMS_LF_SSI_INCAP = '00000010'X
	PARAMETER dynseg$m_dt_vms_lf_ssi_incap = '00010000'X
	PARAMETER DYNSEG$K_SIZE = '00000010'X
	PARAMETER DYNSEG$C_SIZE = '00000010'X
	STRUCTURE /Elf64_Dyn/
	    INTEGER*4 dynseg$q_d_tag(2)  ! type is "Elf64_Sxword"
	    UNION
	        MAP
	        INTEGER*4 dynseg$q_d_val(2)  ! type is "Elf64_Xword"
	        END MAP
	        MAP
	        INTEGER*8 dynseg$pq_d_ptr  ! type is "Elf64_Addr"
	        END MAP
	        MAP
	            PARAMETER dynseg$S_dt_vms_lf_call_debug = 1
	            PARAMETER dynseg$V_dt_vms_lf_call_debug = 0
	            PARAMETER dynseg$S_dt_vms_lf_nop0bufs = 1
	            PARAMETER dynseg$V_dt_vms_lf_nop0bufs = 1
	            PARAMETER dynseg$S_dt_vms_lf_p0image = 1
	            PARAMETER dynseg$V_dt_vms_lf_p0image = 2
	            PARAMETER dynseg$S_dt_vms_lf_mkthreads = 1
	            PARAMETER dynseg$V_dt_vms_lf_mkthreads = 3
	            PARAMETER dynseg$S_dt_vms_lf_upcalls = 1
	            PARAMETER dynseg$V_dt_vms_lf_upcalls = 4
	            PARAMETER dynseg$S_dt_vms_lf_imgsta = 1
	            PARAMETER dynseg$V_dt_vms_lf_imgsta = 5
	            PARAMETER dynseg$S_dt_vms_lf_initialize = 1
	            PARAMETER dynseg$V_dt_vms_lf_initialize = 6
	            PARAMETER dynseg$S_dt_vms_lf_main = 1
	            PARAMETER dynseg$V_dt_vms_lf_main = 7
	            PARAMETER dynseg$S_dt_vms_lf_exe_init = 1
	            PARAMETER dynseg$V_dt_vms_lf_exe_init = 9
	            PARAMETER dynseg$S_dt_vms_lf_tbk_in_img = 1
	            PARAMETER dynseg$V_dt_vms_lf_tbk_in_img = 10
	            PARAMETER dynseg$S_dt_vms_lf_dbg_in_img = 1
	            PARAMETER dynseg$V_dt_vms_lf_dbg_in_img = 11
	            PARAMETER dynseg$S_dt_vms_lf_tbk_in_dsf = 1
	            PARAMETER dynseg$V_dt_vms_lf_tbk_in_dsf = 12
	            PARAMETER dynseg$S_dt_vms_lf_dbg_in_dsf = 1
	            PARAMETER dynseg$V_dt_vms_lf_dbg_in_dsf = 13
	            PARAMETER dynseg$S_dt_vms_lf_signatures = 1
	            PARAMETER dynseg$V_dt_vms_lf_signatures = 14
	            PARAMETER dynseg$S_dt_vms_lf_rel_seg_off = 1
	            PARAMETER dynseg$V_dt_vms_lf_rel_seg_off = 15
	            PARAMETER dynseg$S_dt_vms_lf_ssi_incap = 1
	            PARAMETER dynseg$V_dt_vms_lf_ssi_incap = 16
	        BYTE %FILL (2)
	        END MAP
	    END UNION
	END STRUCTURE	! Elf64_Dyn
	PARAMETER DYNSEG$K_DT_NULL = '00000000'X
	PARAMETER DYNSEG$K_DT_NEEDED = '00000001'X
	PARAMETER DYNSEG$K_DT_STRSZ = '0000000A'X
	PARAMETER DYNSEG$K_DT_IA_64_PLT_RESERVE = '70000000'X
	PARAMETER DYNSEG$K_DT_LOOS = '6000000D'X
	PARAMETER DYNSEG$K_DT_VMS_SUBTYPE = '6000000D'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_1 = '6000000E'X
	PARAMETER DYNSEG$K_DT_VMS_IMGIOCNT = '6000000F'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_3 = '60000010'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_4 = '60000011'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_5 = '60000012'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_6 = '60000013'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_7 = '60000014'X
	PARAMETER DYNSEG$K_DT_VMS_LNKFLAGS = '60000015'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_9 = '60000016'X
	PARAMETER DYNSEG$K_DT_VMS_VIR_MEM_BLK_SIZ = '60000017'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_11 = '60000018'X
	PARAMETER DYNSEG$K_DT_VMS_IDENT = '60000019'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_13 = '6000001A'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_14 = '6000001B'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_15 = '6000001C'X
	PARAMETER DYNSEG$K_DT_VMS_NEEDED_IDENT = '6000001D'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_17 = '6000001E'X
	PARAMETER DYNSEG$K_DT_VMS_IMG_RELA_CNT = '6000001F'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_19 = '60000020'X
	PARAMETER DYNSEG$K_DT_VMS_SEG_RELA_CNT = '60000021'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_21 = '60000022'X
	PARAMETER DYNSEG$K_DT_VMS_FIXUP_RELA_CNT = '60000023'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_23 = '60000024'X
	PARAMETER DYNSEG$K_DT_VMS_FIXUP_NEEDED = '60000025'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_25 = '60000026'X
	PARAMETER DYNSEG$K_DT_VMS_SYMVEC_CNT = '60000027'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_27 = '60000028'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_28 = '60000029'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_29 = '6000002A'X
	PARAMETER DYNSEG$K_DT_VMS_XLATED = '6000002B'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_31 = '6000002C'X
	PARAMETER DYNSEG$K_DT_VMS_STACKSIZE = '6000002D'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_33 = '6000002E'X
	PARAMETER DYNSEG$K_DT_VMS_UNWINDSZ = '6000002F'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_35 = '60000030'X
	PARAMETER DYNSEG$K_DT_VMS_UNWIND_CODSEG = '60000031'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_37 = '60000032'X
	PARAMETER DYNSEG$K_DT_VMS_UNWIND_INFOSEG = '60000033'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_39 = '60000034'X
	PARAMETER DYNSEG$K_DT_VMS_LINKTIME = '60000035'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_41 = '60000036'X
	PARAMETER DYNSEG$K_DT_VMS_SEG_NO = '60000037'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_43 = '60000038'X
	PARAMETER DYNSEG$K_DT_VMS_SYMVEC_OFFSET = '60000039'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_45 = '6000003A'X
	PARAMETER DYNSEG$K_DT_VMS_SYMVEC_SEG = '6000003B'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_47 = '6000003C'X
	PARAMETER DYNSEG$K_DT_VMS_UNWIND_OFFSET = '6000003D'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_49 = '6000003E'X
	PARAMETER DYNSEG$K_DT_VMS_UNWIND_SEG = '6000003F'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_51 = '60000040'X
	PARAMETER DYNSEG$K_DT_VMS_STRTAB_OFFSET = '60000041'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_53 = '60000042'X
	PARAMETER DYNSEG$K_DT_VMS_SYSVER_OFFSET = '60000043'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_55 = '60000044'X
	PARAMETER DYNSEG$K_DT_VMS_IMG_RELA_OFF = '60000045'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_57 = '60000046'X
	PARAMETER DYNSEG$K_DT_VMS_SEG_RELA_OFF = '60000047'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_59 = '60000048'X
	PARAMETER DYNSEG$K_DT_VMS_FIXUP_RELA_OFF = '60000049'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_61 = '6000004A'X
	PARAMETER DYNSEG$K_DT_VMS_PLTGOT_OFFSET = '6000004B'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_63 = '6000004C'X
	PARAMETER DYNSEG$K_DT_VMS_PLTGOT_SEG = '6000004D'X
	PARAMETER DYNSEG$K_DT_VMS_DTLOOSPLUS_65 = '6000004E'X
	PARAMETER DYNSEG$K_DT_VMS_FPMODE = '6000004F'X
	PARAMETER DYNSEG$K_DT_VMS_SUBTYPE_CLI = '00000001'X
	STRUCTURE /vms_ident/
	    INTEGER*4 IDENTl_minor_id
	    INTEGER*2 IDENTw_major_id
	    BYTE      IDENTb_match
	    BYTE      IDENTb_unused
	END STRUCTURE	! vms_ident
	PARAMETER TBK$K_RECTYPE_HDR32 = '00000001'X
	PARAMETER TBK$K_RECTYPE_RTN32 = '00000002'X
	PARAMETER TBK$K_RECTYPE_FIL = '00000003'X
	PARAMETER TBK$K_RECTYPE_LN1 = '00000004'X
	PARAMETER TBK$K_RECTYPE_LN2 = '00000005'X
	PARAMETER TBK$K_RECTYPE_LN4 = '00000006'X
	PARAMETER TBK$K_RECTYPE_PC1 = '00000007'X
	PARAMETER TBK$K_RECTYPE_PC2 = '00000008'X
	PARAMETER TBK$K_RECTYPE_PC4 = '00000009'X
	PARAMETER TBK$K_RECTYPE_VERSION = '0000000A'X
	PARAMETER TBK$K_RECTYPE_HDR64 = '0000000B'X
	PARAMETER TBK$K_RECTYPE_RTN64 = '0000000C'X
	PARAMETER TBK$K_RECTYPE_PC8 = '0000000D'X
	STRUCTURE /system_version_array/
	    PARAMETER sysver$S_subsystem_mask = 32
	    PARAMETER sysver$V_subsystem_mask = 0
	    BYTE %FILL (4)				 !  Bit mask of valid array entries
	    RECORD /sysver_majmin/ sysver$r_system_ver  !  Version of sys$base_image
	    RECORD /subsys_majmin/ sysver$r_subsys_ver(1:31)  !  Version of various subsystems
	END STRUCTURE	! system_version_array
	PARAMETER SYSVER$K_LENGTH = '00000021'X
	PARAMETER SYSVER$C_LENGTH = '00000021'X
	PARAMETER IMF$K_SIZE = '00000020'X
	PARAMETER IMF$C_SIZE = '00000020'X
	STRUCTURE /image_fixup/
	    INTEGER*4 imf$q_fixup_offset(2)  ! type is "Elf64_Xword"
	    INTEGER*4 imf$l_type  ! type is "Elf64_Word"
	    INTEGER*4 imf$l_fixup_seg  ! type is "Elf64_Word"
	    INTEGER*4 imf$q_addend(2)  ! type is "Elf64_Sxword"
	    INTEGER*4 imf$l_symvec_index  ! type is "Elf64_Word"
	    INTEGER*4 imf$l_data_type  ! type is "Elf64_Word"
	END STRUCTURE	! image_fixup
	PARAMETER IMR$K_SIZE = '00000028'X
	PARAMETER IMR$C_SIZE = '00000028'X
	STRUCTURE /image_rela/
	    INTEGER*4 imr$q_rela_offset(2)  ! type is "Elf64_Xword"
	    INTEGER*4 imr$l_type  ! type is "Elf64_Word"
	    INTEGER*4 imr$l_rela_seg  ! type is "Elf64_Word"
	    INTEGER*4 imr$q_addend(2)  ! type is "Elf64_Sxword"
	    INTEGER*4 imr$q_sym_offset(2)  ! type is "Elf64_Xword"
	    INTEGER*4 imr$l_sym_seg  ! type is "Elf64_Word"
	    INTEGER*4 imr$l_fill_1  ! type is "Elf64_Word"
	END STRUCTURE	! image_rela
	PARAMETER SGR$K_SIZE = '00000020'X
	PARAMETER SGR$C_SIZE = '00000020'X
	STRUCTURE /segment_rela/
	    INTEGER*4 sgr$q_rela_offset(2)  ! type is "Elf64_Xword"
	    INTEGER*4 sgr$l_type  ! type is "Elf64_Word"
	    INTEGER*4 sgr$l_rela_seg  ! type is "Elf64_Word"
	    INTEGER*4 sgr$q_addend(2)  ! type is "Elf64_Sxword"
	    UNION
	        MAP
	        INTEGER*4 sgr$q_gp_offset(2)  ! type is "Elf64_Sxword"
	        END MAP
	        MAP
	            INTEGER*4 sgr$l_symvec_index  ! type is "Elf64_Word"
	            INTEGER*4 sgr$l_needed_index  ! type is "Elf64_Word"
	        END MAP
	    END UNION
	END STRUCTURE	! segment_rela
	PARAMETER VMS_FIXUP$K_SIZE = '00000018'X
	PARAMETER VMS_FIXUP$C_SIZE = '00000018'X
	STRUCTURE /vms_fixup/
	    INTEGER*8 vms_fixup$pq_offset  ! type is "Elf64_Addr"
	    INTEGER*4 vms_fixup$q_addend(2)  ! type is "Elf64_Sxword"
	    INTEGER*4 vms_fixup$l_symindx  ! type is "Elf64_Word"
	    INTEGER*4 vms_fixup$l_type  ! type is "Elf64_Word"
	END STRUCTURE	! vms_fixup
	PARAMETER LNKG$K_SIZE = '00000008'X
	PARAMETER LNKG$C_SIZE = '00000008'X
	STRUCTURE /vms_linkages_header/
	    INTEGER*4 lnkg$l_type  ! type is "Elf64_Word"
	    INTEGER*4 lnkg$l_decl_count  ! type is "Elf64_Word"
	END STRUCTURE	! vms_linkages_header
	PARAMETER LNKG_ENTRY1$K_SIZE = '0000000C'X
	PARAMETER LNKG_ENTRY1$C_SIZE = '0000000C'X
	STRUCTURE /vms_lnkg_entry1/
	    INTEGER*4 lnkg_entry1$l_symidx  ! type is "Elf64_Word"
	    UNION
	        MAP
	        RECORD /vms_lnkg_desc1/ lnkg_entry1$ps_desc
	        END MAP
	        MAP
	        INTEGER*4 lnkg_entry1$q_vms_linkage_qw(2)  ! type is "Elf64_Xword"
	        END MAP
	    END UNION
	END STRUCTURE	! vms_lnkg_entry1
	PARAMETER VMSLNKG$K_VMS_LINKAGE_TYPE1 = '00000001'X
	PARAMETER VMSLNKG$K_REG_POL_VOL = '00000000'X
	PARAMETER VMSLNKG$K_REG_POL_SCR = '00000001'X
	PARAMETER VMSLNKG$K_REG_POL_OUT = '00000002'X
	PARAMETER VMSLNKG$K_REG_POL_PRE = '00000003'X
	STRUCTURE /func_descr/
	    INTEGER*8 fd$pq_entryVA  ! type is "Elf64_Addr"
	    INTEGER*8 fd$pq_GPtr  ! type is "Elf64_Addr"
	END STRUCTURE	! func_descr
	PARAMETER UNWIND$K_DESC_VERSION = '00000001'X
	PARAMETER unwind$m_unw_length = 'FFFFFFFF'X
	PARAMETER UNWIND$SC_UNW_FLAG_EHANDLER = '00000020'X
	PARAMETER unwind$m_unw_flag_ehandler = '00000000'X
	PARAMETER UNWIND$SC_UNW_FLAG_UHANDLER = '00000021'X
	PARAMETER unwind$m_unw_flag_uhandler = '00000000'X
	PARAMETER unwind$m_unw_flag_rsvd_43_34 = '00000000'X
	PARAMETER UNWIND$SC_UNW_FLAG_VMS_OSDA = '0000002C'X
	PARAMETER unwind$m_unw_flag_vms_osda = '00000000'X
	PARAMETER UNWIND$SC_UNW_FLAG_VMS_HANDLER = '0000002D'X
	PARAMETER unwind$m_unw_flag_vms_handler = '00000000'X
	PARAMETER UNWIND$SC_UNW_FLAG_MASK = '00000020'X
	PARAMETER unwind$m_unw_flag_mask = '00000000'X
	PARAMETER unwind$m_osmask_unused = '00000000'X
	PARAMETER UNWIND$SC_UNW_FLAG_OSMASK = '0000002C'X
	PARAMETER unwind$m_unw_flag_osmask = '00000000'X
	PARAMETER unwind$m_ivmsmode_unused = '00000000'X
	PARAMETER UNWIND$SC_UNW_IVMS_MODE = '0000002C'X
	PARAMETER unwind$m_unw_ivms_mode = '00000000'X
	PARAMETER unwind$m_version_unused = '00000000'X
	PARAMETER UNWIND$SC_UNW_VERSION = '00000030'X
	PARAMETER unwind$m_unw_version = '00000000'X
	PARAMETER UNWIND$K_DESC_SIZE = '00000008'X
	PARAMETER UNWIND$C_DESC_SIZE = '00000008'X
	STRUCTURE /exceptn_unwind/
	    UNION
	        MAP
	            UNION
	                MAP
	                INTEGER*4 unwind$l_unw_length  ! type is "Elf64_Word"
	                END MAP
	                MAP
	                    PARAMETER unwind$S_unw_length = 32
	                    PARAMETER unwind$V_unw_length = 0
	                    BYTE %FILL (4)
	                END MAP
	            END UNION
	            INTEGER*2 unwind$w_unw_flags  ! type is "Elf64_Half"
	            INTEGER*2 unwind$w_unw_version  ! type is "Elf64_Half"
	        END MAP
	        MAP
	        UNION
	            MAP
	                PARAMETER unwind$S_unused_31_0 = 32
	                PARAMETER unwind$V_unused_31_0 = 0
	                PARAMETER unwind$S_unw_flag_ehandler = 1
	                PARAMETER unwind$V_unw_flag_ehandler = 32
	                PARAMETER unwind$S_unw_flag_uhandler = 1
	                PARAMETER unwind$V_unw_flag_uhandler = 33
	                PARAMETER unwind$S_unw_flag_vms_osda = 1
	                PARAMETER unwind$V_unw_flag_vms_osda = 44
	                PARAMETER unwind$S_unw_flag_vms_handler = 1
	                PARAMETER unwind$V_unw_flag_vms_handler = 45
	            BYTE %FILL (5)
	            END MAP
	            MAP
	                PARAMETER unwind$S_unw_flag_mask = 16
	                PARAMETER unwind$V_unw_flag_mask = 32
	                BYTE %FILL (2)
	            END MAP
	            MAP
	                PARAMETER unwind$S_unw_flag_osmask = 4
	                PARAMETER unwind$V_unw_flag_osmask = 44
	                BYTE %FILL (1)
	            END MAP
	            MAP
	                PARAMETER unwind$S_unw_ivms_mode = 2
	                PARAMETER unwind$V_unw_ivms_mode = 44
	            BYTE %FILL (1)
	            END MAP
	            MAP
	                PARAMETER unwind$S_unw_version = 16
	                PARAMETER unwind$V_unw_version = 48
	                BYTE %FILL (2)
	            END MAP
	        END UNION
	        END MAP
	    END UNION
	END STRUCTURE	! exceptn_unwind
	PARAMETER UNWIND$K_FLAGS_UNUSED0 = '00000000'X
	PARAMETER UNWIND$K_FLAGS_UNUSED1 = '00000001'X
	PARAMETER UNWIND$K_FLAGS_SEMANTICS = '00000002'X
	PARAMETER UNWIND$K_FLAGS_SEMANTICS_DATA = '00000003'X
	PARAMETER UNWIND$K_ABI_UNIX = '00000000'X
	PARAMETER UNWIND$K_ABI_HPUX = '00000001'X
	PARAMETER UNWIND$K_ABI_WNT = '00000002'X
	PARAMETER UNWIND$K_ABI_VMS = '00000003'X
	PARAMETER UNWIND$K_HDR_PATTERN = '00000000'X
	PARAMETER UNWIND$M_HDR_MASK = '00000080'X
	PARAMETER UNWIND$K_R1_PATTERN = '00000000'X
	PARAMETER UNWIND$M_R1_MASK = '000000C0'X
	PARAMETER UNWIND$K_R2_PATTERN = '00000040'X
	PARAMETER UNWIND$M_R2_MASK = '000000F8'X
	PARAMETER UNWIND$K_R3_PATTERN = '00000060'X
	PARAMETER UNWIND$M_R3_MASK = '000000FC'X
	PARAMETER UNWIND$K_P1_PATTERN = '00000080'X
	PARAMETER UNWIND$M_P1_MASK = '000000E0'X
	PARAMETER UNWIND$K_P2_PATTERN = '000000A0'X
	PARAMETER UNWIND$M_P2_MASK = '000000F0'X
	PARAMETER UNWIND$K_P3_PATTERN = '000000B0'X
	PARAMETER UNWIND$M_P3_MASK = '000000F8'X
	PARAMETER UNWIND$K_P4_PATTERN = '000000B8'X
	PARAMETER UNWIND$M_P4_MASK = '000000FF'X
	PARAMETER UNWIND$K_P5_PATTERN = '000000B9'X
	PARAMETER UNWIND$M_P5_MASK = '000000FF'X
	PARAMETER UNWIND$K_P6_PATTERN = '000000C0'X
	PARAMETER UNWIND$M_P6_MASK = '000000E0'X
	PARAMETER UNWIND$K_P7_PATTERN = '000000E0'X
	PARAMETER UNWIND$M_P7_MASK = '000000F0'X
	PARAMETER UNWIND$K_P8_PATTERN = '000000F0'X
	PARAMETER UNWIND$M_P8_MASK = '000000FF'X
	PARAMETER UNWIND$K_P9_PATTERN = '000000F1'X
	PARAMETER UNWIND$M_P9_MASK = '000000FF'X
	PARAMETER UNWIND$K_P10_PATTERN = '000000FF'X
	PARAMETER UNWIND$M_P10_MASK = '000000FF'X
	PARAMETER UNWIND$K_B1_PATTERN = '00000080'X
	PARAMETER UNWIND$M_B1_MASK = '000000C0'X
	PARAMETER UNWIND$K_B2_PATTERN = '000000C0'X
	PARAMETER UNWIND$M_B2_MASK = '000000E0'X
	PARAMETER UNWIND$K_B3_PATTERN = '000000E0'X
	PARAMETER UNWIND$M_B3_MASK = '000000FF'X
	PARAMETER UNWIND$K_B4_PATTERN = '000000F0'X
	PARAMETER UNWIND$M_B4_MASK = '000000F7'X
	PARAMETER UNWIND$K_X1_PATTERN = '000000F9'X
	PARAMETER UNWIND$M_X1_MASK = '000000FF'X
	PARAMETER UNWIND$K_X2_PATTERN = '000000FA'X
	PARAMETER UNWIND$M_X2_MASK = '000000FF'X
	PARAMETER UNWIND$K_X3_PATTERN = '000000FB'X
	PARAMETER UNWIND$M_X3_MASK = '000000FF'X
	PARAMETER UNWIND$K_X4_PATTERN = '000000FC'X
	PARAMETER UNWIND$M_X4_MASK = '000000FF'X
	PARAMETER UNWIND$K_P10_ABI_UNIX = '00000000'X
	PARAMETER UNWIND$K_P10_ABI_HPUX = '00000001'X
	PARAMETER UNWIND$K_P10_ABI_WNT = '00000002'X
	PARAMETER UNWIND$K_P10_ABI_VMS = '00000003'X
!DEC$ END OPTIONS