Revision 1294 trunk/src/linad99/gradstrc.cpp

gradstrc.cpp (revision 1294)
591 591
     delete [] RETURN_PTR_CONTAINER;
592 592
     RETURN_PTR_CONTAINER = NULL;
593 593
   }
594

  
595 594
   if (INDVAR_LIST == NULL)
596 595
   {
597 596
     null_ptr_err_message();
......
625 624
     ARRAY_MEMBLOCK_BASE.free();
626 625
   }
627 626

  
628

  
629 627
   if (ARR_LIST1 == NULL)
630 628
   {
631 629
     null_ptr_err_message();
......
637 635
      ARR_LIST1 = NULL;
638 636
   }
639 637

  
640
  /*
641
   if (ARR_FREE_LIST1 == NULL)
642
   {
643
     null_ptr_err_message();
644
     ad_exit(1);
645
   }
646
   else
647
   {
648
      delete ARR_FREE_LIST1;
649
      ARR_FREE_LIST1 = NULL;
650
   }
651
   */
652

  
653 638
   if (GRAD_LIST == NULL)
654 639
   {
655 640
     null_ptr_err_message();
......
661 646
      GRAD_LIST = NULL;
662 647
   }
663 648

  
664
   instances --;
649
   instances--;
665 650

  
666 651
   if (DEPVARS_INFO==NULL)
667 652
   {
......
677 662
       " in ~gradient_structure\n";
678 663
     ad_exit(1);
679 664
   }
680

  
681 665
   delete fp;
682 666
   fp = NULL;
683 667
}

Also available in: Unified diff