… | |
… | |
263 | # OLD |
263 | # OLD |
264 | |
264 | |
265 | } elsif (1) { |
265 | } elsif (1) { |
266 | print STDERR KGS::Listener::Debug::dumpval(\@r); |
266 | print STDERR KGS::Listener::Debug::dumpval(\@r); |
267 | open XTYPE, "|xtype"; print XTYPE $data; close XTYPE; |
267 | open XTYPE, "|xtype"; print XTYPE $data; close XTYPE; |
268 | die "unknown type $type"; |
268 | die "unknown tree type $type, PLEASE REPORT and include the game you wanted to watch. thx."; |
269 | |
269 | |
270 | } elsif ($type == 30) { |
270 | } elsif ($type == 30) { |
271 | push @r, [active_player => dec_U8]; |
271 | push @r, [active_player => dec_U8]; |
272 | |
272 | |
273 | } elsif ($type == 0) { # label(?) |
273 | } elsif ($type == 0) { # label(?) |