diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-17 13:43:54 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-17 13:43:54 +0000 |
commit | 092bebab2f702b0ac392b3259fc90294ab403f4b (patch) | |
tree | 3d5351416db9d4e4aa91afdf7b5202d097fdc6a3 /perl.h | |
parent | b56ec34489067f612a4e5d2fecae86c5bbfffd5c (diff) | |
download | perl-092bebab2f702b0ac392b3259fc90294ab403f4b.tar.gz |
The VM/ESA port essentials, based on
perl-mvs:
From: Neale Ferguson <neale@VMA.TABNSW.COM.AU>
Subject: Re: Can't find Data/Dumper.pm
Date: Mon, 28 Sep 1998 07:40:49 +1300
Message-ID: <360E86B0.23847AF4@mailbox.tabnsw.com.au>
private email:
From: Neale Ferguson <neale@VMA.TABNSW.COM.AU>
Subject: Re: Perl thread problems in VM/ESA
Date: Thu, 15 Oct 1998 07:18:35 +1300
Message-ID: <3624EAFA.16163A2B@mailbox.tabnsw.com.au>
and private email:
From: Neale Ferguson <NEALE@PUCC.PRINCETON.EDU>
Subject: perl archive
Date: Sun, 11 Oct 1998 19:28:54 EDT
Message-Id: <19981011233112Z67215-26626+1513@outbound.Princeton.EDU>
which gave a pointer to
http://pucc.princeton.edu/~neale/perl.tar
(based on Perl 5.005_51)
p4raw-id: //depot/cfgperl@2006
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 22 |
1 files changed, 15 insertions, 7 deletions
@@ -339,11 +339,15 @@ register struct op *op asm(stringify(OP_IN_REGISTER)); #ifdef USE_NEXT_CTYPE -#if NX_CURRENT_COMPILER_RELEASE >= 400 -#include <objc/NXCType.h> -#else /* NX_CURRENT_COMPILER_RELEASE < 400 */ -#include <appkit/NXCType.h> -#endif /* NX_CURRENT_COMPILER_RELEASE >= 400 */ +#if NX_CURRENT_COMPILER_RELEASE >= 500 +# include <bsd/ctypes.h> +#else +# if NX_CURRENT_COMPILER_RELEASE >= 400 +# include <objc/NXCType.h> +# else /* NX_CURRENT_COMPILER_RELEASE < 400 */ +# include <appkit/NXCType.h> +# endif /* NX_CURRENT_COMPILER_RELEASE >= 400 */ +#endif /* NX_CURRENT_COMPILER_RELEASE >= 500 */ #else /* !USE_NEXT_CTYPE */ #include <ctype.h> @@ -1307,7 +1311,11 @@ typedef I32 (*filter_t) _((int, SV *, int)); # if defined(__VOS__) # include "vosish.h" # else -# include "unixish.h" +# if defined(__OPEN_VM) +# include "vmesa/vmesaish.h" +# else +# include "unixish.h" +# endif # endif # endif # endif @@ -1693,7 +1701,7 @@ double atof _((const char*)); /* All of these are in stdlib.h or time.h for ANSI C */ Time_t time(); struct tm *gmtime(), *localtime(); -#ifdef OEMVS +#if defined(OEMVS) || defined(__OPEN_VM) char *(strchr)(), *(strrchr)(); char *(strcpy)(), *(strcat)(); #else |