This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
scope.c: silence some compiler warnings
authorDavid Mitchell <davem@iabyn.com>
Thu, 6 Dec 2012 16:42:20 +0000 (16:42 +0000)
committerDavid Mitchell <davem@iabyn.com>
Thu, 6 Dec 2012 16:42:20 +0000 (16:42 +0000)
clang didn't like %ld on I32's.

scope.c

diff --git a/scope.c b/scope.c
index ab09eff..3d62918 100644 (file)
--- a/scope.c
+++ b/scope.c
@@ -724,8 +724,9 @@ Perl_save_alloc(pTHX_ I32 size, I32 pad)
     const UV elems_shifted = elems << SAVE_TIGHT_SHIFT;
 
     if ((elems_shifted >> SAVE_TIGHT_SHIFT) != elems)
-       Perl_croak(aTHX_ "panic: save_alloc elems %"UVuf" out of range (%ld-%ld)",
-                  elems, size, pad);
+       Perl_croak(aTHX_
+            "panic: save_alloc elems %"UVuf" out of range (%"IVdf"-%"IVdf")",
+                  elems, (IV)size, (IV)pad);
 
     SSGROW(elems + 1);