[perl.git] branch blead updated. v5.27.10-143-g2f145a2d09

[Tony Cook]

In perl.git, the branch blead has been updated

<https://perl5.git.perl.org/perl.git/commitdiff/2f145a2d09c96f4005a7cd54f706cc76a1fecbbb?hp=230d26840df92e780afadd760cbbda2a1c900a04>

- Log -----------------------------------------------------------------
commit 2f145a2d09c96f4005a7cd54f706cc76a1fecbbb
Author: Daniel Dragan <bul...@hotmail.com>
Date:   Thu Apr 12 14:53:09 2018 -0400

    fix SEGV in XS::APItest::Backrefs::Comctl32Version()
    
    really old Mingw GCCs (3.4.5 specifically) dont implement _alloca
    correctly, switch to a simpler variation
    
    a follow on to perl #133084 and see also problems I had with alloca on
    very old GCCs in https://rt.cpan.org/Public/Bug/Display.html?id=80217

-----------------------------------------------------------------------

Summary of changes:
 ext/XS-APItest/APItest.pm | 2 +-
 ext/XS-APItest/APItest.xs | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ext/XS-APItest/APItest.pm b/ext/XS-APItest/APItest.pm
index 8eda0f7a02..b98ccf848b 100644
--- a/ext/XS-APItest/APItest.pm
+++ b/ext/XS-APItest/APItest.pm
@@ -5,7 +5,7 @@ use strict;
 use warnings;
 use Carp;
 
-our $VERSION = '0.96';
+our $VERSION = '0.97';
 
 require XSLoader;
 
diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs
index 1fead70ee9..15b95eb211 100644
--- a/ext/XS-APItest/APItest.xs
+++ b/ext/XS-APItest/APItest.xs
@@ -6784,7 +6784,7 @@ Comctl32Version()
             croak("Comctl32Version: comctl32.dll no version???");
         ver = LoadResource(dll, hrsc);
         len = SizeofResource(dll, hrsc);
-        vercopy = _alloca(len);
+        vercopy = (void *)sv_grow(sv_newmortal(),len);
         memcpy(vercopy, ver, len);
         if (VerQueryValue(vercopy, "\\", (void**)&info, &len)) {
             int dwValueMS1 = (info->dwFileVersionMS>>16);

-- 
Perl5 Master Repository