From ca0270c4db0273594a19a3d140c7330546a185fe Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sat, 29 Apr 2006 14:13:24 +0300 Subject: more -ansi -pedantic cleanliness Message-ID: <44532024.9070303@gmail.com> p4raw-id: //depot/perl@28010 --- sv.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'sv.c') diff --git a/sv.c b/sv.c index dab41e4888..e350adebe0 100644 --- a/sv.c +++ b/sv.c @@ -693,7 +693,7 @@ Perl_get_arena(pTHX_ int arena_size) newroot->set_size = ARENAS_PER_SET; newroot->next = *aroot; *aroot = newroot; - DEBUG_m(PerlIO_printf(Perl_debug_log, "new arenaset %p\n", *aroot)); + DEBUG_m(PerlIO_printf(Perl_debug_log, "new arenaset %p\n", (void*)*aroot)); } /* ok, now have arena-set with at least 1 empty/available arena-desc */ -- cgit v1.2.1