File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -1823,19 +1823,19 @@ end
18231823""" 
18241824    set_retained_vns_del!(vi::VarInfo) 
18251825
1826- Set the `"del"` flag of variables in `vi` with `order > num_produce` to `true`. 
1826+ Set the `"del"` flag of variables in `vi` with `order > num_produce` to `true`. If 
1827+ `num_produce` is `0`, _all_ variables will have their `"del"` flag set to `true`. 
18271828
18281829Will error if `vi` does not have an accumulator for `VariableOrder`. 
18291830""" 
18301831function  set_retained_vns_del! (vi:: VarInfo )
18311832    if  ! hasacc (vi, Val (:VariableOrder ))
18321833        msg =  " `vi` must have an accumulator for VariableOrder to set the `del` flag." 
1833-         raise (ArgumentError (msg))
1834+         throw (ArgumentError (msg))
18341835    end 
18351836    num_produce =  get_num_produce (vi)
18361837    for  vn in  keys (vi)
1837-         order =  getorder (vi, vn)
1838-         if  order >  num_produce
1838+         if  num_produce ==  0  ||  getorder (vi, vn) >  num_produce
18391839            set_flag! (vi, vn, " del" 
18401840        end 
18411841    end 
 
 
   
 
     
   
   
          
    
    
     
    
      
     
     
    You can’t perform that action at this time.
  
 
    
  
    
      
        
     
       
      
     
   
 
    
    
  
 
  
 
     
    
0 commit comments