Generated files.

p4raw-id: //depot/perlio@9319

5 files changed, 17 insertions, 0 deletions

diff --git a/embed.h b/embed.h
index 83afb92c1b..4dc17739a2 100644
--- a/embed.h
+++ b/embed.h
@@ -433,6 +433,7 @@
 #if !defined(PERL_OBJECT)
 #define my_pclose		Perl_my_pclose
 #define my_popen		Perl_my_popen
+#define my_popen_list		Perl_my_popen_list
 #endif
 #define my_setenv		Perl_my_setenv
 #define my_stat			Perl_my_stat
@@ -1924,6 +1925,7 @@
 #if !defined(PERL_OBJECT)
 #define my_pclose(a)		Perl_my_pclose(aTHX_ a)
 #define my_popen(a,b)		Perl_my_popen(aTHX_ a,b)
+#define my_popen_list(a,b,c)	Perl_my_popen_list(aTHX_ a,b,c)
 #endif
 #define my_setenv(a,b)		Perl_my_setenv(aTHX_ a,b)
 #define my_stat()		Perl_my_stat(aTHX)
@@ -3767,6 +3769,8 @@
 #define my_pclose		Perl_my_pclose
 #define Perl_my_popen		CPerlObj::Perl_my_popen
 #define my_popen		Perl_my_popen
+#define Perl_my_popen_list	CPerlObj::Perl_my_popen_list
+#define my_popen_list		Perl_my_popen_list
 #endif
 #define Perl_my_setenv		CPerlObj::Perl_my_setenv
 #define my_setenv		Perl_my_setenv
diff --git a/global.sym b/global.sym
index 49d4e858d5..1895fbfb58 100644
--- a/global.sym
+++ b/global.sym
@@ -233,6 +233,7 @@ Perl_my_memcmp
 Perl_my_memset
 Perl_my_pclose
 Perl_my_popen
+Perl_my_popen_list
 Perl_my_setenv
 Perl_my_stat
 Perl_my_swap
diff --git a/objXSUB.h b/objXSUB.h
index cce7f6f3b0..5643637cea 100644
--- a/objXSUB.h
+++ b/objXSUB.h
@@ -914,6 +914,10 @@
 #define Perl_my_popen		pPerl->Perl_my_popen
 #undef  my_popen
 #define my_popen		Perl_my_popen
+#undef  Perl_my_popen_list
+#define Perl_my_popen_list	pPerl->Perl_my_popen_list
+#undef  my_popen_list
+#define my_popen_list		Perl_my_popen_list
 #endif
 #undef  Perl_my_setenv
 #define Perl_my_setenv		pPerl->Perl_my_setenv
diff --git a/perlapi.c b/perlapi.c
index 9de87259d9..bf08bffd33 100644
--- a/perlapi.c
+++ b/perlapi.c
@@ -1684,6 +1684,13 @@ Perl_my_popen(pTHXo_ char* cmd, char* mode)
 {
     return ((CPerlObj*)pPerl)->Perl_my_popen(cmd, mode);
 }
+
+#undef  Perl_my_popen_list
+PerlIO*
+Perl_my_popen_list(pTHXo_ char* mode, int n, SV ** args)
+{
+    return ((CPerlObj*)pPerl)->Perl_my_popen_list(mode, n, args);
+}
 #endif
 
 #undef  Perl_my_setenv
diff --git a/proto.h b/proto.h
index 3e3a5d2b03..5a6ef0b949 100644
--- a/proto.h
+++ b/proto.h
@@ -499,6 +499,7 @@ PERL_CALLCONV void*	Perl_my_memset(char* loc, I32 ch, I32 len);
 #if !defined(PERL_OBJECT)
 PERL_CALLCONV I32	Perl_my_pclose(pTHX_ PerlIO* ptr);
 PERL_CALLCONV PerlIO*	Perl_my_popen(pTHX_ char* cmd, char* mode);
+PERL_CALLCONV PerlIO*	Perl_my_popen_list(pTHX_ char* mode, int n, SV ** args);
 #endif
 PERL_CALLCONV void	Perl_my_setenv(pTHX_ char* nam, char* val);
 PERL_CALLCONV I32	Perl_my_stat(pTHX);