On Tuesday 24 April 2007 13:30, Andy Dougherty wrote:
> > Andy, could you update to r18323, remove the -G's, and see if it
> > now runs to completion on your Solaris box?
> Thanks for the heads-up. I'm afraid testing will have to wait until
> tomorrow. The rsync server at svn.perl.org is still down, and the
> snapshot on svn.perl.org hasn't picked up that patch yet.
Here's the patch (before I added comments); it should apply cleanly to
anything in the past week or two.
Best,
-- c
=== src/gc/resources.c
==================================================================
--- src/gc/resources.c (revision 3282)
+++ src/gc/resources.c (local)
@@ -744,6 +744,9 @@
PObj_buflen(str) = 0;
PObj_bufstart(str) = NULL;
+ if (size == 0)
+ return;
+
pool = PObj_constant_TEST(str)
? interp->arena_base->constant_string_pool
: interp->arena_base->memory_pool;
