$new = "$name.gz";
}
- # Windows' NTFS gzip implementation; quirk is really really evil
- if ($os == GZIP_OS_NTFS) {
- testvariant($orig, $new, $name, @args, '--quirk', 'ntfs')
- && return $name, $timestamp, @args, '--quirk', 'ntfs';
- }
-
# set the Operating System flag to the one found in the original
# archive
push @args, ("--osflag", $os) if $os != GZIP_OS_UNIX;
testvariant($orig, $new, $name, @args, '--quirk', 'buggy-bsd')
&& return $name. $timestamp, @args, '--quirk', 'buggy-bsd';
+ # Windows' NTFS gzip implementation; quirk is really really evil
+ # it should be the last test: it can result in a corrupted archive!
+ if ($os == GZIP_OS_NTFS) {
+ pop @args; pop @args; # ntfs quirk implies NTFS osflag
+ testvariant($orig, $new, $name, @args, '--quirk', 'ntfs')
+ && return $name, $timestamp, @args, '--quirk', 'ntfs';
+ }
+
print STDERR "pristine-gz failed to reproduce build of $orig\n";
print STDERR "(Please file a bug report.)\n";
exit 1;