OpenVMS update follow-up

This commit is contained in:
nhmall
2023-05-22 20:50:35 -04:00
parent 788ade31ca
commit 4761bf190e
9 changed files with 43 additions and 43 deletions

View File

@@ -145,6 +145,12 @@
#define _GNU_SOURCE
#endif
#ifdef __vms
#ifndef VMS
#define VMS
#endif
#endif
#ifdef VMS /* really old compilers need special handling, detected here */
#undef UNIX
#ifdef __DECC
@@ -153,15 +159,21 @@
/* [25 or so years later... That was probably uchar widening to */
/* 'unsigned int' rather than anything to do with typedefs. pr] */
#define USE_VARARGS
#else
#else /* __DECC_VER not defined */
#if __DECC_VER >= 70000000
#define VMSVSI
#endif /* _DECC_VER >= 70000000 */
#ifndef VMSVSI
#define NHSTDC
#define USE_STDARG
#define POSIX_TYPES
#ifndef _DECC_V4_SOURCE /* only def here if not already def'd on comd line */
#define _DECC_V4_SOURCE /* avoid some incompatible V5.x (and later) changes */
#endif
#endif /* !VMSVSI */
#endif /*__DECC_VER*/
#undef __HIDE_FORBIDDEN_NAMES /* need non-ANSI library support functions */
#ifndef VMSVSI
#ifdef VAXC /* DEC C in VAX C compatibility mode; 'signed' works */
#define signed /* but causes diagnostic about VAX C not supporting it */
#endif
@@ -190,6 +202,7 @@
#undef USE_STDARG
#endif
#endif
#endif /* !VMSVSI */
#endif /*VMS*/
#ifdef vax

View File

@@ -19,22 +19,6 @@
#define Local_WIZARD "NHWIZARD\0\0\0\0"
#define Local_HACKDIR "DISK$USERS:[GAMES.NETHACK.3_7_X.PLAY]\0\0\0\0\0\0\0\0"
/*
* VMS9 uses a VSI C compiler and supports C99.
* It is the first version available on X86_64 so we can auto-detect it there.
*/
#ifdef __x86_64
#define VMS9
#endif
/* #define VMS9 */
#ifdef VMS9
#ifndef __cplusplus
/* for version.c */
typedef int64_t ssize_t;
#endif
#endif
/*
* This section cleans up the stuff done in config.h so that it
* shouldn't need to be modified. It's conservative so that if
@@ -178,7 +162,7 @@ PANICTRACE_GDB=2 #at conclusion of panic, show a call traceback and then
/* config.h defines USE_ISAAC64; we'll use it on Alpha or IA64 but not VAX;
it overrides RANDOM */
#if !defined(VMS9)
#if !defined(VMSVSI)
#if (defined(VAX) || defined(vax) || defined(__vax)) && defined(USE_ISAAC64)
#undef ISAAC64
#endif
@@ -207,6 +191,7 @@ PANICTRACE_GDB=2 #at conclusion of panic, show a call traceback and then
/* # define FILENAME_CMP strcmpi */ /* case insensitive */
#endif
#ifndef VMSVSI
#if defined(VAXC) && !defined(ANCIENT_VAXC)
#ifdef volatile
#undef volatile
@@ -231,10 +216,10 @@ PANICTRACE_GDB=2 #at conclusion of panic, show a call traceback and then
#define ALLOCA_HACK /* used in util/panic.c */
#endif
#endif
#endif /* !VMSVSI */
#ifdef VMS9
#ifdef VMSVSI
#define NO_TERMCAP_HEADERS
#undef __HIDE_FORBIDDEN_NAMES
/* C99 */
#include <types.h>
#include <unistd.h>
@@ -274,7 +259,7 @@ typedef int32_t off_t;
#include <time.h>
#ifndef VMS9
#ifndef VMSVSI
#if 0 /* <file.h> is missing for old gcc versions; skip it to save time */
#include <file.h>
#else /* values needed from missing include file */
@@ -288,11 +273,13 @@ typedef int32_t off_t;
#define tgetch vms_getchar
#ifndef VMSVSI
#if defined(__DECC_VER) && (__DECC_VER >= 50000000)
/* for cc/Standard=ANSI89, suppress notification that '$' in identifiers
is an extension; sys/vms/*.c needs it regardless of strict ANSI mode */
# pragma message disable DOLLARID
#endif
#endif
/* #include "system.h" */
@@ -311,7 +298,7 @@ typedef int32_t off_t;
# endif
#endif
#if !defined(VMS9)
#if !defined(VMSVSI)
#ifndef __GNUC__
#ifndef bcopy
#define bcopy(s, d, n) memcpy((d), (s), (n)) /* vaxcrtl */
@@ -330,16 +317,16 @@ typedef int32_t off_t;
#else
#define unlink(f0) remove(f0) /* vaxcrtl, decc$shr */
#endif
#endif /* VMS9 */
#endif /* VMSVSI */
#define C$$TRANSLATE(n) c__translate(n) /* vmsfiles.c */
#if !defined(VMS9)
#if !defined(VMSVSI)
/* VMS global names are case insensitive... */
#define An vms_an
#define The vms_the
#define Shk_Your vms_shk_your
#endif /* VMS9 */
#endif /* VMSVSI */
/* avoid global symbol in Alpha/VMS V1.5 STARLET library (link trouble) */
#define ospeed vms_ospeed