/********************************************************************************************************************************/ /* Created: 19-JUN-1992 18:08:28 by OpenVMS SDL EV1-11 */ /* Source: 19-JUN-1992 18:04:56 CRTL$:[ROUTLEY.CRTL.SDLFIX.BLADEFIX]RMSUSR.SDI; */ /* Modified: 24-Aug-1992 for C++ compatibility. */ /********************************************************************************************************************************/ /*** MODULE $XABDEF ***/ #ifndef __XABDEF_LOADED #define __XABDEF_LOADED 1 #if defined(__DECC) || defined(__DECCXX) #pragma __nostandard /* This file uses non-ANSI-Standard features */ #else #pragma nostandard #endif #if defined(__DECC) || defined(__DECCXX) #pragma __member_alignment __save #pragma __nomember_alignment #endif #ifdef __DECC #pragma __message __save #pragma __message __disable (__MISALGNDSTRCT) #pragma __message __disable (__MISALGNDMEM) #endif #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 /*** MODULE $xabdef ***/ /* */ /* definitions for all xabs */ /* $xabdef */ /* */ /* */ /* */ /* the first four fields are shared in common between all xabs */ /* and hence are defined only once */ /* (the only exception is that the spare word may be used by some xabs) */ /* */ struct XAB { unsigned char xab$b_cod; /* xab id code */ unsigned char xab$b_bln; /* block length */ short int xabdef$$_fill_1; /* (spare) */ void * xab$l_nxt; /* xab chain link */ unsigned short int xab$w_rvn; short int xabdef$$_fill_2; __union { int xab$q_rdt [2]; __struct { unsigned int xab$l_rdt0; int xab$l_rdt4; } xab$r_rdt_fields; #ifdef __cplusplus }; #else } xab$r_rdt_overlay; #endif } ; #if !defined(__VAXC) && !defined(VAXC) #define xab$l_rdt0 xab$r_rdt_fields.xab$l_rdt0 #define xab$l_rdt4 xab$r_rdt_fields.xab$l_rdt4 #endif struct XABDEF1 { char xabdef$$_fill_3 [8]; char xabdef$$_fill_4; /*THESE FIELDS WILL BE DEFINED LATER */ char xabdef$$_fill_5; short int xabdef$$_fill_6; int xabdef$$_fill_7; int xabdef$$_fill_8; short int xabdef$$_fill_9; unsigned char xab$b_bkz; /*COMMON TO FHC AND ALQ XABS */ } ; #define XAB$C_CXT_VER1 1 /* RMS Context Extraction version 1 */ #if defined(__DECC) #pragma __message __restore #endif #if defined(__DECC) || defined(__DECCXX) #pragma __member_alignment __restore #endif #ifdef __cplusplus } #endif #if defined(__DECC) || defined(__DECCXX) #pragma __standard /* This file uses non-ANSI-Standard features */ #else #pragma standard #endif #endif /* __XABDEF_LOADED */