From d9f81b50694a810f1b920a55481bdf183181048c Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Wed, 16 Jun 2010 20:47:22 +0100 Subject: Stop using WITH_THR and WITH_THX, as they were never necessary here. --- cop.h | 4 ++-- perl.h | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/cop.h b/cop.h index 98478ae7de..e5370c4915 100644 --- a/cop.h +++ b/cop.h @@ -569,14 +569,14 @@ struct block { #define blk_givwhen cx_u.cx_blk.blk_u.blku_givwhen #define DEBUG_CX(action) \ - DEBUG_l(WITH_THX( \ + DEBUG_l( \ Perl_deb(aTHX_ "CX %ld %s %s (scope %ld,%ld) at %s:%d\n", \ (long)cxstack_ix, \ action, \ PL_block_type[CxTYPE(&cxstack[cxstack_ix])], \ (long)PL_scopestack_ix, \ (long)(cxstack[cxstack_ix].blk_oldscopesp), \ - __FILE__, __LINE__))); + __FILE__, __LINE__)); /* Enter a block. */ #define PUSHBLOCK(cx,t,sp) CXINC, cx = &cxstack[cxstack_ix], \ diff --git a/perl.h b/perl.h index 673a19ef15..b551f4bca4 100644 --- a/perl.h +++ b/perl.h @@ -3811,10 +3811,10 @@ Gid_t getegid (void); #define DEBUG_SCOPE(where) \ - DEBUG_l(WITH_THR( \ + DEBUG_l( \ Perl_deb(aTHX_ "%s scope %ld (savestack=%ld) at %s:%d\n", \ where, (long)PL_scopestack_ix, (long)PL_savestack_ix, \ - __FILE__, __LINE__))); + __FILE__, __LINE__)); -- cgit v1.2.1