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

darbelo at svn.parrot.org darbelo at svn.parrot.org
Tue Oct 6 00:30:57 UTC 2009


Author: darbelo
Date: Tue Oct  6 00:30:56 2009
New Revision: 41731
URL: https://trac.parrot.org/parrot/changeset/41731

Log:
Unconditionally un-TODO tests in t/op/io.t, they PASS everywhere now.
Patch from TT#1095 by GeJ++

Modified:
   trunk/t/op/io.t

Modified: trunk/t/op/io.t
==============================================================================
--- trunk/t/op/io.t	Mon Oct  5 23:24:24 2009	(r41730)
+++ trunk/t/op/io.t	Tue Oct  6 00:30:56 2009	(r41731)
@@ -51,28 +51,9 @@
     ok(1, 'open with null mode')
 .end
 
-.sub 'tt661_todo_test' :anon
-    # Checks whether the platform is linux, MSWin32, darwin: on other
-    # platforms, the following tests are todo'ed.
-    .include 'sysinfo.pasm'
-    $S0 = sysinfo .SYSINFO_PARROT_OS
-    if $S0 == 'linux' goto tt661_ok
-    if $S0 == 'MSWin32' goto tt661_ok
-    if $S0 == 'darwin' goto tt661_ok
-    if $S0 == 'openbsd' goto tt661_ok
-
-    .return (0)
-
-  tt661_ok:
-    .return (1)
-.end
-
 .include 'iglobals.pasm'
 
 .sub 'open_pipe_for_reading'
-    $I0 = tt661_todo_test()
-    unless $I0 goto open_pipe_for_reading_todoed
-
     .local pmc interp
     interp = getinterp
 
@@ -103,15 +84,9 @@
   open_pipe_for_reading_failed:
     nok(1, 'open pipe for reading')
     .return ()
-
-  open_pipe_for_reading_todoed:
-    todo(1, 'Unimplemented in this platform, TT #661')
 .end
 
 .sub 'open_pipe_for_writing'
-    $I0 = tt661_todo_test()
-    unless $I0 goto open_pipe_for_writing_todoed
-
     .local pmc interp
     interp = getinterp
 
@@ -144,9 +119,6 @@
   open_pipe_for_writing_failed:
     nok(1, 'open pipe for writing')
     .return ()
-
-  open_pipe_for_writing_todoed:
-    todo(1, 'Unimplemented in this platform, TT #661')
 .end
 
 # Local Variables:


More information about the parrot-commits mailing list