mirror/perl
1
0
Fork 0
mirror of https://github.com/Perl/perl5.git synced 2026-01-26 08:38:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

vmsish.h: remove a2p and x2p cruft

Browse Source 
a2p and x2p were removed from core in 5.22, so there's no reason
to keep these particular ifdefs around.
This commit is contained in:
Craig A. Berry 2024-08-31 18:27:44 -05:00
parent 872768dae2
commit f4ff0fc511
1 changed files with 0 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
vms/vmsish.h
View File

@ -48,10 +48,6 @@
#include <file.h> /* it's not <sys/file.h>, so don't use I_SYS_FILE */
#include <unistd.h>
#ifdef NO_PERL_TYPEDEFS /* a2p; we don't want Perl's special routines */
# define DONT_MASK_RTL_CALLS
#endif
#include <namdef.h>
/* Set the maximum filespec size here as it is larger for EFS file
@ -80,8 +76,6 @@
#define HAS_GETENV_LEN
#ifndef PERL_FOR_X2P
#ifndef DONT_MASK_RTL_CALLS
# ifdef getenv
# undef getenv
@ -217,7 +211,6 @@
#ifndef DONT_MASK_RTL_CALLS
# define tmpfile Perl_my_tmpfile
#endif
#endif
/* BIG_TIME:
@ -634,7 +627,6 @@ struct mystat
#define S_IDOTH (S_IWOTH | S_IXOTH)
#ifndef PERL_FOR_X2P
/* Prototypes for functions unique to vms.c. Don't include replacements
* for routines in the mainline source files excluded by #ifndef VMS;
* their prototypes are already in proto.h.
@ -786,8 +778,6 @@ long int lroundl(long double __x);
}
#endif
#endif
#ifndef VMS_DO_SOCKETS
/* This relies on tricks in perl.h to pick up that these manifest constants
* are undefined and set up conversion routines. It will then redefine