/***************************************************************************/ /** **/ /** HPE CONFIDENTIAL. This software is confidential proprietary software **/ /** licensed by Hewlett-Packard Enterprise Development, LP, and is not **/ /** authorized to be used, duplicated OR disclosed to anyone without the **/ /** prior written permission of HPE. **/ /** © 2023 Copyright Hewlett-Packard Enterprise Development, LP **/ /** **/ /** VMS SOFTWARE, INC. CONFIDENTIAL. This software is confidential **/ /** proprietary software licensed by VMS Software, Inc., and is not **/ /** authorized to be used, duplicated or disclosed to anyone without **/ /** the prior written permission of VMS Software, Inc. **/ /** © 2023 Copyright VMS Software, Inc. **/ /** **/ /***************************************************************************/ /********************************************************************************************************************************/ /* Created: 9-Nov-2023 12:06:49 by OpenVMS SDL V3.7 */ /* Source: 09-JUN-1993 15:30:19 $1$DGA8345:[LIB_H.SRC]INIRTNDEF.SDL;1 */ /********************************************************************************************************************************/ /*** MODULE INIRTNDEF ***/ #ifndef __INIRTNDEF_LOADED #define __INIRTNDEF_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 INIRTN$M_CALLED 0x1 #define INIRTN$M_NO_RECALL 0x2 #define INIRTN$S_INIRTNDEF 4 /* Old size name - synonym */ typedef struct _inirtn { __union { int inirtn$l_bits; __struct { unsigned inirtn$v_called : 1; /* Routine has been called already */ unsigned inirtn$v_no_recall : 1; /* Routine is not to be recalled */ unsigned inirtn$v_fill_2_ : 6; } inirtn$r_fill_1_; } inirtn$r_fill_0_; } INIRTN; #if !defined(__VAXC) #define inirtn$v_called inirtn$r_fill_0_.inirtn$r_fill_1_.inirtn$v_called #define inirtn$v_no_recall inirtn$r_fill_0_.inirtn$r_fill_1_.inirtn$v_no_recall #endif /* #if !defined(__VAXC) */ #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 /* __INIRTNDEF_LOADED */