/********************************************************************************************************************************/ /* Created: 30-Mar-2010 17:29:44 by OpenVMS SDL EV3-3 */ /* Source: 30-MAR-2010 17:29:21 $1$DGA7274:[STARLET_H.SRC]RMSUSR.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $XABRUDEF ***/ #ifndef __XABRUDEF_LOADED #define __XABRUDEF_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 /* */ /* Recovery Unit XAB definitions */ /* $xabrudef */ /* */ #define XAB$C_RU 35 /* xabru id code */ #define XAB$M_NOJOIN 0x1 #ifdef __NEW_STARLET #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __longword #else #pragma __nomember_alignment #endif typedef struct _xabrudef { #pragma __nomember_alignment unsigned char xab$b_cod; /* xab id code */ unsigned char xab$b_bln; /* block length */ short int xabrudef$$_fill_1; /* (spare) */ void *xab$l_nxt; /* xab chain link */ __union { unsigned short int xab$w_ru_flags; /* Flags */ __struct { unsigned xab$v_nojoin : 1; /* Do not join any recovery unit */ unsigned xab$v_fill_22_ : 7; } xab$r_ru_flags_bits; } xab$r_ru_flags_overlay; short int xabrudef$$_fill_5; unsigned int xab$l_ru_handle; /* RU handle to join (input field) */ unsigned int xab$l_ru_handle_joined; /* RU handle joined (output field) */ unsigned int xabrudef$$_fill_7; unsigned int xabrudef$$_fill_8; unsigned int xabrudef$$_fill_9; unsigned int xabrudef$$_fill_10; unsigned int xabrudef$$_fill_11; unsigned int xabrudef$$_fill_12; unsigned int xabrudef$$_fill_13; } XABRUDEF; #if !defined(__VAXC) #define xab$w_ru_flags xab$r_ru_flags_overlay.xab$w_ru_flags #define xab$r_ru_flags_bits xab$r_ru_flags_overlay.xab$r_ru_flags_bits #define xab$v_nojoin xab$r_ru_flags_bits.xab$v_nojoin #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __longword #else #pragma __nomember_alignment #endif struct xabrudef { #pragma __nomember_alignment unsigned char xab$b_cod; /* xab id code */ unsigned char xab$b_bln; /* block length */ short int xabrudef$$_fill_1; /* (spare) */ void *xab$l_nxt; /* xab chain link */ __union { unsigned short int xab$w_ru_flags; /* Flags */ __struct { unsigned xab$v_nojoin : 1; /* Do not join any recovery unit */ unsigned xab$v_fill_22_ : 7; } xab$r_ru_flags_bits; } xab$r_ru_flags_overlay; short int xabrudef$$_fill_5; unsigned int xab$l_ru_handle; /* RU handle to join (input field) */ unsigned int xab$l_ru_handle_joined; /* RU handle joined (output field) */ unsigned int xabrudef$$_fill_7; unsigned int xabrudef$$_fill_8; unsigned int xabrudef$$_fill_9; unsigned int xabrudef$$_fill_10; unsigned int xabrudef$$_fill_11; unsigned int xabrudef$$_fill_12; unsigned int xabrudef$$_fill_13; } ; #if !defined(__VAXC) #define xab$w_ru_flags xab$r_ru_flags_overlay.xab$w_ru_flags #define xab$v_nojoin xab$r_ru_flags_overlay.xab$r_ru_flags_bits.xab$v_nojoin #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ /* basealign on aggregate XABRUDEF operates after aggregate end */ #define XAB$K_RULEN 48 #define XAB$C_RULEN 48 #ifdef __NEW_STARLET #define XABRU _xabrudef #else #define XABRU xabrudef #endif #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 /* __XABRUDEF_LOADED */