/* Ported to GNU C openVMS/Alpha by Klaus Kämpf, kkaempf@progis.de  */
/* <xabsumdef.h>
 *
 *	RMS summary XAB definitions
 */
#ifndef _XABSUMDEF_H
#define _XABSUMDEF_H

#ifdef __cplusplus
extern "C" {
#endif

#define XAB$C_SUM	22	/* xabsum ID code */
#define XAB$K_SUMLEN	12	/* xabsum length */
#define XAB$C_SUMLEN	12

#ifndef __XABSTART_FIELDS
#include <vms/xabdef.h>
#endif

struct xabsumdef {
  __XABSTART_FIELDS
    unsigned char  xab$b_noa;	/* number of defined areas for index file */
    unsigned char  xab$b_nok;	/* number of defined keys for index file */
    unsigned short xab$w_pvn;	/* prologue version number (relative and index files) */
} __attribute__ ((packed));

#define XABSUM xabsumdef

/* declare initialized prototype data structure */
#ifdef __ALPHA
extern struct XABSUM *cc$rms_xabsum_ptr __asm("DECC$GA_RMS_XABSUM");
#define cc$rms_xabsum (*cc$rms_xabsum_ptr)
#else
extern struct XABSUM cc$rms_xabsum __asm("_$$PsectAttributes_GLOBALSYMBOL$$cc$rms_xabsum");
/* globalref struct XABSUM cc$rms_xabsum; */
#endif

#ifdef __cplusplus
  }
#endif

#endif	/*_XABSUMDEF_H*/