| Subject: | Clone fails to build with blead@34780 |
| Date: | Sun, 09 Nov 2008 18:03:55 -0800 |
| To: | Perl 5 Porters <perl5-porters [...] perl.org>, bug-Clone [...] rt.cpan.org |
| From: | Michael G Schwern <schwern [...] pobox.com> |
There's a regression with Clone 0.29 and blead@34780 on OS X 10.4.
$ bleadperl Makefile.PL Checking if your kit is complete...
Looks good
Writing Makefile for Clone
$ make
cp Clone.pm blib/lib/Clone.pm
AutoSplitting blib/lib/Clone.pm (blib/lib/auto/Clone)
/usr/local/bin/bleadperl /usr/local/perl/blead/lib/5.11.0/ExtUtils/xsubpp
-typemap /usr/local/perl/blead/lib/5.11.0/ExtUtils/typemap Clone.xs >
Clone.xsc && mv Clone.xsc Clone.c
cc -c -I/sw/include -DDEBUGGING -fno-strict-aliasing -pipe
-I/usr/local/include -I/opt/local/include -O3 -DVERSION=\"0.29\"
-DXS_VERSION=\"0.29\"
"-I/usr/local/perl/blead/lib/5.11.0/darwin-thread-multi-2level/CORE" Clone.c
Clone.xs: In function ‘sv_clone’:
Clone.xs:286: error: assignment of read-only location
make: *** [Clone.o] Error 1
The lines in question...
122 static SV *
123 sv_clone (SV * ref, int depth)
124 {
125 SV *clone = ref;
...
282 else if (SvROK (ref))
283 {
284 TRACEME(("clone = 0x%x(%d)\n", clone, SvREFCNT(clone)));
285 SvREFCNT_dec(SvRV(clone));
286 SvRV(clone) = sv_clone (SvRV(ref), depth); /* Clone the referent */
287 if (sv_isobject (ref))
288 {
289 sv_bless (clone, SvSTASH (SvRV (ref)));
290 }
291 if (SvWEAKREF(ref)) {
292 sv_rvweaken(clone);
293 }
294 }
--
Look at me talking when there's science to do.
When I look out there it makes me glad I'm not you.
I've experiments to be run.
There is research to be done
On the people who are still alive.
-- Jonathan Coulton, "Still Alive"