Todo failing examples test on Win32.

git-svn-id: https://svn.parrot.org/parrot/trunk@24040 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
fernandobrito · Dec 18, 2007 · 81182a1 · 81182a1
1 parent c5c9f2d
commit 81182a1
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/PLATFORMS b/PLATFORMS
@@ -41,7 +41,7 @@ tru64-alpha-compaq_c6.5       8   ?    ?    ?     Y   ?   Y    Y/2   ?  20060203
 cygwin1.5.24-x86-gcc3.4.4     4   Y    Y    -     -   -   Y    Y/6*1 ?  20071016
 win32-x86-mingw-gcc3.4.2          Y    Y    -     -   -   Y    Y/6   Y  20071120
 win32-x86-mingw_gcc4.2.1          Y    Y    -     -   -   Y    Y/8   ?  20071016
-win32-x86-msvc_7.1                -    Y    -     -   -   Y    Y/4   ?  20071016
+win32-x86-msvc_7.1                -    Y    -     -   -   Y    Y/8   ?  20071218
 win32-x86-msvc_8.0                -    Y    -     -   -   Y    Y*2   ?  20071016
 win32-x86_64-msvc_8.0             -    N    -     -   -   N    N     ?  20071016
 win32-x86-msvc_9.0                -    Y    -     -   -   Y    Y     ?  20071016

diff --git a/t/examples/tutorial.t b/t/examples/tutorial.t
@@ -244,7 +244,11 @@ TODO:
     fail('12_math_ops_pasm.pir');
 }
 
-example_output_is( "examples/tutorial/51_if_unless.pir", << 'END_EXPECTED' );
+my @TODO_35 = ();
+if ($^O =~ /Win32/) {
+    @TODO_35 = ( todo => 'Failing on Win32' );
+}
+example_output_is( "examples/tutorial/51_if_unless.pir", << 'END_EXPECTED', @TODO_35 );
 before if
 after if