/********************************************************************************************************************************/ /* Created: 30-Mar-2010 17:29:38 by OpenVMS SDL EV3-3 */ /* Source: 30-MAR-2010 17:29:20 $1$DGA7274:[STARLET_H.SRC]OBJFMT.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $EOMWDEF ***/ #ifndef __EOMWDEF_LOADED #define __EOMWDEF_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 /* */ /* End of module record with word of psect (EOMW) */ /* */ #define EOMW$K_EOMMIN 2 /*Min length of EOM record */ #define EOMW$C_EOMMIN 2 /*Min length of EOM record */ #define EOMW$K_EOMMX1 8 /*Length of EOMW record w/o transfer flags */ #define EOMW$C_EOMMX1 8 /*Length of EOMW record w/o transfer flags */ #define EOMW$K_EOMMAX 9 /*Maximum length of EOMW record */ #define EOMW$C_EOMMAX 9 /*Maximum length of EOMW record */ #define EOMW$M_WKTFR 0x1 #ifdef __NEW_STARLET typedef struct _eomwdef { unsigned char eomw$b_rectyp; /*Record type (OBJ$C_EOM) */ unsigned char eomw$b_comcod; /*Compiler completion code */ unsigned short int eomw$w_psindx; /*P-sect of transfer address */ unsigned int eomw$l_tfradr; /*Transfer address */ __union { unsigned char eomw$b_tfrflg; /*Transfer address flags */ __struct { unsigned eomw$v_wktfr : 1; /*Transfer address is weak */ unsigned eomw$v_fill_13_ : 7; } eomw$r_tfrflg_bits; } eomw$r_tfrflg_overlay; } EOMWDEF; #if !defined(__VAXC) #define eomw$b_tfrflg eomw$r_tfrflg_overlay.eomw$b_tfrflg #define eomw$v_wktfr eomw$r_tfrflg_overlay.eomw$r_tfrflg_bits.eomw$v_wktfr #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct eomwdef { unsigned char eomw$b_rectyp; /*Record type (OBJ$C_EOM) */ unsigned char eomw$b_comcod; /*Compiler completion code */ unsigned short int eomw$w_psindx; /*P-sect of transfer address */ unsigned int eomw$l_tfradr; /*Transfer address */ __union { unsigned char eomw$b_tfrflg; /*Transfer address flags */ __struct { unsigned eomw$v_wktfr : 1; /*Transfer address is weak */ unsigned eomw$v_fill_13_ : 7; } eomw$r_tfrflg_bits; } eomw$r_tfrflg_overlay; } ; #if !defined(__VAXC) #define eomw$b_tfrflg eomw$r_tfrflg_overlay.eomw$b_tfrflg #define eomw$v_wktfr eomw$r_tfrflg_overlay.eomw$r_tfrflg_bits.eomw$v_wktfr #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 /* __EOMWDEF_LOADED */