richter     00/07/02 12:18:51

  Modified:    .        Tag: Embperl2 test.pl
  Log:
  
  
  Revision  Changes    Path
  No                   revision
  
  
  No                   revision
  
  
  1.57.2.31 +1 -1      embperl/test.pl
  
  Index: test.pl
  ===================================================================
  RCS file: /home/cvs/embperl/test.pl,v
  retrieving revision 1.57.2.30
  retrieving revision 1.57.2.31
  diff -u -r1.57.2.30 -r1.57.2.31
  --- test.pl   2000/06/30 21:26:51     1.57.2.30
  +++ test.pl   2000/07/02 19:18:49     1.57.2.31
  @@ -558,7 +558,7 @@
                $max_sv = $num_sv ;
                
                }
  -         die "\n\nMemory problem (SVs)" if ($opt_exitonsv && $loopcnt > 2 && 
$last_sv[$n] < $num_sv) ;
  +         die "\n\nMemory problem (SVs)" if ($opt_exitonsv && $loopcnt > 2 && 
$last_sv[$n] < $num_sv && $last_sv[$n] != 0 && $num_sv != 0) ;
            $last_sv[$n] = $num_sv  ;
            last ;
            }
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to