Fix compilation error when building with -DPERL_MEM_LOG_STDERR

p4raw-id: //depot/perl@26349

diff --git a/util.c b/util.c
index 5b8aed0..d8b28f2 100644 (file)
--- a/util.c
+++ b/util.c
@@ -5055,7 +5055,7 @@ Perl_mem_log_alloc(const UV n, const UV typesize, const char *typename, Malloc_t
                                  " %s = %"IVdf": %"UVxf"\n",
                                  filename, linenumber, funcname, n, typesize,
                                  typename, n * typesize, PTR2UV(newalloc));
-    PerlLIO_write(2,  buf, len));
+    PerlLIO_write(2,  buf, len);
 #endif
     return newalloc;
 }