/* Copyright (c) The Exim maintainers 2019 - 2022 */
/* Copyright (c) University of Cambridge 1995 - 2018 */
/* See the file NOTICE for conditions of use and distribution. */
+/* SPDX-License-Identifier: GPL-2.0-only */
/* Exim gets and frees all its store through these functions. In the original
implementation there was a lot of mallocing and freeing of small bits of store.
for (b = pp->chainbase; b; b = b->next)
if (is_pointer_in_block(b, p)) return pp;
+#ifndef COMPILE_UTILITY
+stackdump();
+#endif
log_write(0, LOG_MAIN|LOG_PANIC_DIE,
"bad memory reference; pool not found, at %s %d", func, linenumber);
return NULL;