Add Perl_malloc_good_size to malloc.c. (A routine that rounds up the

[perl5.git] / proto.h

diff --git a/proto.h b/proto.h
index 7ba57ff..f764d5c 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -106,6 +106,9 @@ PERL_CALLCONV MEM_SIZE      Perl_malloced_size(void *p)
 #define PERL_ARGS_ASSERT_MALLOCED_SIZE \
        assert(p)
 
+PERL_CALLCONV MEM_SIZE Perl_malloc_good_size(size_t nbytes)
+                       __attribute__warn_unused_result__;
+
 #endif
 
 PERL_CALLCONV void*    Perl_get_context(void)