/[gnugo]/gnugo/interface/gtp_examples/twogtp-a
ViewVC logotype

Diff of /gnugo/interface/gtp_examples/twogtp-a

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by bump, Mon Nov 26 14:54:28 2001 UTC revision 1.8 by bump, Fri Mar 8 03:47:03 2002 UTC
# Line 308  sub eat_move { Line 308  sub eat_move {
308  # ignore empty lines  # ignore empty lines
309      my $line = "";      my $line = "";
310      while ($line eq "") {      while ($line eq "") {
311          defined($line = <$h>) or die "No response!";          if (!defined($line = <$h>)) {
312                print SGFFILEHANDLE ")";
313                close SGFFILEHANDLE;
314                die "Engine crashed!\n";
315            }
316          $line =~ s/(\s|\n)*$//smg;          $line =~ s/(\s|\n)*$//smg;
317      }      }
318      my ($equals, $move) = split(' ', $line, 2);      my ($equals, $move) = split(' ', $line, 2);
# Line 363  sub standard_to_sgf { Line 367  sub standard_to_sgf {
367      }      }
368      $first = chr($first);      $first = chr($first);
369      $second = chr($size+1-$2+96);      $second = chr($size+1-$2+96);
370      return "$second$first";      return "$first$second";
371  }  }
372    
373  sub rename_sgffile {  sub rename_sgffile {

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26