/* File: PYCONFIG_VMS.H ** ** This file contains the manual edits needed for porting ** the PYTHON package to OpenVMS. ** ** Edit this file as needed. The procedure that automatically ** generated this header stub will not overwrite or make any ** changes to this file. ** ** 29-APR-2002 23:00:15 MALMBERG Generated by PYCONFIG_H.COM ** **========================================================================*/ /* Porting library defines wrappers for common functions */ /*-------------------------------------------------------*/ #ifndef FRONTPORT_HIDE_DECC #define FRONTPORT_HIDE_DECC #include "frontport.h" #endif /* Global settings that would normally be supplied by CONFIGURE script */ /*=====================================================================*/ /* Include file required for compiling */ /*-------------------------------------*/ #include /* SIZEOF_VOID_P ? */ /*-----------------*/ #define SIZEOF_VOID_P 4 /* Suppress GNUC undefined symbol warnings */ /*-----------------------------------------*/ #ifndef __GNUC__ #define __GNUC__ 0 #endif #ifndef __GNUC_MINOR__ #define __GNUC_MINOR__ 0 #endif /* Module specific hacks */ /*=======================*/ #ifdef MOD_GETPATH #define PYTHONPATH "PYTHONPATH:" #define PREFIX "PYTHON_LIB" #define EXEC_PREFIX "PYTHON_EXEC" #define VPATH "SYS$DISK:[]" #define DELIM ':' /* #define LANDMARK ":[os.py]" ???? */ #ifdef __VAX #define MAXPATHLEN 256 #else #define MAXPATHLEN 4096 #endif #endif #ifdef MOD_VMS_GETPATH #if 0 #define PYTHONPATH "PYTHONPATH:" #define PREFIX "PYTHON_LIB" #define EXEC_PREFIX "PYTHON_EXEC" #define VPATH "SYS$DISK" #define DELIM '/' #endif /* #define LANDMARK ":[os.py]" ???? */ #ifdef __VAX #define MAXPATHLEN 256 #else #define MAXPATHLEN 4096 #endif #endif /* These identifiers exceed 31 characters */ /*----------------------------------------*/ #define PyParser_ParseStringFlagsFilename \ PyParser_ParseStringFlagsFilena #define PyErr_SetFromErrnoWithFilenameObject \ PyErr_SetFromErrnoWithFilenameO #define PyMarshal_ReadLastObjectFromFile \ PyMarshal_ReadLastObjectFromFil #define PyParser_SimpleParseStringFlagsFilename \ PyParser_SimpleParseStrngFlgsFn #define PyParser_SimpleParseStringFilename \ PyParser_SimpleParseStringFilen #ifdef MOD_BLTINMODULE #pragma message disable unusedtop #endif #ifdef MOD_BUFFEROBJECT #pragma message disable valuepres #endif #ifdef MOD_CEVAL #pragma message disable unusedtop #endif #ifdef MOD_CODECS #pragma message disable unusedtop #endif #ifdef MOD_COMPILE #pragma message disable unusedtop #endif #ifdef MOD_CRYPTMODULE #define crypt(a, b) fport__vms_crypt(a, b) #endif #ifdef MOD_ERRORS /* Too few actual parameters / invalid expression va_start(vargs); */ #define HAVE_STDARG_PROTOTYPES #endif #ifdef MOD_FILEOBJECT #pragma message disable unusedtop #endif #ifdef MOD_FLOATOBJECT #pragma message disable unusedtop #endif #ifdef MOD_GETARGS /* Too few actual parameters / invalid expression va_start(vargs); */ #define HAVE_STDARG_PROTOTYPES #pragma message disable unusedtop #endif #ifdef MOD_GETBUILDINFO /* Has VMS specific non standard symbols */ #pragma message disable dollarid #pragma message disable pragma #pragma message disable unusedtop #endif #ifdef MOD_GETCOMPILER /* Fix this to use builins */ #define COMPILER "COMPAQ C" #endif #ifdef MOD_GETPLATFORM #define PLATFORM "OpenVMS" #endif #ifdef MOD_GETTMTIME #pragma message disable intconstsign #endif #ifdef MOD_IMPORT #define SIZEOF_TIME_T 4 #pragma message disable intconstsign #pragma message disable unusedtop #endif #ifdef MOD_INTOOBJECT /* Pyobject_INIT(v, &Pyint_Type) should be Pyobject_INIT(v, *Pyint_Type) */ #pragma message disable unusedtop #endif #ifdef MOD_LISTOBJECT /* Embeded comments not preceded or followed by whitespace */ #pragma message disable embedcomment #pragma message disable unusedtop #endif #ifdef MOD_LONGOBJECT #pragma message disable valuepres #pragma message disable intconcastsgn #pragma message disable unusedtop #endif #ifdef MOD_MYSNPRINTF #pragma message disable unusedtop #endif #ifdef MOD_PARSER #pragma message disable subscrbounds2 #endif #ifdef MOD_PGENMAIN #pragma message disable unusedtop #pragma message disable unreachcode #endif #ifdef MOD_READLINE /* #pragma message disable */ #endif #ifdef MOD_STRINGOBJECT /* Too few actual parameters / invalid expression va_start(vargs); */ #define HAVE_STDARG_PROTOTYPES #pragma message disable unusedtop #endif #ifdef MOD_SYSMODULE /* Do not find a delimiter for OpenVMS paths */ /*-------------------------------------------*/ #define DELIM ' ' #endif #ifdef MOD_TOKENIZER #pragma message disable subscrbounds2 #endif #ifdef MOD_TRACEBACK #define SEP ']' #endif #ifdef MOD_TYPEOBJECT /* Embeded comments not preceded or followed by whitespace */ #pragma message disable embedcomment #endif