Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
openSUSE:12.2
perl
perl-clone_oldcop.diff
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File perl-clone_oldcop.diff of Package perl
--- ./ext/XS-APItest/APItest.xs.orig 2012-05-25 14:49:20.000000000 +0000 +++ ./ext/XS-APItest/APItest.xs 2012-05-25 14:49:54.000000000 +0000 @@ -3084,7 +3084,8 @@ CODE: PERL_SET_CONTEXT(interp_dup); /* continue after 'clone_with_stack' */ - interp_dup->Iop = interp_dup->Iop->op_next; + if (interp_dup->Iop) + interp_dup->Iop = interp_dup->Iop->op_next; /* run with new perl */ Perl_runops_standard(interp_dup); --- ./sv.c.orig 2012-05-25 14:50:00.000000000 +0000 +++ ./sv.c 2012-05-25 14:51:48.000000000 +0000 @@ -12296,6 +12296,7 @@ Perl_cx_dup(pTHX_ PERL_CONTEXT *cxs, I32 Perl_croak(aTHX_ "Cloning substitution context is unimplemented"); } else { + ncx->blk_oldcop = (COP*)any_dup(ncx->blk_oldcop, param->proto_perl); switch (CxTYPE(ncx)) { case CXt_SUB: ncx->blk_sub.cv = (ncx->blk_sub.olddepth == 0
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor
