summaryrefslogtreecommitdiff
path: root/perlio.c
diff options
context:
space:
mode:
authorCharles Lane <lane@DUPHY4.Physics.Drexel.Edu>2001-11-12 07:35:18 -0500
committerJarkko Hietaniemi <jhi@iki.fi>2001-11-12 16:33:01 +0000
commit32af7c23a1c4abd006dd0f19ca383c1fcaddfdd9 (patch)
tree27826c419d4ba6758c31f4f5633a43af1fead6c6 /perlio.c
parent9b1c7707319e7631584ef9f5d258edf5657d488c (diff)
downloadperl-32af7c23a1c4abd006dd0f19ca383c1fcaddfdd9.tar.gz
[Patch Perl@12856] MULTIPLICITY on VMS
Message-Id: <011112123409.27041@DUPHY4.Physics.Drexel.Edu> p4raw-id: //depot/perl@12958
Diffstat (limited to 'perlio.c')
-rw-r--r--perlio.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/perlio.c b/perlio.c
index 1a21e25bd6..8e8b859e5d 100644
--- a/perlio.c
+++ b/perlio.c
@@ -38,6 +38,11 @@
#define PERL_IN_PERLIO_C
#include "perl.h"
+#ifdef PERL_IMPLICIT_CONTEXT
+#undef dSYS
+#define dSYS dTHX
+#endif
+
#include "XSUB.h"
int