Unfudge now-passing file size tests.

Raku · Jul 6, 2012 · de9fa2b · de9fa2b
1 parent 235d9e1
commit de9fa2b
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 7 deletions.
diff --git a/S16-filehandles/filetest.t b/S16-filehandles/filetest.t
@@ -64,7 +64,6 @@ ok not 'doesnotexist.t'.IO ~~ :x, "~~:x returns false on non-existent files";
 ok not 'doesnotexist.t'.IO ~~ :f, "~~:f returns false on non-existent files";
 
 #?niecza skip ".s NYI"
-#?rakudo todo ".s doesn't seem to work - maybe Win32 specific though?"
 ok($*PROGRAM_NAME.IO.s > 42,   "~~:s returns size on existent files");
 
 nok "doesnotexist.t".IO ~~ :s, "~~:s returns false on non-existent files";

diff --git a/S32-io/file-tests.t b/S32-io/file-tests.t
@@ -47,24 +47,18 @@ isa_ok $non-existent-file.IO ~~ :!f, Bool, '~~ :!f returns Bool';
 #?niecza skip 'Unable to resolve method s in class IO'
 {
     nok $zero-length-file.IO.s, 'Is empty';
-    #?rakudo todo 'nom regression'
     isa_ok $zero-length-file.IO.s, Int, '.s returns Int';
     ok $zero-length-file.IO ~~ :!s, 'Is empty';
     isa_ok $zero-length-file.IO ~~ :!s, Bool, '~~ :!s returns Bool';
     ok $existing-file.IO.s, 'Is not';
-    #?rakudo todo 'nom regression'
     isa_ok $existing-file.IO.s, Int, '.s returns Int';
     ok $existing-file.IO ~~ :s, 'Is not';
     isa_ok $existing-file.IO ~~ :s, Bool, '~~ :s returns Bool';
 
     ##file size
-    #?rakudo todo 'nom regression'
     is $zero-length-file.IO.s, 0, 'No size';
-    #?rakudo todo 'nom regression'
     isa_ok $zero-length-file.IO.s, Int, '.s returns Int';
-    #?rakudo todo 'nom regression'
     is $existing-file.IO.s, 11, 'size of file';
-    #?rakudo todo 'nom regression'
     isa_ok $existing-file.IO.s, Int, '.s returns Int';
 }