[svn:parrot] r36681 - in trunk: config/gen/config_h t/pmc

[rurban at svn.parrot.org]

Author: rurban
Date: Fri Feb 13 18:15:30 2009
New Revision: 36681
URL: https://trac.parrot.org/parrot/changeset/36681

Log:
TT #313 not yet done.
- undef PARROT_HAS_NEGATIVE_ZERO to clarify indent
- todo pmc complex and float tests

Modified:
   trunk/config/gen/config_h/feature_h.in
   trunk/t/pmc/complex.t
   trunk/t/pmc/float.t

Modified: trunk/config/gen/config_h/feature_h.in
==============================================================================
--- trunk/config/gen/config_h/feature_h.in	Fri Feb 13 18:07:17 2009	(r36680)
+++ trunk/config/gen/config_h/feature_h.in	Fri Feb 13 18:15:30 2009	(r36681)
@@ -161,6 +161,11 @@
 #define PARROT_HAS_NEGATIVE_ZERO 1
 END_PRINT
 }
+else {
+    print OUT <<'END_PRINT';
+#undef PARROT_HAS_NEGATIVE_ZERO
+END_PRINT
+}
 
 print OUT <<'END_PRINT';
 

Modified: trunk/t/pmc/complex.t
==============================================================================
--- trunk/t/pmc/complex.t	Fri Feb 13 18:07:17 2009	(r36680)
+++ trunk/t/pmc/complex.t	Fri Feb 13 18:15:30 2009	(r36681)
@@ -1065,6 +1065,7 @@
     .complex_op_is("-2-3i", "3.590565-0.530921i", 'sinh' )
 
     eq osname, "openbsd", todo
+    eq osname, "MSWin32", todo
     .complex_op_is("0-2i", "-0.000000-0.909297i", 'sinh' )
     .complex_op_is("0+2i", "-0.000000+0.909297i", 'sinh' )
     .return()

Modified: trunk/t/pmc/float.t
==============================================================================
--- trunk/t/pmc/float.t	Fri Feb 13 18:07:17 2009	(r36680)
+++ trunk/t/pmc/float.t	Fri Feb 13 18:15:30 2009	(r36681)
@@ -506,7 +506,7 @@
 TODO: {
     my @todo;
     @todo = ( todo => '-0.0 not implemented, TT #313' )
-        if $^O =~ m/(?:openbsd)/i;
+        if $^O =~ m/(?:openbsd|mswin32)/i;
 
 pasm_output_like( <<'CODE', <<'OUTPUT', 'neg 0', @todo );
     new P0, ['Float']