1 files changed, 1 insertions, 0 deletions
diff --git a/malloc.c b/malloc.c
index 1d22923aa2..e2f97ad7ff 100644
--- a/malloc.c
+++ b/malloc.c
@@ -1711,6 +1711,7 @@ morecore(register int bucket)
 		    }
 		}
 		if (t && *t) {
+		    dTHX;
 		    MYMALLOC_WRITE2STDERR("Unrecognized part of PERL_MALLOC_OPT: \"");
 		    MYMALLOC_WRITE2STDERR(t);
 		    MYMALLOC_WRITE2STDERR("\"\n");