From 77354fb48907e3618a62531aa2e90772ef4375d9 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 2 Jul 2005 13:07:26 +0000
Subject: Don't inline offer_nice_chunk, as it's rarely called.

p4raw-id: //depot/perl@25047
---
 perl.h | 20 --------------------
 1 file changed, 20 deletions(-)

(limited to 'perl.h')

diff --git a/perl.h b/perl.h
index 22d41f16fb..bb8f217fa3 100644
--- a/perl.h
+++ b/perl.h
@@ -4753,26 +4753,6 @@ typedef struct am_table_short AMTS;
 #define PERL_ALLOC_CHECK(p)  NOOP
 #endif
 
-/*
- * nice_chunk and nice_chunk size need to be set
- * and queried under the protection of sv_mutex
- */
-#define offer_nice_chunk(chunk, chunk_size) STMT_START {  \
-       void *new_chunk;                                   \
-       U32 new_chunk_size;                                \
-       LOCK_SV_MUTEX;                                     \
-       new_chunk = (void *)(chunk);                       \
-       new_chunk_size = (chunk_size);                     \
-       if (new_chunk_size > PL_nice_chunk_size) {         \
-           Safefree(PL_nice_chunk);                       \
-           PL_nice_chunk = (char *) new_chunk;            \
-           PL_nice_chunk_size = new_chunk_size;           \
-       } else {                                           \
-           Safefree(chunk);                               \
-       }                                                  \
-       UNLOCK_SV_MUTEX;                                   \
-   } STMT_END
-
 #ifdef HAS_SEM
 #   include <sys/ipc.h>
 #   include <sys/sem.h>
-- 
cgit v1.2.1