Next

Program Repair Shop

263

Special Cases

      $ct_scanout=0;

• At present, $ct_scanout is set in the main loop and cleared in printout

• It's better if the management of the variable is local to one part of the code

  • Cluster functionality

• Instead of this:

      17          next unless /apply/ && $seen_CHAIN_TEST;
      18        
      19          $ct_scanout = 1 if /apply\s*"grp[0-9]_unload"/;

• Just use this:

      17          next unless /apply/ && $seen_CHAIN_TEST;
      18        
      19          $ct_scanout = /apply\s*"grp[0-9]_unload"/;

• Now, at the beginning of an apply-load section...

  • $ct_scanout is automatically set to 0

Next

Copyright © 2002 M. J. Dominus