Skip Menu |

This queue is for tickets about the Scope-Upper CPAN distribution.

Report information
The Basics
Id: 79182
Status: resolved
Priority: 0/
Queue: Scope-Upper

People
Owner: Nobody in particular
Requestors: d.thomas [...] its.uq.edu.au
Cc:
AdminCc:

Bug Information
Severity: Unimportant
Broken in: (no value)
Fixed in: 0.20



Subject: bleadperl: compile failure
RHEL5 perl 5.17.4-24f4b7d /opt/perl/uq.cis.perl-all.rhel5-5.17.4-24f4b7d-20120824/bin/perl5.17.4 /opt/perl/uq.cis.perl-all.rhel5-5.17.4-24f4b7d-20120824/lib/5.17.4/ExtUtils/xsubpp - typemap /opt/perl/uq.cis.perl-all.rhel5-5.17.4-24f4b7d- 20120824/lib/5.17.4/ExtUtils/typemap Upper.xs > Upper.xsc && mv Upper.xsc Upper.c gcc -c -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include - D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O2 -g -pipe -Wall -Wp,- D_FORTIFY_SOURCE=2 -fexceptions -fstack-protector --param=ssp-buffer-size=4 -m64 - mtune=generic -DVERSION=\"0.18\" -DXS_VERSION=\"0.18\" -fPIC "- I/opt/perl/uq.cis.perl-all.rhel5-5.17.4-24f4b7d-20120824/lib/5.17.4/x86_64-linux/CORE" -DSU_RELEASE=0 Upper.c Upper.xs: In function ‘su_uid_storage_dup’: Upper.xs:268: warning: unused variable ‘old_alloc’ Upper.xs: In function ‘su_uplevel_restore’: Upper.xs:1266: error: ‘PADLIST’ has no member named ‘sv_u’ Upper.xs:1277: error: ‘PADLIST’ has no member named ‘sv_u’ make: *** [Upper.o] Error 1
Now fixed in version 0.19. Vincent
On Wed Sep 05 10:17:52 2012, VPIT wrote: Show quoted text
> Now fixed in version 0.19.
I’m afraid it doesn’t work with bleadperl. I suppose I should learn to screw my head on more tightly before merging things with blead. I merged the new padlist stuff with commit 86b9d29366, but then noticed the following day that I had made a blunder in not following existing conventions for macros that access members of specific types, namely TypeMEMBER. The prior art I had copied, HEK_KEY, is not part of the API. I changed all the new macros in commit 86d2498c0. Sorry for the trouble. Here is a patch against 0.19.
Subject: open_00bI5iy2.txt
diff -rup Scope-Upper-0.19-eaFu_g/Upper.xs Scope-Upper-0.19-4XRfhO/Upper.xs --- Scope-Upper-0.19-eaFu_g/Upper.xs 2012-08-22 02:22:57.000000000 -0700 +++ Scope-Upper-0.19-4XRfhO/Upper.xs 2012-09-05 18:10:30.000000000 -0700 @@ -116,8 +116,9 @@ STATIC SV *su_newSV_type(pTHX_ svtype t) # define CvISXSUB(C) CvXSUB(C) #endif -#ifndef PADLIST_ARRAY -# define PADLIST_ARRAY(P) AvARRAY(P) +#ifndef PadlistARRAY +# define PadlistARRAY(P) AvARRAY(P) +# define PadARRAY(P) AvARRAY(P) #endif #ifndef CxHASARGS @@ -1253,7 +1254,7 @@ done: #endif /* SU_UPLEVEL_HIJACKS_RUNOPS */ -#define su_at_underscore(C) AvARRAY(PADLIST_ARRAY(CvPADLIST(C))[CvDEPTH(C)])[0] +#define su_at_underscore(C) PadARRAY(PadlistARRAY(CvPADLIST(C))[CvDEPTH(C)])[0] STATIC void su_uplevel_restore(pTHX_ void *sus_) { su_uplevel_ud *sud = sus_;
Le Jeu 06 Sep 2012 00:42:54, SPROUT a écrit : Show quoted text
> On Wed Sep 05 10:17:52 2012, VPIT wrote:
> > Now fixed in version 0.19.
> > I’m afraid it doesn’t work with bleadperl. >
Well it did with the version of bleadperl I was testing against. :) Thanks for the notice and the patch. This has been fixed for real in version 0.20. Vincent