From 60175f94ae4d64a920f29b11a9ba63fa99210cd7 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Fri, 17 Jan 2014 06:11:02 -0800 Subject: [PATCH] Always define sTHX as 0 when not using mem debug header I broke the threaded build in b001a0d149 by assuming that sTHX was always set to 0 when memory debug headers were not in use. That is an easy assumption to make, so this commit makes that assumption true. (And there is no reason it cannot be made true. There is no need for sTHX to be set under PERL_IMPLICIT_CONTEXT but not PERL_TRACK_MEMPOOL, where sTHX was not even used before b001a0d149.) --- perl.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl.h b/perl.h index ee167db..26902eb 100644 --- a/perl.h +++ b/perl.h @@ -4034,7 +4034,7 @@ struct perl_memory_debug_header { #endif -#if defined (PERL_IMPLICIT_CONTEXT) || defined (PERL_DEBUG_READONLY_COW) +#if defined (PERL_TRACK_MEMPOOL) || defined (PERL_DEBUG_READONLY_COW) # define sTHX (sizeof(struct perl_memory_debug_header) + \ (MEM_ALIGNBYTES - sizeof(struct perl_memory_debug_header) \ -- 2.7.4