#ifndef __PERROR_LOADED
#define __PERROR_LOADED 1
/****************************************************************************
**
**  <perror.h> - error message variables 
**
*****************************************************************************
**  Header is nonstandard
*****************************************************************************
**
**  Copyright 2000 Compaq Computer Corporation
**
**  Compaq and the Compaq logo Registered in U.S. Patent and Trademark Office.
**
**  Confidential computer software. Valid license from Compaq required for
**  possession, use or copying. Consistent with FAR 12.211 and 12.212,
**  Commercial Computer Software, Computer Software Documentation, and
**  Technical Data for Commercial Items are licensed to the U.S. Government
**  under vendor's standard commercial license.
**
******************************************************************************
*/

#pragma __nostandard
#include <decc$types.h>

#ifdef __cplusplus
    extern "C" {
#endif

#if __INITIAL_POINTER_SIZE
#   pragma __pointer_size __save
#   pragma __pointer_size 32
#endif


/*
**  sys_nerr and sys_errlist are implemented as of OpenVMS V6.2
*/
#if __CRTL_VER >= 60200000

    /*
    **  Real values in the DECC$SHR image
    */
#   pragma __extern_model __save
#   pragma __extern_model __relaxed_refdef
    extern int sys_nerr;
    extern char *sys_errlist[];
#   pragma __extern_model __restore

#else

    /*
    **  Pre-V6.2 Stub values resolved in OLBs
    */
#ifdef __ALPHA
#   pragma __extern_model __save
#   pragma __extern_model __relaxed_refdef
    extern int sys_nerr;
    extern char *sys_errlist[];
#   pragma __extern_model __restore
#else
#   pragma __extern_model __save
#   pragma __extern_model __common_block
    extern int sys_nerr;
    extern char *sys_errlist[];
#   pragma __extern_model __restore
#endif
#endif


/*
**  Restore the users pointer context
*/
#if __INITIAL_POINTER_SIZE
#   pragma __pointer_size __restore
#endif

#ifdef __cplusplus
    }
#endif
#pragma __standard
#endif /* __PERROR_LOADED */