petdance/scratch — Issue #233: t/perl/Parrot_IO.t: 'not modified_since' test failing on some Win32 and Cygwin
Author: petdance
Created: 2011-11-01 04:25:21+00:00
State: open

In Smolder reports and discussion on #parrot, the following test failure has been reported by a Win32 user and a Cygwin user:
{{{
not ok 47 - not modified_since

# Failed test 'not modified_since'
# at t/perl/Parrot_IO.t line 160.

}}}
This appears to be the relevant code:
{{{
96 # Create a file in a directory that does not exist.
97 my $f3 = Parrot::IO::File->new
( tmp_file_path( 't', 'one', 'two', 'file3 .bar' ) );
98 ok( $f3, 'file new' );
...
158 # Status (stat info)
159 my $time = time;
160 ok( !$f3->modified_since($time), 'not modified_since' );
}}}
Could someone working on Win32 or Cygwin try to diagnose this?

Thank you very much.

kid51