petdance/scratch — Issue #1147: t/perl/Parrot_IO.t: 'not modified_since' test failing on some Win32 and Cygwin
Author: petdance
Created: 2011-11-01 05:39:22+00:00
State: open
Labels: bug, Pri-normal, Sev-medium, testing

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

Originally http://trac.parrot.org/parrot/ticket/1422