[svn:parrot] r35835 - trunk/t/op

Author: chromatic
Date: Tue Jan 20 10:55:37 2009
New Revision: 35835

Modified:
   trunk/t/op/trans.t

Log:
[t] Made the weird atan JIT NAN test a TODO test for the JIT core (TT #201).

Modified: trunk/t/op/trans.t
==============================================================================
--- trunk/t/op/trans.t	(original)
+++ trunk/t/op/trans.t	Tue Jan 20 10:55:37 2009
@@ -265,7 +265,10 @@
 ok 2
 OUTPUT
 
-pasm_output_is( <<"CODE", <<OUTPUT, "atan2" );
+my $runcore = $ENV{TEST_PROG_ARGS} || '';
+my @todo    = ( $runcore =~ /j/ ? ( todo => 'broken under JIT TT #201' ) : () );
+
+pasm_output_is( <<"CODE", <<OUTPUT, 'atan2', @todo );
         .include 'include/fp_equality.pasm'
         set N0, 0.0
         set I0, 0

• [svn:parrot] r35835 - trunk/t/op by chromatic