StRoot: macros/ClearRoot.C Source File

00001 // This macro being called at the end of ROOT session cleares all the
00002 // ROOT lists. In result, no ROOT objects will be deleted after ".q"
00003 // It is made especially to avoid deleting of TGeoManager which, due to bad
00004 // design, often leads to crash, which in its turn, is not always acceptable (VP)
00005 
00006 void ClearRoot()
00007 {
00008 TCollection *C[50]={0};
00009 int i = 0;
00010 C[i++] = gROOT->GetListOfBrowsables() ;
00011 C[i++] = gROOT->GetListOfBrowsers() ;
00012 C[i++] = gROOT->GetListOfCanvases() ;
00013 //C[i++] = gROOT->GetListOfClasses() ;
00014 //C[i++] = gROOT->GetListOfClassGenerators() ;
00015 C[i++] = gROOT->GetListOfCleanups() ;
00016 C[i++] = gROOT->GetListOfColors() ;
00017 C[i++] = gROOT->GetListOfDataSets() ;
00018 C[i++] = gROOT->GetListOfFiles() ;
00019 C[i++] = gROOT->GetListOfFunctions() ;
00020 C[i++] = gROOT->GetListOfGeometries() ;
00021 // C[i++] = gROOT->GetListOfGlobalFunctions();
00022 C[i++] = gROOT->GetListOfGlobals();
00023 C[i++] = gROOT->GetListOfKeys() ;
00024 C[i++] = gROOT->GetListOfMappedFiles() ;
00025 C[i++] = gROOT->GetListOfMessageHandlers() ;
00026 C[i++] = gROOT->GetListOfProofs() ;
00027 C[i++] = gROOT->GetListOfSecContexts() ;
00028 C[i++] = gROOT->GetListOfSockets() ;
00029 C[i++] = gROOT->GetListOfSpecials() ;
00030 C[i++] = gROOT->GetListOfStreamerInfo() ;
00031 C[i++] = gROOT->GetListOfStyles() ;
00032 C[i++] = gROOT->GetListOfTasks() ;
00033 C[i++] = gROOT->GetListOfTypes();
00034 if (gGeoManager) {
00035 C[i++] = gGeoManager->GetListOfGShapes() ;
00036 C[i++] = gGeoManager->GetListOfGVolumes() ;
00037 C[i++] = gGeoManager->GetListOfMaterials() ;
00038 C[i++] = gGeoManager->GetListOfMatrices() ;
00039 C[i++] = gGeoManager->GetListOfMedia() ;
00040 C[i++] = gGeoManager->GetListOfNavigators() ;
00041 C[i++] = gGeoManager->GetListOfNodes();
00042 C[i++] = gGeoManager->GetListOfOverlaps();
00043 C[i++] = gGeoManager->GetListOfPhysicalNodes();
00044 C[i++] = gGeoManager->GetListOfShapes() ;
00045 C[i++] = gGeoManager->GetListOfTracks() ;
00046 C[i++] = gGeoManager->GetListOfUVolumes() ;
00047 C[i++] = gGeoManager->GetListOfVolumes() ;
00048 }
00049  for (int j=0;j<i;j++) { if (C[j]) C[j]->Clear();}
00050  for (int j=0;j<i;j++) { if (C[j]) C[j]->ls();}
00051 }