Index: t/op/trans_old.t
===================================================================
--- t/op/trans_old.t	(revision 44594)
+++ t/op/trans_old.t	(working copy)
@@ -8,6 +8,7 @@
 use Test::More;
 use Parrot::Test tests => 19;
 use Math::Trig qw( tan sec atan asin acos asec cosh sinh tanh sech );
+use Parrot::Config qw( %PConfig );
 
 =head1 NAME
 
@@ -329,6 +330,11 @@
 ok 16
 OUTPUT
 
+SKIP: {
+    unless ($PConfig{has_negative_zero}) {
+        skip( "No negative zero, test skipped" )
+    }
+
 pasm_output_is( <<"CODE", <<'OUTPUT', 'atan, part 2' );
         .include 'fp_equality.pasm'
         atan N4, -0.0, -0.0
@@ -340,6 +346,8 @@
 ok 1
 OUTPUT
 
+}
+
 pasm_output_is( <<"CODE", <<OUTPUT, "log2" );
         .include 'fp_equality.pasm'
         set N1, 10.0