/********************************************************************************************************************************/ /* Created: 30-Mar-2010 17:29:40 by OpenVMS SDL EV3-3 */ /* Source: 30-MAR-2010 17:29:20 $1$DGA7274:[STARLET_H.SRC]OBJFMT.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $EOBJRECDEF ***/ #ifndef __EOBJRECDEF_LOADED #define __EOBJRECDEF_LOADED 1 #pragma __nostandard /* This file uses non-ANSI-Standard features */ #pragma __member_alignment __save #pragma __nomember_alignment #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __save /* Save the previously-defined required ptr size */ #pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */ #endif #ifdef __cplusplus extern "C" { #define __unknown_params ... #define __optional_params ... #else #define __unknown_params #define __optional_params ... #endif #ifndef __struct #if !defined(__VAXC) #define __struct struct #else #define __struct variant_struct #endif #endif #ifndef __union #if !defined(__VAXC) #define __union union #else #define __union variant_union #endif #endif /* */ /* These are the record types defined for VAX and EVAX object records. */ /* Some types are only recognized in one format of object file, but */ /* the types must be a single set of distinct codes. */ /* */ #define EOBJ$C_EMH 8 /*EVAX module header record */ #define EOBJ$C_EEOM 9 /*EVAX end of module record */ #define EOBJ$C_EGSD 10 /*EVAX global symbol definition record */ #define EOBJ$C_ETIR 11 /*EVAX text information record */ #define EOBJ$C_EDBG 12 /*EVAX Debugger information record */ #define EOBJ$C_ETBT 13 /*EVAX Traceback information record */ #define EOBJ$C_MAXRECTYP 13 /*Last assigned record type */ #define EOBJ$K_SUBTYP 4 #define EOBJ$C_SUBTYP 4 #define EOBJ$C_MAXRECSIZ 8192 /*Maximum legal record size */ #define EOBJ$C_STRLVL 2 /*Structure level */ #define EOBJ$C_STRLVL64 3 /*Structure level */ #define EOBJ$C_SYMSIZ 64 /*Maximum symbol length */ #define EOBJ$C_STOREPLIM -1 /*Maximum repeat count on store commands */ #define EOBJ$C_PSCALILIM 16 /*Maximum p-sect alignment */ #ifdef __NEW_STARLET typedef struct _eobjrecdef { /* */ /* These are the record types defined for VAX object records. */ /* */ unsigned short int eobj$w_rectyp; /*First byte always record type */ unsigned short int eobj$w_size; /*Second is always record size */ /*Permissable record types */ unsigned short int eobj$w_subtyp; /*Record sub-type byte */ unsigned char eobj$b_mhd_strlv; /*Structure level */ unsigned char eobj$b_mhd_hold; /*alignment temp */ __union { unsigned short int eobj$w_mhd_recsz; /*Maximum record size */ __struct { char eobjrecdef$$_fill_1 [2]; /*Misc. constants */ } eobj$r_mhd_recsz_fields; } eobj$r_mhd_recsz_overlay; } EOBJRECDEF; #if !defined(__VAXC) #define eobj$w_mhd_recsz eobj$r_mhd_recsz_overlay.eobj$w_mhd_recsz #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct eobjrecdef { /* */ /* These are the record types defined for VAX object records. */ /* */ unsigned short int eobj$w_rectyp; /*First byte always record type */ unsigned short int eobj$w_size; /*Second is always record size */ /*Permissable record types */ unsigned short int eobj$w_subtyp; /*Record sub-type byte */ unsigned char eobj$b_mhd_strlv; /*Structure level */ unsigned char eobj$b_mhd_hold; /*alignment temp */ __union { unsigned short int eobj$w_mhd_recsz; /*Maximum record size */ __struct { char eobjrecdef$$_fill_1 [2]; /*Misc. constants */ } eobj$r_mhd_recsz_fields; } eobj$r_mhd_recsz_overlay; } ; #if !defined(__VAXC) #define eobj$w_mhd_recsz eobj$r_mhd_recsz_overlay.eobj$w_mhd_recsz #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ #pragma __member_alignment __restore #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */ #endif #ifdef __cplusplus } #endif #pragma __standard #endif /* __EOBJRECDEF_LOADED */