From 12508b7cd5c893e383267bdbac989ee3c8e43d99 Mon Sep 17 00:00:00 2001 From: Andy2 Date: Mon, 6 Dec 2010 07:23:22 -0800 Subject: [PATCH] cleanup stderr output --- xwords4/dawg/dawg2dict.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/xwords4/dawg/dawg2dict.pl b/xwords4/dawg/dawg2dict.pl index 7dc41e8f5..38704c229 100755 --- a/xwords4/dawg/dawg2dict.pl +++ b/xwords4/dawg/dawg2dict.pl @@ -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 ) {