/********************************************************************************************************************************/ /* Created: 15-MAR-2001 23:37:33 by OpenVMS SDL EV1-33 */ /* Source: 15-MAR-2001 23:34:34 _$11$DUA933:[BUILD.SDL]OBJFMT.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $ARGDEF ***/ #ifndef __ARGDEF_LOADED #define __ARGDEF_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 /* */ /* ARG$ - The argument descriptors */ /* */ #define ARG$C_UNKNOWN 0 /* Unspecified or unknown */ #define ARG$C_VALUE 1 /* Passed by value */ #define ARG$C_REF 2 /* Passed by reference */ #define ARG$C_DESC 3 /* Passed by descriptor */ #define ARG$K_SIZE 2 #define ARG$C_SIZE 2 struct argdef { __union { unsigned char arg$b_valctl; /*Validation control byte */ __struct { unsigned arg$v_passmech : 2; /*Passing mechanism */ unsigned arg$v_fill_18 : 6; } arg$r_valctl_bits; /* Passing mechanisms */ } arg$r_valctl_overlay; unsigned char arg$b_bytecnt; /*Remaining byte count */ } ; #if !defined(__VAXC) && !defined(VAXC) #define arg$b_valctl arg$r_valctl_overlay.arg$b_valctl #define arg$v_passmech arg$r_valctl_overlay.arg$r_valctl_bits.arg$v_passmech #endif /* #if !defined(__VAXC) && !defined(VAXC) */ #ifdef __cplusplus } #endif #pragma standard #endif /* __ARGDEF_LOADED */