From 18708f5a7334d978ddf7562cb7f58e28bec6e4ed Mon Sep 17 00:00:00 2001
From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sun, 31 Oct 1999 20:46:02 +0000
Subject: make nested ARGV/$^I loops work correctly; fixes several bugs in the
 way ARGV state was handled in readline(); writing a subroutine to do inplace
 edits is now possible, provided *ARGV, *ARGVOUT, $^I and $_ are localized
 where needed

p4raw-id: //depot/perl@4502
---
 objXSUB.h | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'objXSUB.h')

diff --git a/objXSUB.h b/objXSUB.h
index 735ca0a44a..7b3a0a064d 100644
--- a/objXSUB.h
+++ b/objXSUB.h
@@ -48,6 +48,8 @@
 #define PL_archpat_auto		(*Perl_Iarchpat_auto_ptr(aTHXo))
 #undef  PL_argvgv
 #define PL_argvgv		(*Perl_Iargvgv_ptr(aTHXo))
+#undef  PL_argvout_stack
+#define PL_argvout_stack	(*Perl_Iargvout_stack_ptr(aTHXo))
 #undef  PL_argvoutgv
 #define PL_argvoutgv		(*Perl_Iargvoutgv_ptr(aTHXo))
 #undef  PL_basetime
-- 
cgit v1.2.1