/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:05 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]STARDEFAE.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $CLIDEF ***/ #ifndef __CLIDEF_LOADED #define __CLIDEF_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 /*++ */ /* */ /* $CLIDEF --- COMMAND LAGUAGE INTERFACE DEFINITIONS */ /* */ /* THIS MODULE DEFINES THE OFFSET VALUES FOR THE DATA STRUCTURES */ /* USED TO COMMUNICATED COMMAND INFORMATION BETWEEN THE CLI AND */ /* THE UTILITY THAT WAS REQUESTED TO PERFORM THE OPERATION. */ /* */ /*-- */ #define CLI$M_DEBUG 0x1 #define CLI$M_DBGTRU 0x2 #define CLI$M_VERIFY 0x4 #define CLI$M_BATCH 0x8 #define CLI$M_INDIRECT 0x10 #define CLI$M_VFYINP 0x20 #define CLI$M_TRMVRBLV 0x300 #define CLI$M_DBGEXCP 0x10000 #ifdef __NEW_STARLET typedef struct _clidef { unsigned int cli$l_iniargcnt; /* INITIAL ARG COUNT */ #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */ #endif void *cli$a_progxfer; /* PROGRAM TRANSFER VECTOR ADDRESS */ void *cli$a_utilserv; /* ADDRESS OF CLI UTILITY SERVICE */ void *cli$a_imghdadr; /* ADDRESS OF IMAGE HEADER */ void *cli$a_imgfiled; /* ADDRESS OF IMAGE FILE DATA */ unsigned int cli$l_linkflag; /* LINK FLAG LONGWORD */ __union { unsigned int cli$l_cliflag; /* CLI FLAG LONGWORD */ __struct { unsigned cli$v_debug : 1; /* DEBUG QUALIFIER SEEN */ unsigned cli$v_dbgtru : 1; /* DEBUG WAS TRUE */ unsigned cli$v_verify : 1; /* VERIFY IS ON */ unsigned cli$v_batch : 1; /* THIS PROCESS IS A BATCH JOB */ unsigned cli$v_indirect : 1; /* INDIRECT LEVEL NOT EQUAL TO ZERO */ unsigned cli$v_vfyinp : 1; /* UTILITY SHOULD VERFIY INPUT */ unsigned clidef$$_fill_1 : 2; /* ROUND UP TO NEXT BYTE */ unsigned cli$v_trmvrblv : 2; /* TERMINAL VERBOSITY LEVEL */ unsigned clidef$$_fill_2 : 6; /* ROUND UP TO NEXT BYTE */ unsigned cli$v_dbgexcp : 1; /* DEBUGGER CALLED VIA "DEBUG" EXCEPTION */ unsigned cli$v_fill_100_ : 7; } cli$r_cliflag_bits; /* THE FOLLOWING ARGUMENTS ARE OPTIONAL DEPENDING ON INIARGCNT */ } cli$r_cliflag_overlay; int cli$l_arglist; /* ADDRESS OF APPLICATION ARGUMENT LIST */ /* (USED FOR MERGED IMAGE ARG. PASSING) */ /* */ /* DEFINE CLI COMMAND INTERFACE REQUEST BLOCK */ /* */ } CLIDEF; #if !defined(__VAXC) #define cli$l_cliflag cli$r_cliflag_overlay.cli$l_cliflag #define cli$v_debug cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_debug #define cli$v_dbgtru cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgtru #define cli$v_verify cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_verify #define cli$v_batch cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_batch #define cli$v_indirect cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_indirect #define cli$v_vfyinp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_vfyinp #define cli$v_trmvrblv cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_trmvrblv #define cli$v_dbgexcp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgexcp #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct clidef { unsigned int cli$l_iniargcnt; /* INITIAL ARG COUNT */ void *cli$a_progxfer; /* PROGRAM TRANSFER VECTOR ADDRESS */ void *cli$a_utilserv; /* ADDRESS OF CLI UTILITY SERVICE */ void *cli$a_imghdadr; /* ADDRESS OF IMAGE HEADER */ void *cli$a_imgfiled; /* ADDRESS OF IMAGE FILE DATA */ unsigned int cli$l_linkflag; /* LINK FLAG LONGWORD */ __union { unsigned int cli$l_cliflag; /* CLI FLAG LONGWORD */ __struct { unsigned cli$v_debug : 1; /* DEBUG QUALIFIER SEEN */ unsigned cli$v_dbgtru : 1; /* DEBUG WAS TRUE */ unsigned cli$v_verify : 1; /* VERIFY IS ON */ unsigned cli$v_batch : 1; /* THIS PROCESS IS A BATCH JOB */ unsigned cli$v_indirect : 1; /* INDIRECT LEVEL NOT EQUAL TO ZERO */ unsigned cli$v_vfyinp : 1; /* UTILITY SHOULD VERFIY INPUT */ unsigned clidef$$_fill_1 : 2; /* ROUND UP TO NEXT BYTE */ unsigned cli$v_trmvrblv : 2; /* TERMINAL VERBOSITY LEVEL */ unsigned clidef$$_fill_2 : 6; /* ROUND UP TO NEXT BYTE */ unsigned cli$v_dbgexcp : 1; /* DEBUGGER CALLED VIA "DEBUG" EXCEPTION */ unsigned cli$v_fill_100_ : 7; } cli$r_cliflag_bits; /* THE FOLLOWING ARGUMENTS ARE OPTIONAL DEPENDING ON INIARGCNT */ } cli$r_cliflag_overlay; int cli$l_arglist; /* ADDRESS OF APPLICATION ARGUMENT LIST */ /* (USED FOR MERGED IMAGE ARG. PASSING) */ /* */ /* DEFINE CLI COMMAND INTERFACE REQUEST BLOCK */ /* */ } ; #if !defined(__VAXC) #define cli$l_cliflag cli$r_cliflag_overlay.cli$l_cliflag #define cli$v_debug cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_debug #define cli$v_dbgtru cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgtru #define cli$v_verify cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_verify #define cli$v_batch cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_batch #define cli$v_indirect cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_indirect #define cli$v_vfyinp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_vfyinp #define cli$v_trmvrblv cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_trmvrblv #define cli$v_dbgexcp cli$r_cliflag_overlay.cli$r_cliflag_bits.cli$v_dbgexcp #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ #define CLI$M_PARMREQ 0x1 #define CLI$M_ABSADR 0x2 #define CLI$M_EXPNAM 0x4 #define CLI$M_LASTVAL 0x1 #define CLI$M_DUMMY 0x2 #define CLI$M_PARMPRS 0x1 #define CLI$M_CONCATINP 0x2 #define CLI$M_MOREINP 0x4 #define CLI$M_PARMDEF 0x8 #define CLI$M_MOREVALS 0x1 #define CLI$M_KEYVALU 0x2 #define CLI$K_REQDESC 28 /* SIZE OF THE STRUCTURE */ #define CLI$C_REQDESC 28 /* SIZE OF THE STRUCTURE */ /* */ #ifdef __NEW_STARLET typedef struct _clidef1 { __union { int clidef$$_fill_3; /* DUMMY ARG */ __struct { __union { unsigned char cli$b_rqtype; /* TYPE OF REQUEST BEING MADE */ __struct { unsigned cli$v_subtyp : 4; /* SUB TYPE VIELD */ unsigned cli$v_prityp : 4; /* PRIMARY TYPYE */ } cli$r_rqtype_bits; } cli$r_rqtype_overlay; __union { unsigned short int cli$w_servcod; /* CLI SERVICE CODE */ __struct { __union { unsigned char cli$b_rqindx; /* OFFSET FOR VALUE KEYWORD INDEX */ unsigned char cli$b_bitnum; /* BIT TO SET IF REQUEST IS SUCESSFUL */ } cli$r_rqindx_overlay; __union { unsigned char cli$b_rqflgs; /* INPUT FLAGS CONCERNING REQUEST */ __struct { unsigned cli$v_parmreq : 1; /* PARAMATER IS REQUIRED */ unsigned cli$v_absadr : 1; /* ALL ADDRESS ARE ABSOLUTE */ unsigned cli$v_expnam : 1; /* RETURN EXPLICIT NAMES ONLY */ unsigned cli$v_fill_101_ : 5; } cli$r_rqflgs_bits0; __struct { unsigned cli$v_lastval : 1; /* LAST VALUE ALLOWED */ unsigned cli$v_dummy : 1; /* *** SAVE PLACE FOR ABS ADR *** */ unsigned cli$v_fill_102_ : 6; } cli$r_rqflgs_bits1; } cli$r_rqflgs_overlay; } cli$r_servcod_fields; } cli$r_servcod_overlay; __union { unsigned char cli$b_rqstat; /* OUTPUT STATUS FLAGS */ __struct { unsigned cli$v_parmprs : 1; /* PARAMETER IS PRESENT */ unsigned cli$v_concatinp : 1; /* INPUT CONCATONATION EXISTS */ unsigned cli$v_moreinp : 1; /* ANOTHER SET OF INPUT PARAMETERS */ unsigned cli$v_parmdef : 1; /* PARAMETER WAS DEFAULTED PRESENT */ unsigned cli$v_fill_103_ : 4; } cli$r_rqstat_bits0; __struct { unsigned cli$v_morevals : 1; /* UNPROCESSED VALUES REMAIN */ unsigned cli$v_keyvalu : 1; /* SUBSEQUENT TOKEN IS VALUE FOR KEY */ unsigned cli$v_fill_104_ : 6; } cli$r_rqstat_bits1; } cli$r_rqstat_overlay; } cli$r_fill_3_fields; } cli$r_fill_3_overlay; void *cli$a_erract; /* ADDRESS OF ERROR ACTION ROUTINE */ __union { unsigned __int64 cli$q_rqdesc; /* QUADWORD REQUEST DESCRIPTOR */ __struct { unsigned short int cli$w_rqsize; /* RESULTANT SIZE OF PARAMETER */ short int clidef$$_fill_4; /* SPARE WORD IN DESCRIPTOR */ __union { unsigned int cli$l_rqvalu; /* ACTUAL VALUE IN VALUE CONVERSTION */ void *cli$a_rqaddr; /* ADDRESS OF RESULTANT PARAMETER */ } cli$r_rqvalu_overlay; } cli$r_rqdesc_fields; } cli$r_rqdesc_overlay; void *cli$a_prsact; /* PARAMETER PRESENT ACTION ROUTINE */ void *cli$a_absact; /* PARAMETER ABSENT ACTION ROUTINE */ void *cli$a_qualst; /* ADDRESS OF QUALIFIERS */ /* Define the Descriptor Used by Symbol and Logical-name Callbacks */ /* */ } CLIDEF1; #if !defined(__VAXC) #define cli$b_rqtype cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$b_rqtype #define cli$v_subtyp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_subtyp #define cli$v_prityp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_prityp #define cli$w_servcod cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$w_servcod #define cli$b_rqindx cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\ _rqindx #define cli$b_bitnum cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\ _bitnum #define cli$b_rqflgs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$b\ _rqflgs #define cli$v_parmreq cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\ r_rqflgs_bits0.cli$v_parmreq #define cli$v_absadr cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\ _rqflgs_bits0.cli$v_absadr #define cli$v_expnam cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\ _rqflgs_bits0.cli$v_expnam #define cli$v_lastval cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\ r_rqflgs_bits1.cli$v_lastval #define cli$v_dummy cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r_\ rqflgs_bits1.cli$v_dummy #define cli$b_rqstat cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$b_rqstat #define cli$v_parmprs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmprs #define cli$v_concatinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_concatinp #define cli$v_moreinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_moreinp #define cli$v_parmdef cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmdef #define cli$v_morevals cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_morevals #define cli$v_keyvalu cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_keyvalu #define cli$q_rqdesc cli$r_rqdesc_overlay.cli$q_rqdesc #define cli$w_rqsize cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$w_rqsize #define cli$l_rqvalu cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$l_rqvalu #define cli$a_rqaddr cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$a_rqaddr #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct clidef1 { __union { int clidef$$_fill_3; /* DUMMY ARG */ __struct { __union { unsigned char cli$b_rqtype; /* TYPE OF REQUEST BEING MADE */ __struct { unsigned cli$v_subtyp : 4; /* SUB TYPE VIELD */ unsigned cli$v_prityp : 4; /* PRIMARY TYPYE */ } cli$r_rqtype_bits; } cli$r_rqtype_overlay; __union { unsigned short int cli$w_servcod; /* CLI SERVICE CODE */ __struct { __union { unsigned char cli$b_rqindx; /* OFFSET FOR VALUE KEYWORD INDEX */ unsigned char cli$b_bitnum; /* BIT TO SET IF REQUEST IS SUCESSFUL */ } cli$r_rqindx_overlay; __union { unsigned char cli$b_rqflgs; /* INPUT FLAGS CONCERNING REQUEST */ __struct { unsigned cli$v_parmreq : 1; /* PARAMATER IS REQUIRED */ unsigned cli$v_absadr : 1; /* ALL ADDRESS ARE ABSOLUTE */ unsigned cli$v_expnam : 1; /* RETURN EXPLICIT NAMES ONLY */ unsigned cli$v_fill_101_ : 5; } cli$r_rqflgs_bits0; __struct { unsigned cli$v_lastval : 1; /* LAST VALUE ALLOWED */ unsigned cli$v_dummy : 1; /* *** SAVE PLACE FOR ABS ADR *** */ unsigned cli$v_fill_102_ : 6; } cli$r_rqflgs_bits1; } cli$r_rqflgs_overlay; } cli$r_servcod_fields; } cli$r_servcod_overlay; __union { unsigned char cli$b_rqstat; /* OUTPUT STATUS FLAGS */ __struct { unsigned cli$v_parmprs : 1; /* PARAMETER IS PRESENT */ unsigned cli$v_concatinp : 1; /* INPUT CONCATONATION EXISTS */ unsigned cli$v_moreinp : 1; /* ANOTHER SET OF INPUT PARAMETERS */ unsigned cli$v_parmdef : 1; /* PARAMETER WAS DEFAULTED PRESENT */ unsigned cli$v_fill_103_ : 4; } cli$r_rqstat_bits0; __struct { unsigned cli$v_morevals : 1; /* UNPROCESSED VALUES REMAIN */ unsigned cli$v_keyvalu : 1; /* SUBSEQUENT TOKEN IS VALUE FOR KEY */ unsigned cli$v_fill_104_ : 6; } cli$r_rqstat_bits1; } cli$r_rqstat_overlay; } cli$r_fill_3_fields; } cli$r_fill_3_overlay; void *cli$a_erract; /* ADDRESS OF ERROR ACTION ROUTINE */ __union { unsigned int cli$q_rqdesc [2]; /* QUADWORD REQUEST DESCRIPTOR */ __struct { unsigned short int cli$w_rqsize; /* RESULTANT SIZE OF PARAMETER */ short int clidef$$_fill_4; /* SPARE WORD IN DESCRIPTOR */ __union { unsigned int cli$l_rqvalu; /* ACTUAL VALUE IN VALUE CONVERSTION */ void *cli$a_rqaddr; /* ADDRESS OF RESULTANT PARAMETER */ } cli$r_rqvalu_overlay; } cli$r_rqdesc_fields; } cli$r_rqdesc_overlay; void *cli$a_prsact; /* PARAMETER PRESENT ACTION ROUTINE */ void *cli$a_absact; /* PARAMETER ABSENT ACTION ROUTINE */ void *cli$a_qualst; /* ADDRESS OF QUALIFIERS */ /* Define the Descriptor Used by Symbol and Logical-name Callbacks */ /* */ } ; #if !defined(__VAXC) #define cli$b_rqtype cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$b_rqtype #define cli$v_subtyp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_subtyp #define cli$v_prityp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqtype_overlay.cli$r_rqtype_bits.cli$v_prityp #define cli$w_servcod cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$w_servcod #define cli$b_rqindx cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\ _rqindx #define cli$b_bitnum cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqindx_overlay.cli$b\ _bitnum #define cli$b_rqflgs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$b\ _rqflgs #define cli$v_parmreq cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\ r_rqflgs_bits0.cli$v_parmreq #define cli$v_absadr cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\ _rqflgs_bits0.cli$v_absadr #define cli$v_expnam cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r\ _rqflgs_bits0.cli$v_expnam #define cli$v_lastval cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$\ r_rqflgs_bits1.cli$v_lastval #define cli$v_dummy cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_servcod_overlay.cli$r_servcod_fields.cli$r_rqflgs_overlay.cli$r_\ rqflgs_bits1.cli$v_dummy #define cli$b_rqstat cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$b_rqstat #define cli$v_parmprs cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmprs #define cli$v_concatinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_concatinp #define cli$v_moreinp cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_moreinp #define cli$v_parmdef cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits0.cli$v_parmdef #define cli$v_morevals cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_morevals #define cli$v_keyvalu cli$r_fill_3_overlay.cli$r_fill_3_fields.cli$r_rqstat_overlay.cli$r_rqstat_bits1.cli$v_keyvalu #define cli$q_rqdesc cli$r_rqdesc_overlay.cli$q_rqdesc #define cli$w_rqsize cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$w_rqsize #define cli$l_rqvalu cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$l_rqvalu #define cli$a_rqaddr cli$r_rqdesc_overlay.cli$r_rqdesc_fields.cli$r_rqvalu_overlay.cli$a_rqaddr #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET typedef struct _clidef2 { char clidef$$_fill_8 [4]; unsigned __int64 cli$q_namdesc; /* Logical name or symbol name */ unsigned __int64 cli$q_valdesc; /* Equivalence name or symbol value */ unsigned __int64 cli$q_tabdesc; /* Name of logical name table */ int cli$l_itmlst; /* Address of item list */ int cli$l_attr; /* Address of attribute longword */ /* */ /* Define the Descriptor Locations Used for the Old/New */ /* Out-of-Band Character(s) Masks */ /* */ } CLIDEF2; #else /* __OLD_STARLET */ struct clidef2 { char clidef$$_fill_8 [4]; unsigned int cli$q_namdesc [2]; /* Logical name or symbol name */ unsigned int cli$q_valdesc [2]; /* Equivalence name or symbol value */ unsigned int cli$q_tabdesc [2]; /* Name of logical name table */ int cli$l_itmlst; /* Address of item list */ int cli$l_attr; /* Address of attribute longword */ /* */ /* Define the Descriptor Locations Used for the Old/New */ /* Out-of-Band Character(s) Masks */ /* */ } ; #endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET typedef struct _clidef3 { char clidef$$_fill_9 [4]; unsigned int cli$l_new_mask; /* Enable/disable mask */ unsigned int cli$l_old_mask; /* Previous enabled values mask */ /* */ /* Define the descriptor used for ATTACH callback */ /* */ } CLIDEF3; #else /* __OLD_STARLET */ struct clidef3 { char clidef$$_fill_9 [4]; unsigned int cli$l_new_mask; /* Enable/disable mask */ unsigned int cli$l_old_mask; /* Previous enabled values mask */ /* */ /* Define the descriptor used for ATTACH callback */ /* */ } ; #endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET typedef struct _clidef4 { char clidef$$_fill_10 [4]; unsigned int cli$l_pid; /* PID of "destination" process */ /* */ /* Define the descriptor used for SPAWN callback */ /* */ } CLIDEF4; #else /* __OLD_STARLET */ struct clidef4 { char clidef$$_fill_10 [4]; unsigned int cli$l_pid; /* PID of "destination" process */ /* */ /* Define the descriptor used for SPAWN callback */ /* */ } ; #endif /* #ifdef __NEW_STARLET */ #define CLI$M_NOWAIT 0x1 #define CLI$M_NOCLISYM 0x2 #define CLI$M_NOLOGNAM 0x4 #define CLI$M_NOKEYPAD 0x8 #define CLI$M_NOTIFY 0x10 #define CLI$M_NOCONTROL 0x20 #define CLI$M_TRUSTED 0x40 #define CLI$M_AUTHPRIV 0x80 #define CLI$M_SUBSYSTEM 0x100 #define CLI$M_DETACHED 0x200 #define CLI$K_SPAWN_VERSION 1 /* Latest version */ #define CLI$C_SPAWN_VERSION 1 /* Latest version */ #define CLI$K_SRVDESC 88 /* Length of longest "service" callback */ #define CLI$C_SRVDESC 88 /* Length of longest "service" callback */ /* */ #ifdef __NEW_STARLET typedef struct _clidef5 { char clidef$$_fill_11 [4]; __union { unsigned char cli$b_flags; /* Flags (as byte) */ unsigned short int cli$w_flags; /* Flags (as word) */ __struct { unsigned cli$v_nowait : 1; /* Do not wait for subprocess completion */ unsigned cli$v_noclisym : 1; /* Do not copy CLI symbols to subprocess */ unsigned cli$v_nolognam : 1; /* Do not copy logical names to subprocess */ unsigned cli$v_nokeypad : 1; /* Do not copy keypad state to subprocess */ unsigned cli$v_notify : 1; /* Output notification message */ unsigned cli$v_nocontrol : 1; /* Do not put CR/LF in front of prompt string */ unsigned cli$v_trusted : 1; /* Allow spawn regardless of UAF CAPTIVE flag */ unsigned cli$v_authpriv : 1; /* Propagate AUTHPRIV to subprocess */ unsigned cli$v_subsystem : 1; /* Copy protected subsystem IDs to subprocess */ unsigned cli$v_detached : 1; /* Spawn a detached process */ unsigned cli$v_fill_105_ : 6; } cli$r_flags_bits; } cli$r_flags_overlay; char clidef$$_fill_5 [2]; /* Unused */ unsigned int cli$l_outpid; /* PID of subprocess on return */ int cli$l_lststatus; /* Address to store final subprocess status */ unsigned __int64 cli$q_cmdstr; /* Descriptor of command string */ unsigned __int64 cli$q_input; /* Descriptor of input filespec */ unsigned __int64 cli$q_output; /* Descriptor of output filespec */ unsigned __int64 cli$q_prcnam; /* Descriptor of name for subprocess */ int cli$l_astadr; /* Address of termination AST routine */ int cli$l_astprm; /* Address of AST routine parameter */ unsigned char cli$b_efn; /* Event flag to set on termination */ unsigned char cli$b_version; /* Data structure version */ char clidef$$_fill_6 [2]; /* Unused */ unsigned __int64 cli$q_prompt; /* Descriptor of prompt string */ unsigned __int64 cli$q_cli; /* Descriptor of cli name */ unsigned __int64 cli$q_table; /* Descriptor of cli table name */ int cli$l_kt_limit; /* Kernel thread limit */ /* */ /* Define the length of the longest "supervisor-mode service" request block, */ /* so that programs can allocate a fixed amount of space for the block. */ /* */ /* DEFINE THE PARAMETER QUALIFIER DESCRIPTOR */ /* */ } CLIDEF5; #if !defined(__VAXC) #define cli$b_flags cli$r_flags_overlay.cli$b_flags #define cli$w_flags cli$r_flags_overlay.cli$w_flags #define cli$v_nowait cli$r_flags_overlay.cli$r_flags_bits.cli$v_nowait #define cli$v_noclisym cli$r_flags_overlay.cli$r_flags_bits.cli$v_noclisym #define cli$v_nolognam cli$r_flags_overlay.cli$r_flags_bits.cli$v_nolognam #define cli$v_nokeypad cli$r_flags_overlay.cli$r_flags_bits.cli$v_nokeypad #define cli$v_notify cli$r_flags_overlay.cli$r_flags_bits.cli$v_notify #define cli$v_nocontrol cli$r_flags_overlay.cli$r_flags_bits.cli$v_nocontrol #define cli$v_trusted cli$r_flags_overlay.cli$r_flags_bits.cli$v_trusted #define cli$v_authpriv cli$r_flags_overlay.cli$r_flags_bits.cli$v_authpriv #define cli$v_subsystem cli$r_flags_overlay.cli$r_flags_bits.cli$v_subsystem #define cli$v_detached cli$r_flags_overlay.cli$r_flags_bits.cli$v_detached #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct clidef5 { char clidef$$_fill_11 [4]; __union { unsigned char cli$b_flags; /* Flags (as byte) */ unsigned short int cli$w_flags; /* Flags (as word) */ __struct { unsigned cli$v_nowait : 1; /* Do not wait for subprocess completion */ unsigned cli$v_noclisym : 1; /* Do not copy CLI symbols to subprocess */ unsigned cli$v_nolognam : 1; /* Do not copy logical names to subprocess */ unsigned cli$v_nokeypad : 1; /* Do not copy keypad state to subprocess */ unsigned cli$v_notify : 1; /* Output notification message */ unsigned cli$v_nocontrol : 1; /* Do not put CR/LF in front of prompt string */ unsigned cli$v_trusted : 1; /* Allow spawn regardless of UAF CAPTIVE flag */ unsigned cli$v_authpriv : 1; /* Propagate AUTHPRIV to subprocess */ unsigned cli$v_subsystem : 1; /* Copy protected subsystem IDs to subprocess */ unsigned cli$v_detached : 1; /* Spawn a detached process */ unsigned cli$v_fill_105_ : 6; } cli$r_flags_bits; } cli$r_flags_overlay; char clidef$$_fill_5 [2]; /* Unused */ unsigned int cli$l_outpid; /* PID of subprocess on return */ int cli$l_lststatus; /* Address to store final subprocess status */ unsigned int cli$q_cmdstr [2]; /* Descriptor of command string */ unsigned int cli$q_input [2]; /* Descriptor of input filespec */ unsigned int cli$q_output [2]; /* Descriptor of output filespec */ unsigned int cli$q_prcnam [2]; /* Descriptor of name for subprocess */ int cli$l_astadr; /* Address of termination AST routine */ int cli$l_astprm; /* Address of AST routine parameter */ unsigned char cli$b_efn; /* Event flag to set on termination */ unsigned char cli$b_version; /* Data structure version */ char clidef$$_fill_6 [2]; /* Unused */ unsigned int cli$q_prompt [2]; /* Descriptor of prompt string */ unsigned int cli$q_cli [2]; /* Descriptor of cli name */ unsigned int cli$q_table [2]; /* Descriptor of cli table name */ int cli$l_kt_limit; /* Kernel thread limit */ /* */ /* Define the length of the longest "supervisor-mode service" request block, */ /* so that programs can allocate a fixed amount of space for the block. */ /* */ /* DEFINE THE PARAMETER QUALIFIER DESCRIPTOR */ /* */ } ; #if !defined(__VAXC) #define cli$b_flags cli$r_flags_overlay.cli$b_flags #define cli$w_flags cli$r_flags_overlay.cli$w_flags #define cli$v_nowait cli$r_flags_overlay.cli$r_flags_bits.cli$v_nowait #define cli$v_noclisym cli$r_flags_overlay.cli$r_flags_bits.cli$v_noclisym #define cli$v_nolognam cli$r_flags_overlay.cli$r_flags_bits.cli$v_nolognam #define cli$v_nokeypad cli$r_flags_overlay.cli$r_flags_bits.cli$v_nokeypad #define cli$v_notify cli$r_flags_overlay.cli$r_flags_bits.cli$v_notify #define cli$v_nocontrol cli$r_flags_overlay.cli$r_flags_bits.cli$v_nocontrol #define cli$v_trusted cli$r_flags_overlay.cli$r_flags_bits.cli$v_trusted #define cli$v_authpriv cli$r_flags_overlay.cli$r_flags_bits.cli$v_authpriv #define cli$v_subsystem cli$r_flags_overlay.cli$r_flags_bits.cli$v_subsystem #define cli$v_detached cli$r_flags_overlay.cli$r_flags_bits.cli$v_detached #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ #define CLI$M_ALLOCCUR 0x1 #define CLI$M_QDUSRV 0x2 #define CLI$M_QDEXPA 0x4 #define CLI$M_QUALTRU 0x1 #define CLI$M_QUALEXP 0x2 #define CLI$K_QUALDEF 20 /* SIZE OF FIXED PART OF STRUCTURE */ #define CLI$C_QUALDEF 20 /* SIZE OF FIXED PART OF STRUCTURE */ #define CLI$K_QDBITS 20 /* START OF BIT LISTS(VARIALBLE LENGTH) */ #define CLI$C_QDBITS 20 /* START OF BIT LISTS(VARIALBLE LENGTH) */ #ifdef __NEW_STARLET typedef struct _clidef6 { unsigned char cli$b_qdblksiz; /* SIZE OF THE FINAL BLOCK */ unsigned char cli$b_qdcode; /* ID CODE FOR THE QUALIFIER */ __union { unsigned char cli$b_qdflgs; /* FLAGS BYTE */ __struct { unsigned cli$v_alloccur : 1; /* TAKE ACTION ON ALL OCCURANCES */ unsigned cli$v_qdusrv : 1; /* USER CONTEX VALUE IS PRESENT */ unsigned cli$v_qdexpa : 1; /* TAKE ACTION ON EXPLICIT OCCURANCES */ unsigned cli$v_fill_106_ : 5; } cli$r_qdflgs_bits; } cli$r_qdflgs_overlay; __union { unsigned char cli$b_qdstat; /* QUALIFIER STATUS */ __struct { unsigned cli$v_qualtru : 1; /* QUALIFIER IS TRUE */ unsigned cli$v_qualexp : 1; /* QUALIFIER EXPLICITLY STATED */ unsigned cli$v_fill_107_ : 6; } cli$r_qdstat_bits; } cli$r_qdstat_overlay; __union { unsigned __int64 cli$q_qdvaldesc; /* QUALIFIER VALUE DESCRIPTOR */ __struct { unsigned short int cli$w_qdvalsiz; /* SIZE OF VALUE */ short int clidef$$_fill_7; /* SPARE WORD */ void *cli$a_qdvaladr; /* ADDRESS OF VALUE STRING */ } cli$r_qdvaldesc_fields; } cli$r_qdvaldesc_overlay; void *cli$a_truact; /* QUALIFIER TRUE ACTION ROUTINE */ void *cli$a_flsact; /* QUALIFIER FALSE ACTION ROUTINE */ unsigned int cli$l_usrval; /* OPTION USER VALUE IF PRESENT */ /* */ /* DEFINE SPACE FOR THE RESULT PARSE WORK AREA */ /* */ } CLIDEF6; #if !defined(__VAXC) #define cli$b_qdflgs cli$r_qdflgs_overlay.cli$b_qdflgs #define cli$v_alloccur cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_alloccur #define cli$v_qdusrv cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdusrv #define cli$v_qdexpa cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdexpa #define cli$b_qdstat cli$r_qdstat_overlay.cli$b_qdstat #define cli$v_qualtru cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualtru #define cli$v_qualexp cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualexp #define cli$q_qdvaldesc cli$r_qdvaldesc_overlay.cli$q_qdvaldesc #define cli$w_qdvalsiz cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$w_qdvalsiz #define cli$a_qdvaladr cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$a_qdvaladr #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct clidef6 { unsigned char cli$b_qdblksiz; /* SIZE OF THE FINAL BLOCK */ unsigned char cli$b_qdcode; /* ID CODE FOR THE QUALIFIER */ __union { unsigned char cli$b_qdflgs; /* FLAGS BYTE */ __struct { unsigned cli$v_alloccur : 1; /* TAKE ACTION ON ALL OCCURANCES */ unsigned cli$v_qdusrv : 1; /* USER CONTEX VALUE IS PRESENT */ unsigned cli$v_qdexpa : 1; /* TAKE ACTION ON EXPLICIT OCCURANCES */ unsigned cli$v_fill_106_ : 5; } cli$r_qdflgs_bits; } cli$r_qdflgs_overlay; __union { unsigned char cli$b_qdstat; /* QUALIFIER STATUS */ __struct { unsigned cli$v_qualtru : 1; /* QUALIFIER IS TRUE */ unsigned cli$v_qualexp : 1; /* QUALIFIER EXPLICITLY STATED */ unsigned cli$v_fill_107_ : 6; } cli$r_qdstat_bits; } cli$r_qdstat_overlay; __union { unsigned int cli$q_qdvaldesc [2]; /* QUALIFIER VALUE DESCRIPTOR */ __struct { unsigned short int cli$w_qdvalsiz; /* SIZE OF VALUE */ short int clidef$$_fill_7; /* SPARE WORD */ void *cli$a_qdvaladr; /* ADDRESS OF VALUE STRING */ } cli$r_qdvaldesc_fields; } cli$r_qdvaldesc_overlay; void *cli$a_truact; /* QUALIFIER TRUE ACTION ROUTINE */ void *cli$a_flsact; /* QUALIFIER FALSE ACTION ROUTINE */ unsigned int cli$l_usrval; /* OPTION USER VALUE IF PRESENT */ /* */ /* DEFINE SPACE FOR THE RESULT PARSE WORK AREA */ /* */ } ; #if !defined(__VAXC) #define cli$b_qdflgs cli$r_qdflgs_overlay.cli$b_qdflgs #define cli$v_alloccur cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_alloccur #define cli$v_qdusrv cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdusrv #define cli$v_qdexpa cli$r_qdflgs_overlay.cli$r_qdflgs_bits.cli$v_qdexpa #define cli$b_qdstat cli$r_qdstat_overlay.cli$b_qdstat #define cli$v_qualtru cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualtru #define cli$v_qualexp cli$r_qdstat_overlay.cli$r_qdstat_bits.cli$v_qualexp #define cli$q_qdvaldesc cli$r_qdvaldesc_overlay.cli$q_qdvaldesc #define cli$w_qdvalsiz cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$w_qdvalsiz #define cli$a_qdvaladr cli$r_qdvaldesc_overlay.cli$r_qdvaldesc_fields.cli$a_qdvaladr #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ #define CLI$K_WORKAREA 128 /* SIZE OF HEADER */ #define CLI$C_WORKAREA 128 /* SIZE OF HEADER */ /* */ #define CLI$K_UTILOPR 0 /* UTILITY OPERATIONS */ #define CLI$K_INPSPEC 1 /* REQUEST FOR AN INPUT SPECIFICATION */ #define CLI$K_OUTSPEC 2 /* AN OUTPUT FILE SPECIFICATION */ #define CLI$K_PARDONE 3 /* PARAMETER DONE REQUEST */ #define CLI$K_VALCONV 4 /* REQUEST A VALUE CONVERSION */ #define CLI$K_CLINT 5 /* CLINT OPERATIONS */ /* */ #define CLI$K_INITPRS 0 /* REQUEST INITIALIZATION OF PARSE */ #define CLI$K_GETCMD 1 /* GET COMMAND BUFFER LIMITS */ #define CLI$K_GETQUAL 2 /* OPTAIN STATE OF QUALIFIERS */ #define CLI$K_GETOPT 3 /* DECODE COMMAND OPTION */ #define CLI$K_GETLINE 4 /* GET COMMAND LINE */ /* */ /* THE CLISERV REQUEST TYPE APPEARS HERE, INSTEAD OF WITH THE OTHER REQUEST */ /* TYPES, BECAUSE IT HAS NO SUBFUNCTIONS ASSOCIATED WITH IT, AND BECAUSE A */ /* DAY 1 CODING ERROR CAUSES DCL TO EXPECT THAT THIS REQUEST NUMBER WILL */ /* APPEAR IN THE SUBFUNCTION BITS. THIS MEANS THAT NO UTILITY OPERATION */ /* CAN BE DEFINED WITH THE SUBFUNCTION NUMBER 5. */ /* */ #define CLI$K_CLISERV 5 /* REQUEST A SERVICE FROM THE CLI */ /* */ #define CLI$K_INPUT1 16 /* PRIMARY INPUT */ #define CLI$K_INPUT2 17 /* SECONDARY INPUT */ #define CLI$K_INPUT3 18 /* THIRD, */ #define CLI$K_INPUT4 19 /* ETC,ETC,ETC */ /* */ #define CLI$K_OUTPUT1 32 /* FIRST OUTPUT */ #define CLI$K_OUTPUT2 33 /* SECOND OUTPUT */ #define CLI$K_OUTPUT3 34 /* THIRD,- */ #define CLI$K_OUTPUT4 35 /* ETC,ETC,ETC */ /* */ #define CLI$K_ENDPRM1 48 /* COMPLETED PARAMETER SET 1 */ #define CLI$K_ENDPRM2 49 /* COMPLETED PARAMETER SET 2 */ #define CLI$K_ENDPRM3 50 /* COMPLETED PARAMETER SET 3 */ #define CLI$K_ENDPRM4 51 /* COMPLETED PARAMETER SET 4 */ /* */ #define CLI$K_NUMERVAL 64 /* NUMBERIC VALUE */ #define CLI$K_ASCIIVAL 65 /* ASCII VALUE */ #define CLI$K_KEYWORD 66 /* KEYWORD VALUE */ #define CLI$K_KEYVAL 67 /* KEYWORD WITH VALUE */ #define CLI$K_FILSPEC 68 /* VALUE IS A FILESPEC */ /* */ #define CLI$K_PRESENT 80 /* DETERMINE IF ENTITY IS PRESENT */ #define CLI$K_GETVALUE 81 /* GET VALUE OF ENTITY */ #define CLI$K_ENDPARSE 82 /* CLEAN UP AFTER PARSING COMMAND */ #define CLI$K_DCLPARSE 83 /* PARSE USER COMMAND LINE */ #define CLI$K_DISPATCH 84 /* DISPATCH TO ACTION ROUTINE */ #define CLI$K_NEXTQUAL 85 /* PROCESS NEXT QUALIFIER */ /* */ #ifdef __NEW_STARLET typedef union _clidef7 { unsigned int cli$l_workarea [32]; /* ALLOCATE 32 LONG WORDS */ /* DEFINE CLI UTILITY REQUEST CODES */ /* */ /* CODES ARE 8 BITS, CONSISTING OF 2 4 BIT FIELDS */ /* THE LEAST 4 BITS ARE SUBFUCTION DEFINITONS */ /* AND THE MOST SIGNIFICANT 4 BITS ARE REQUEST TYPE */ /* */ /* DEFINE REQUEST TYPE CODES */ /* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */ /* */ /* DEFINE COMPLETE CODES FOR INPUT SPECIFICATIONS */ /* */ /* DEFINE COMPLETE CODES FOR OUTPUT SPECIFICATIONS */ /* */ /* DEFINE CODES FOR RESULT PARSE PARAMETER COMPLETION */ /* */ /* DEFINE CODES FOR VALUE CONVERSION REQUESTS */ /* */ /* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */ /* */ /* DEFINE SET CODE SET REQUEST BLOCK */ /* */ } CLIDEF7; #else /* __OLD_STARLET */ union clidef7 { unsigned int cli$l_workarea [32]; /* ALLOCATE 32 LONG WORDS */ /* DEFINE CLI UTILITY REQUEST CODES */ /* */ /* CODES ARE 8 BITS, CONSISTING OF 2 4 BIT FIELDS */ /* THE LEAST 4 BITS ARE SUBFUCTION DEFINITONS */ /* AND THE MOST SIGNIFICANT 4 BITS ARE REQUEST TYPE */ /* */ /* DEFINE REQUEST TYPE CODES */ /* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */ /* */ /* DEFINE COMPLETE CODES FOR INPUT SPECIFICATIONS */ /* */ /* DEFINE COMPLETE CODES FOR OUTPUT SPECIFICATIONS */ /* */ /* DEFINE CODES FOR RESULT PARSE PARAMETER COMPLETION */ /* */ /* DEFINE CODES FOR VALUE CONVERSION REQUESTS */ /* */ /* DEFINE COMPLETE CODES FOR UTILITY OPERATIONS */ /* */ /* DEFINE SET CODE SET REQUEST BLOCK */ /* */ } ; #endif /* #ifdef __NEW_STARLET */ #ifdef __NEW_STARLET typedef struct _clidef8 { char clidef$$_fill_12 [4]; unsigned int cli$l_codeset; /* CODE SET VALUE */ } CLIDEF8; #else /* __OLD_STARLET */ struct clidef8 { char clidef$$_fill_12 [4]; unsigned int cli$l_codeset; /* CODE SET VALUE */ } ; #endif /* #ifdef __NEW_STARLET */ #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 /* __CLIDEF_LOADED */