Suggestion by Rick Delaney to make this test pass with -Duse64bitall

on HP-UX (see bug #46011)

p4raw-id: //depot/perl@32071

diff --git a/lib/overload.t b/lib/overload.t
index 09809d5..29411e1 100644 (file)
--- a/lib/overload.t
+++ b/lib/overload.t
@@ -1392,7 +1392,7 @@ foreach my $op (qw(<=> == != < <= > >=)) {
     is($o->[0], 1, 'int() numifies only once');
 
     my $aref = [];
-    my $num_val = 0 + $aref;
+    my $num_val = int($aref);
     my $r = bless $aref, 'numify_self';
     is(int($r), $num_val, 'numifies to self');
     is($r->[0], 1, 'int() numifies once when returning self');