Changeset 2210 for trunk/MagicSoft/Mars/mbase

Timestamp:

06/23/03 13:19:34 (21 years ago)

Author:

tbretz

Message:

*** empty log message ***

File:

• trunk/MagicSoft/Mars/mbase/MParList.cc (modified) (4 diffs)

trunk/MagicSoft/Mars/mbase/MParList.cc

@@ -75 +75 @@
     fContainer  = new TOrdCollection;
     fAutodelete = new TOrdCollection;
+
+    gROOT->GetListOfCleanups()->Add(fContainer);
+    gROOT->GetListOfCleanups()->Add(fAutodelete);
+    fContainer->SetBit(kMustCleanup);
+    fAutodelete->SetBit(kMustCleanup);
 }
 
@@ -111 +116 @@
     IsOwner() ? fContainer->SetOwner() : fAutodelete->SetOwner();
 
+    TIter Next(fContainer);
+    TObject *o;
+    while (o=Next())
+        if (o->TestBit(kCanDelete))
+            delete fContainer->Remove(o);
+
     // FIXME? If fContainer is owner do we have to remove the object
     //   from fAutodelete due to the acces when checking for a
@@ -206 +217 @@
     *fLog << inf << "Adding " << name << " to " << GetName() << "... " << flush;
 
+    cont->SetBit(kMustCleanup);
     fContainer->Add(cont);
     *fLog << "Done." << endl;
@@ -228 +240 @@
     MParContainer *cont = NULL;
     while ((cont=Next()))
+    {
+        cont->SetBit(kMustCleanup);
         AddToList(cont);
+    }
 }