Front page | perl.perl5.porters |
Postings from August 2003
I think that the appended patch to t/op/int.t will fail on netbsd until
we get this problem fixed, and pass everywhere else. However, it's a lot
less obscure a failure than something in the bowels of pack.
On Sat, Aug 23, 2003 at 10:25:37PM +0200, alian wrote:
> I really don't know what is it. Only one thing: this is something
> between @19201 and @19254. Period of configure/perl.h update for modfl & co.
Could you try the attached patch, which should back out the change to pp.c
only, and see if that fixes it.
Nicholas Clark
--- t/op/int.t.orig 2002-07-20 00:50:10.000000000 +0100
+++ t/op/int.t 2003-08-24 15:30:13.000000000 +0100
@@ -5,7 +5,7 @@ BEGIN {
@INC = '../lib';
}
-print "1..14\n";
+print "1..16\n";
# compile time evaluation
@@ -96,3 +96,20 @@ if ($y == 4745162525730) {
print "not ok 14 # int(279964589018079/59) is $y, not 4745162525730\n"
}
+$x = 2**53;
+$y = int ($x);
+
+if ($x == $y) {
+ print "ok 15\n"
+} else {
+ print "not ok 15 # int($x) is $y, not $x\n"
+}
+
+$x = -$x;
+$y = int ($x);
+
+if ($x == $y) {
+ print "ok 16\n"
+} else {
+ print "not ok 16 # int($x) is $y, not $x\n"
+}
Thread Previous
|
Thread Next