From: Karl Williamson <khw@cpan.org>
Date: Wed, 22 May 2019 20:37:20 +0000 (-0600)
Subject: PATCH: [perl #134126] -Dusemymalloc, -Dusethreads
X-Git-Tag: v5.31.1~165
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/9629b6dc1d6296e0d3a6a5dbfd0f672b4b2021ca

PATCH: [perl #134126] -Dusemymalloc, -Dusethreads

This was due to a missing declaration for thread context needed to
output a message.
---

diff --git a/malloc.c b/malloc.c
index ed392ee..0c80a08 100644
--- a/malloc.c
+++ b/malloc.c
@@ -1239,6 +1239,7 @@ Perl_malloc(size_t nbytes)
          * malloc so that pointer subtraction in the same structure is always
          * well defined */
         if (nbytes > PTRDIFF_MAX) {
+            dTHX;
             MYMALLOC_WRITE2STDERR("Memory requests are limited to PTRDIFF_MAX"
                                   " bytes to prevent possible undefined"
                                   " behavior");