/***************************************************************************/
/**                                                                       **/
/** 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:58 by OpenVMS SDL V3.7       */
/* Source:  31-MAY-2022 07:54:24 $1$DGA8345:[LIB_H.SRC]KPSTACKDEF.SDL;1 */
/********************************************************************************************************************************/
/*** MODULE $KPSTACKDEF IDENT X-6 ***/
#ifndef __KPSTACKDEF_LOADED
#define __KPSTACKDEF_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
 
/* Compared to the IA64 one, the x86-64 KPSTACK record is simpler.          */
/* It has no optional floating-point part and therefore no flags word.      */
/* It does have space to save the Alpha pseudo-registers.                   */
#define KPSTACK$K_LENGTH 80
	
#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 _kpstack {
#pragma __nomember_alignment
    unsigned short int kpstack$w_size;  /* Structure size                   */
    unsigned char kpstack$b_type;       /* DYN$C_MISC                       */
    unsigned char kpstack$b_subtype;    /* DYN$C_KPSTACK                    */
    int kpstack$l_fill;
    __int64 kpstack$q_saved_rbx;        /* Preserved general registers      */
    __int64 kpstack$q_saved_rbp;
    __int64 kpstack$q_saved_r12;
    __int64 kpstack$q_saved_r13;
    __int64 kpstack$q_saved_r14;
    __int64 kpstack$q_saved_r15;
#ifdef __INITIAL_POINTER_SIZE			 /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __long		 /* And set ptr size default to 64-bit pointers */
    void *kpstack$pq_saved_alphareg;
#else
	unsigned __int64 kpstack$pq_saved_alphareg;
#endif
    unsigned __int64 kpstack$q_saved_kstack_top;
    unsigned __int64 kpstack$q_saved_kstack_bottom;
    } KPSTACK;
/*  KPSIG                                                                   */
/*	This is the layout of the base of a KP memory stack, which looks as follows: */
/*                                                                          */
/*   0(SP)      Scratch space for (sp at call to KP routine)                */
/*   8(SP)        called routine                                            */
/*  16(SP)      Saved GP (caller's GP)                                      */
/*  24(SP)      00000000.00000000 (alignment)                               */
/*  32(SP)      00000000.00000000 }                                         */
/*  40(SP)      00000000.00000000 } signature expected by code              */
/*  48(SP)      DEADDEAD.DEADDEAD }                                         */
/*  56(SP)      KPB address	(highest useable address)                   */
/*  [Guard Page]                                                            */
/*                                                                          */
/*  The low 4 quads are used by the IA64 implementation.  The high 4 quads are */
/*  required by both the Alpha and IA64 code.                               */
	
#if !defined(__NOBASEALIGN_SUPPORT)  && !defined(__cplusplus)   /* If using pre DECC V4.0 or C++ */
#pragma __nomember_alignment __octaword
#else
#pragma __nomember_alignment
#endif
typedef struct _kpsig {
#pragma __nomember_alignment
    unsigned __int64 kpsig$q_zero1;     /* MBZ                              */
    unsigned __int64 kpsig$q_zero2;     /* MBZ                              */
    unsigned __int64 kpsig$q_dead_sig;  /* 0xDEADDEAD.DEADDEAD              */
#ifdef __INITIAL_POINTER_SIZE			 /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __long		 /* And set ptr size default to 64-bit pointers */
    void *kpsig$pq_kpb;                 /* pointer to KPB                   */
#else
	unsigned __int64 kpsig$pq_kpb;
#endif
    } KPSIG;
 
#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 /* __KPSTACKDEF_LOADED */