[svn:parrot] r42533 - trunk/t/op
Util at svn.parrot.org
Util at svn.parrot.org
Mon Nov 16 19:09:18 UTC 2009
Author: Util
Date: Mon Nov 16 19:09:14 2009
New Revision: 42533
URL: https://trac.parrot.org/parrot/changeset/42533
Log:
TT#313 - TODOed t/op/number.t test #131 (neg 0.0) on platforms that cannot print -0.0
Modified:
trunk/t/op/number.t
Modified: trunk/t/op/number.t
==============================================================================
--- trunk/t/op/number.t Mon Nov 16 17:43:05 2009 (r42532)
+++ trunk/t/op/number.t Mon Nov 16 19:09:14 2009 (r42533)
@@ -685,9 +685,18 @@
.end
.sub test_neg_0_dot_0
+ load_bytecode 'config.pbc'
+ $P1 = _config()
+ $P2 = $P1['has_negative_zero']
+ unless $P2 goto negative_zero_todoed
+
set $N1, 0
neg $N1
is( $N1, "-0", 'neg 0.0' )
+ .return ()
+
+ negative_zero_todoed:
+ todo(0, '-0.0 not implemented, TT#313')
.end
.sub test_mul_n_n
More information about the parrot-commits
mailing list