mirror of
git://xwords.git.sourceforge.net/gitroot/xwords/xwords
synced 2024-12-28 09:58:30 +01:00
cleanup stderr output
This commit is contained in:
parent
0072112b5a
commit
12508b7cd5
1 changed files with 1 additions and 1 deletions
|
@ -160,7 +160,6 @@ sub nodeSizeFromFlags($$) {
|
|||
my ( $fh, $flags ) = @_;
|
||||
|
||||
my $bitSet = $flags & 0x0008;
|
||||
printf STDERR "checking flags 0x%x with 0x%x -> 0x%x\n", $flags, 0x0008, $bitSet;
|
||||
if ( 0 != $bitSet ){
|
||||
$flags = $flags & ~0x0008;
|
||||
# need to skip header
|
||||
|
@ -168,6 +167,7 @@ sub nodeSizeFromFlags($$) {
|
|||
2 == sysread( $fh, $buf, 2 ) || die "couldn't read length of header";
|
||||
my $len = unpack( "n", $buf );
|
||||
$len == sysread( $fh, $buf, $len ) || die "couldn't read header bytes";
|
||||
printf STDERR "skipped %d bytes of header\n", $len + 2;
|
||||
}
|
||||
|
||||
if ( $flags == 2 || $ flags == 4 ) {
|
||||
|
|
Loading…
Reference in a new issue