diff options
author | Steve Hay <SteveHay@planit.com> | 2008-02-13 12:19:17 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2009-03-22 00:10:57 +0000 |
commit | d79c78d1df0598e632ce13a1c353108647036185 (patch) | |
tree | 3d61456ccc2e7d5542549cf4148f791a3b463b51 /proto.h | |
parent | 401e94332eed533a4a0bd26c7aefa93ba732279b (diff) | |
download | perl-d79c78d1df0598e632ce13a1c353108647036185.tar.gz |
Drat. #33298 doesn't fix it: need this too.
And even then I now get an assertion from win32.c line 628. Sigh...
p4raw-id: //depot/perl@33299
(cherry picked from commit 589df73be52bdf2b31fafebfe4ce5149122a5c09)
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -69,7 +69,7 @@ PERL_CALLCONV PerlInterpreter* perl_clone(PerlInterpreter *proto_perl, UV flags) assert(proto_perl) # if defined(PERL_IMPLICIT_SYS) -PERL_CALLCONV PerlInterpreter* perl_clone_using(PerlInterpreter *proto_perl, UV flags, struct IPerlMem* m, struct IPerlMem* ms, struct IPerlMem* mp, struct IPerlEnv* e, struct IPerlStdIO* io, struct IPerlLIO* lio, struct IPerlDir* d, struct IPerlSock* s, struct IPerlProc* p) +PERL_CALLCONV PerlInterpreter* perl_clone_using(PerlInterpreter *proto_perl, UV flags, struct IPerlMem* ipM, struct IPerlMem* ipMS, struct IPerlMem* ipMP, struct IPerlEnv* ipE, struct IPerlStdIO* ipStd, struct IPerlLIO* ipLIO, struct IPerlDir* ipD, struct IPerlSock* ipS, struct IPerlProc* ipP) __attribute__nonnull__(1) __attribute__nonnull__(3) __attribute__nonnull__(4) @@ -81,7 +81,7 @@ PERL_CALLCONV PerlInterpreter* perl_clone_using(PerlInterpreter *proto_perl, UV __attribute__nonnull__(10) __attribute__nonnull__(11); #define PERL_ARGS_ASSERT_PERL_CLONE_USING \ - assert(proto_perl); assert(m); assert(ms); assert(mp); assert(e); assert(io); assert(lio); assert(d); assert(s); assert(p) + assert(proto_perl); assert(ipM); assert(ipMS); assert(ipMP); assert(ipE); assert(ipStd); assert(ipLIO); assert(ipD); assert(ipS); assert(ipP) # endif #endif |