Commits

Anonymous committed 8f15568

A small optimisation.

  • Participants
  • Parent commits d619066

Comments (0)

Files changed (1)

File abc-path/generator/generate-abs-path.pl

     while (@connectivity_stack)
     {
         my $int = pop(@connectivity_stack);
-        if (!exists($connected{$int}))
+        if (!$connected{$int}++)
         {
-            $connected{$int} = 1;
-
             push @connectivity_stack, 
             (grep { !exists($connected{$_}) } 
                 @{ $self->_get_next_cells($l, $int) }