summaryrefslogtreecommitdiff
path: root/embedvar.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-10-31 20:46:02 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-10-31 20:46:02 +0000
commit617fef7b5f1d16be12633d868c4dc2ba70a0baad (patch)
treefd546b7856fc3ed473e57722637cfad50805da86 /embedvar.h
parent41d70878831a2bc5ca9d667db3da03184b51a2ec (diff)
downloadperl-617fef7b5f1d16be12633d868c4dc2ba70a0baad.tar.gz
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
Diffstat (limited to 'embedvar.h')
-rw-r--r--embedvar.h3
1 files changed, 3 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h
index 94f93b08ee..37954329dd 100644
--- a/embedvar.h
+++ b/embedvar.h
@@ -191,6 +191,7 @@
#define PL_an (PERL_GET_INTERP->Ian)
#define PL_archpat_auto (PERL_GET_INTERP->Iarchpat_auto)
#define PL_argvgv (PERL_GET_INTERP->Iargvgv)
+#define PL_argvout_stack (PERL_GET_INTERP->Iargvout_stack)
#define PL_argvoutgv (PERL_GET_INTERP->Iargvoutgv)
#define PL_basetime (PERL_GET_INTERP->Ibasetime)
#define PL_beginav (PERL_GET_INTERP->Ibeginav)
@@ -449,6 +450,7 @@
#define PL_an (vTHX->Ian)
#define PL_archpat_auto (vTHX->Iarchpat_auto)
#define PL_argvgv (vTHX->Iargvgv)
+#define PL_argvout_stack (vTHX->Iargvout_stack)
#define PL_argvoutgv (vTHX->Iargvoutgv)
#define PL_basetime (vTHX->Ibasetime)
#define PL_beginav (vTHX->Ibeginav)
@@ -709,6 +711,7 @@
#define PL_Ian PL_an
#define PL_Iarchpat_auto PL_archpat_auto
#define PL_Iargvgv PL_argvgv
+#define PL_Iargvout_stack PL_argvout_stack
#define PL_Iargvoutgv PL_argvoutgv
#define PL_Ibasetime PL_basetime
#define PL_Ibeginav PL_beginav