This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update Test to CPAN version 1.26
[perl5.git] / 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);