/[symmetry-circle]/symmetry.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /symmetry.pl

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

revision 7 by dpavlin, Sun Aug 26 14:45:26 2007 UTC revision 8 by dpavlin, Sun Aug 26 16:31:23 2007 UTC
# Line 135  sub can_turn { Line 135  sub can_turn {
135          $trace[ $turn_pos ] = $old;          $trace[ $turn_pos ] = $old;
136    
137          if ( $board[ $turn_pos ] =~ $ok_path ) {          if ( $board[ $turn_pos ] =~ $ok_path ) {
138                  my $xy = x_y($turn_pos);                  my $xy = x_y($pos);
139                  warn "OK can_turn $try_step $step_name[$try_step] turn_pos = $turn_pos b($board[$turn_pos]) t($trace[$turn_pos]) to $xy\n";                  warn "OK can_turn $try_step $step_name[$try_step] turn_pos = $turn_pos b($board[$turn_pos]) t($trace[$turn_pos]) from $xy\n";
140                  $step = $try_step;                  $step = $try_step;
141                  push @corners, $xy;                  push @corners, $xy;
142                  return 1;                  return 1;
Legend:
Removed from v.7  
changed lines
  Added in v.8
  ViewVC Help
Powered by ViewVC 1.1.26