Generated files.

p4raw-id: //depot/perlio@9319

diff --git a/embed.h b/embed.h
index 83afb92..4dc1773 100644 (file)
--- 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 49d4e85..1895fbf 100644 (file)
--- 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 cce7f6f..5643637 100644 (file)
--- 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 9de8725..bf08bff 100644 (file)
--- 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 3e3a5d2..5a6ef0b 100644 (file)
--- 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);