/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:06 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]STARDEFFL.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $LKSBDEF ***/ #ifndef __LKSBDEF_LOADED #define __LKSBDEF_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 /*+ */ /* Define Lock Status Block */ /*- */ #ifdef __NEW_STARLET #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __quadword #else #pragma __nomember_alignment #endif typedef struct _lksb { #pragma __nomember_alignment unsigned short int lksb$w_status; /* Status */ unsigned short int lksb$w_reserved; /* Reserved */ unsigned int lksb$l_lkid; /* Lock identification */ unsigned char lksb$b_valblk [16]; /* Lock value block */ } LKSB; #else /* __OLD_STARLET */ #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __quadword #else #pragma __nomember_alignment #endif typedef struct _lksb { #pragma __nomember_alignment unsigned short int lksb$w_status; /* Status */ unsigned short int lksb$w_reserved; /* Reserved */ unsigned int lksb$l_lkid; /* Lock identification */ unsigned char lksb$b_valblk [16]; /* Lock value block */ } lksb; #endif /* #ifdef __NEW_STARLET */ #define LKSB$K_LENGTH 24 /* Length of LKSB */ #define LKSB$C_LENGTH 24 /* Length of LKSB */ #ifdef __NEW_STARLET #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __quadword #else #pragma __nomember_alignment #endif typedef struct _xlksb { #pragma __nomember_alignment unsigned short int xlksb$w_status; /* Status */ unsigned short int xlksb$w_reserved; /* Reserved */ unsigned int xlksb$l_lkid; /* Lock identification */ unsigned char xlksb$b_xvalblk [64]; /* Lock value block */ } XLKSB; #else /* __OLD_STARLET */ #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __quadword #else #pragma __nomember_alignment #endif typedef struct _xlksb { #pragma __nomember_alignment unsigned short int xlksb$w_status; /* Status */ unsigned short int xlksb$w_reserved; /* Reserved */ unsigned int xlksb$l_lkid; /* Lock identification */ unsigned char xlksb$b_xvalblk [64]; /* Lock value block */ } xlksb; #endif /* #ifdef __NEW_STARLET */ #define XLKSB$K_LENGTH 72 /* Length of XLKSB */ #define XLKSB$C_LENGTH 72 /* Length of XLKSB */ #if defined (__ALPHA) || defined (__ia64) # ifdef __INITIAL_POINTER_SIZE # pragma __required_pointer_size __save /* Save current pointer size */ # pragma __required_pointer_size 64 /* Pointers are 64-bits */ typedef struct _lksb * LKSB_PQ; /* 64-bit pointer to an LKSB */ typedef struct _lksb ** LKSB_PPQ; /* 64-bit pointer to a pointer to an LKSB */ typedef struct _xlksb * XLKSB_PQ; /* 64-bit pointer to an LKSB */ typedef struct _xlksb ** XLKSB_PPQ; /* 64-bit pointer to a pointer to an LKSB */ # pragma __required_pointer_size __restore /* Return to previous pointer size */ # else typedef unsigned __int64 LKSB_PQ; /* Same size as a 64-bit pointer to an LKSB */ typedef unsigned __int64 LKSB_PPQ; /* Same size as a 64-bit pointer to a pointer to an LKSB */ typedef unsigned __int64 XLKSB_PQ; /* Same size as a 64-bit pointer to an LKSB */ typedef unsigned __int64 XLKSB_PPQ; /* Same size as a 64-bit pointer to a pointer to an LKSB */ # endif #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 /* __LKSBDEF_LOADED */