In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/beee752600dcff1ceee400c3ad9d0a5ab7ebd45b?hp=88d9f320ca53d033aadb3c8de37636a402a5ae5d>

- Log -----------------------------------------------------------------
commit beee752600dcff1ceee400c3ad9d0a5ab7ebd45b
Author: Reini Urban <[email protected]>
Date:   Mon Mar 16 11:26:23 2015 +0100

    fix t/op/utf8cache.t with -DDEBUG_LEAKING_SCALARS
-----------------------------------------------------------------------

Summary of changes:
 t/op/utf8cache.t | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/t/op/utf8cache.t b/t/op/utf8cache.t
index e7484a0..e897587 100644
--- a/t/op/utf8cache.t
+++ b/t/op/utf8cache.t
@@ -8,6 +8,7 @@ BEGIN {
 }
 
 use strict;
+use Config ();
 
 plan(tests => 16);
 
@@ -27,6 +28,8 @@ my $out = runperl(stderr => 1,
     }
 EOS
 
+$out =~ s/^ALLOCATED at .*\n//m
+    if $Config::Config{ccflags} =~ /-DDEBUG_LEAKING_SCALARS/;
 like($out, qr/\ASV =/, "check we got dump output"); # [perl #121337]
 
 my $utf8magic = qr{ ^ \s+ MAGIC \s = .* \n

--
Perl5 Master Repository

Reply via email to