/********************************************************************************************************************************/
/* Created: 30-Mar-2010 17:29:35 by OpenVMS SDL EV3-3      */
/* Source:  30-MAR-2010 17:29:20 $1$DGA7274:[STARLET_H.SRC]LIBDCFDEF.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE $LIBDCFDEF ***/
#ifndef __LIBDCFDEF_LOADED
#define __LIBDCFDEF_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
 
/* Definitions for LIB$DECODE_FAULT                                         */
/*                                                                          */
/* Operand definition codes                                                 */
/*                                                                          */
#define LIB$M_DCFACC 0x7
#define LIB$M_DCFTYP 0xF8
	
#ifdef __NEW_STARLET
typedef struct _lib$b_dcf_operand {
    unsigned lib$v_dcfacc : 3;          /* Operand access type              */
    unsigned lib$v_dcftyp : 5;          /* Operand data type                */
    } LIB$B_DCF_OPERAND;
#else	    /* __OLD_STARLET */
struct lib$b_dcf_operand {
    unsigned lib$v_dcfacc : 3;          /* Operand access type              */
    unsigned lib$v_dcftyp : 5;          /* Operand data type                */
    } ;
#endif	    /* #ifdef __NEW_STARLET */
/*                                                                          */
/* Operand access type codes                                                */
/*                                                                          */
#define LIB$K_DCFACC_R 1                /* Operand is to be read            */
#define LIB$K_DCFACC_M 2                /* Operand is to be modified        */
#define LIB$K_DCFACC_W 3                /* Operand is to be written         */
#define LIB$K_DCFACC_A 4                /* Operand is an address            */
#define LIB$K_DCFACC_V 5                /* Operand is a field (may be register or address) */
#define LIB$K_DCFACC_B 6                /* Operand is a branch displacement */
/*                                                                          */
/* Operand data type codes                                                  */
/*                                                                          */
#define LIB$K_DCFTYP_B 1                /* Operand is a byte                */
#define LIB$K_DCFTYP_W 2                /* Operand is a word                */
#define LIB$K_DCFTYP_L 3                /* Operand is a longword            */
#define LIB$K_DCFTYP_Q 4                /* Operand is a quadword            */
#define LIB$K_DCFTYP_O 5                /* Operand is an octaword           */
#define LIB$K_DCFTYP_F 6                /* Operand is an F_floating         */
#define LIB$K_DCFTYP_D 7                /* Operand is a D_floating          */
#define LIB$K_DCFTYP_G 8                /* Operand is a G_floating          */
#define LIB$K_DCFTYP_H 9                /* Operand is an H_floating         */
/*                                                                          */
/* Combined operand access and data type codes                              */
/*                                                                          */
#define LIB$K_DCFOPR_AB 8
#define LIB$K_DCFOPR_RB 9
#define LIB$K_DCFOPR_MB 10
#define LIB$K_DCFOPR_WB 11
#define LIB$K_DCFOPR_VB 12
#define LIB$K_DCFOPR_BB 13
#define LIB$K_DCFOPR_AW 16
#define LIB$K_DCFOPR_RW 17
#define LIB$K_DCFOPR_MW 18
#define LIB$K_DCFOPR_WW 19
#define LIB$K_DCFOPR_VW 20
#define LIB$K_DCFOPR_BW 21
#define LIB$K_DCFOPR_AL 24
#define LIB$K_DCFOPR_RL 25
#define LIB$K_DCFOPR_ML 26
#define LIB$K_DCFOPR_WL 27
#define LIB$K_DCFOPR_VL 28
#define LIB$K_DCFOPR_BL 29
#define LIB$K_DCFOPR_AQ 32
#define LIB$K_DCFOPR_RQ 33
#define LIB$K_DCFOPR_MQ 34
#define LIB$K_DCFOPR_WQ 35
#define LIB$K_DCFOPR_VQ 36
#define LIB$K_DCFOPR_AO 40
#define LIB$K_DCFOPR_RO 41
#define LIB$K_DCFOPR_MO 42
#define LIB$K_DCFOPR_WO 43
#define LIB$K_DCFOPR_VO 44
#define LIB$K_DCFOPR_AF 48
#define LIB$K_DCFOPR_RF 49
#define LIB$K_DCFOPR_MF 50
#define LIB$K_DCFOPR_WF 51
#define LIB$K_DCFOPR_VF 52
#define LIB$K_DCFOPR_AD 56
#define LIB$K_DCFOPR_RD 57
#define LIB$K_DCFOPR_MD 58
#define LIB$K_DCFOPR_WD 59
#define LIB$K_DCFOPR_VD 60
#define LIB$K_DCFOPR_AG 64
#define LIB$K_DCFOPR_RG 65
#define LIB$K_DCFOPR_MG 66
#define LIB$K_DCFOPR_WG 67
#define LIB$K_DCFOPR_VG 68
#define LIB$K_DCFOPR_AH 72
#define LIB$K_DCFOPR_RH 73
#define LIB$K_DCFOPR_MH 74
#define LIB$K_DCFOPR_WH 75
#define LIB$K_DCFOPR_VH 76
#define LIB$K_DCFOPR_END 0
/*                                                                          */
 
#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 /* __LIBDCFDEF_LOADED */