/********************************************************************************************************************************/
/* Created: 15-MAR-2001 23:37:32 by OpenVMS SDL EV1-33     */
/* Source:  15-MAR-2001 23:34:34 _$11$DUA933:[BUILD.SDL]OBJFMT.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE $SGPSDEF ***/
#ifndef __SGPSDEF_LOADED
#define __SGPSDEF_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
 
/*                                                                          */
/* GSD entry - P-section definition in shareable image                      */
/*                                                                          */
#define SGPS$M_PIC 0x1
#define SGPS$M_LIB 0x2
#define SGPS$M_OVR 0x4
#define SGPS$M_REL 0x8
#define SGPS$M_GBL 0x10
#define SGPS$M_SHR 0x20
#define SGPS$M_EXE 0x40
#define SGPS$M_RD 0x80
#define SGPS$M_WRT 0x100
#define SGPS$M_VEC 0x200
#define SGPS$M_NOMOD 0x400
#define SGPS$M_COM 0x800
#define SGPS$K_NAME 13
#define SGPS$C_NAME 13
struct sgpsdef {
    __union  {
        unsigned char sgps$b_gsdtyp;    /*Typ field                         */
        __struct  {
#if defined(__VAXC) || defined(VAXC)
            char sgps$t_start[];
#else
#define sgps$t_start sgpsdef$$_fill_1
#endif		/* #if defined(__VAXC) || defined(VAXC) */
            char sgpsdef$$_fill_1;
            } sgps$r_gsdtyp_fields;
        } sgps$r_gsdtyp_overlay;
    unsigned char sgps$b_align;         /*P-sect alignment                  */
    __union  {
        unsigned short int sgps$w_flags; /*P-sect flags                     */
        __struct  {
            unsigned sgps$v_pic : 1;    /*Position independent              */
            unsigned sgps$v_lib : 1;    /*From a shareable image            */
            unsigned sgps$v_ovr : 1;    /*Overlaid memory allocation        */
            unsigned sgps$v_rel : 1;    /*Relocatable                       */
            unsigned sgps$v_gbl : 1;    /*Global scope                      */
            unsigned sgps$v_shr : 1;    /*Shareable                         */
            unsigned sgps$v_exe : 1;    /*Executable                        */
            unsigned sgps$v_rd : 1;     /*Readable                          */
            unsigned sgps$v_wrt : 1;    /*Writeable                         */
            unsigned sgps$v_vec : 1;    /*Vector psect                      */
            unsigned sgps$v_nomod : 1;  /*Not stored into                   */
            unsigned sgps$v_com : 1;    /*Associated with COMM sym          */
            unsigned sgps$v_fill_16 : 4;
            } sgps$r_flags_bits;
        } sgps$r_flags_overlay;
    unsigned int sgps$l_alloc;          /*Length of this psect in shr image  */
    unsigned int sgps$l_base;           /*Base of this psect in shr image   */
    unsigned char sgps$b_namlng;        /*Length of p-sect name             */
    char sgps$t_name [31];              /*Name field                        */
    } ;
 
#if !defined(__VAXC) && !defined(VAXC)
#define sgps$b_gsdtyp sgps$r_gsdtyp_overlay.sgps$b_gsdtyp
#define sgps$w_flags sgps$r_flags_overlay.sgps$w_flags
#define sgps$v_pic sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_pic
#define sgps$v_lib sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_lib
#define sgps$v_ovr sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_ovr
#define sgps$v_rel sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_rel
#define sgps$v_gbl sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_gbl
#define sgps$v_shr sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_shr
#define sgps$v_exe sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_exe
#define sgps$v_rd sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_rd
#define sgps$v_wrt sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_wrt
#define sgps$v_vec sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_vec
#define sgps$v_nomod sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_nomod
#define sgps$v_com sgps$r_flags_overlay.sgps$r_flags_bits.sgps$v_com
#endif		/* #if !defined(__VAXC) && !defined(VAXC) */
 
 
#ifdef __cplusplus
    }
#endif
#pragma standard
 
#endif /* __SGPSDEF_LOADED */