/********************************************************************************************************************************/ /* Created: 15-MAR-2001 23:37:36 by OpenVMS SDL EV1-33 */ /* Source: 15-MAR-2001 23:34:34 _$11$DUA933:[BUILD.SDL]OBJFMT.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $ESRFDEF ***/ #ifndef __ESRFDEF_LOADED #define __ESRFDEF_LOADED 1 #pragma nostandard #ifdef __cplusplus extern "C" { #define __unknown_params ... #else #define __unknown_params #endif #if !defined(__VAXC) && !defined(VAXC) #define __struct struct #define __union union #else #define __struct variant_struct #define __union variant_union #endif /* */ /* EVAX Symbol reference (SYM$M_DEF in EGSY$W_FLAGS is 0) */ /* */ #define ESRF$K_NAME 9 #define ESRF$C_NAME 9 struct esrfdef { __union { unsigned short int esrf$w_gsdtyp; /*Maps over GSY$B_GSDTYP */ __struct { #if defined(__VAXC) || defined(VAXC) char esrf$t_start[]; #else #define esrf$t_start esrfdef$$_fill_1 #endif /* #if defined(__VAXC) || defined(VAXC) */ short int esrfdef$$_fill_1; } esrf$r_gsdtyp_fields; } esrf$r_gsdtyp_overlay; unsigned short int esrf$w_size; /*size of this ESRF */ unsigned char esrf$b_datyp; /*Maps over GSY$B_DATYP */ unsigned char esrf$b_temp; /*pad for alignment */ unsigned short int esrf$w_flags; /*Maps over GSY$W_FLAGS */ unsigned char esrf$b_namlng; /*Length of symbol name */ char esrf$t_name [31]; /*Symbol name */ } ; #if !defined(__VAXC) && !defined(VAXC) #define esrf$w_gsdtyp esrf$r_gsdtyp_overlay.esrf$w_gsdtyp #endif /* #if !defined(__VAXC) && !defined(VAXC) */ #ifdef __cplusplus } #endif #pragma standard #endif /* __ESRFDEF_LOADED */