--- DarthVader/RunInfo/src/RunInfo.cpp	2006/07/21 11:00:13	1.6
+++ DarthVader/RunInfo/src/RunInfo.cpp	2006/08/04 10:31:30	1.7
@@ -63,8 +63,10 @@
   version->S4_ver = "";  
   version->ORB_ver = "";  
   norun = 0;
-  runlist = new TArrayL(0,NULL);
-  file = new TFile();
+  //  runlist = new TArrayL(0,NULL);
+  runlist = new TArrayL(500);
+  //  file = new TFile();
+  file = NULL;//new TFile();
   newtree = new TTree();
 }
 
@@ -92,6 +94,7 @@
   version->S4_ver = "";  
   norun = 0;
   totnorun = 0;
+  runlist = new TArrayL(500);
   //  runlist = new TArrayL(0,NULL);
   //
 }
@@ -118,7 +121,8 @@
   version->S4_ver = "";  
   norun = 0;
   totnorun = 0;
-  runlist = new TArrayL(0,NULL);
+  //  runlist = new TArrayL(0,NULL);
+  runlist = new TArrayL(500);
   //
 }
 
@@ -166,7 +170,7 @@
   version->S4_ver = "";  
   //
   norun = 0;
-  runlist = new TArrayL(0,NULL);
+  //  runlist = new TArrayL(0,NULL);
   //runlist->Reset();
   //
   Bool_t found = false;
@@ -265,7 +269,7 @@
       return(-805);
     };
     //
-    runlist = new TArrayL(1);
+    //    runlist = new TArrayL(1);
     //
     error = Query_GL_RUN(idRun, dbc);
     //
@@ -337,7 +341,11 @@
     //
     totnorun = oldtree->GetEntries();
     //
-    runlist = new TArrayL((Int_t)totnorun);
+    if ( totnorun > 500 ){
+      if ( debug ) printf("\n RUNINFO - ERROR: can not handle more than 500 runs!\n");
+      return(-806);
+    };
+    //    runlist = new TArrayL((Int_t)totnorun);
     //
     found = false;
     //
@@ -561,7 +569,11 @@
     //
     totnorun = newtree->GetEntries();
     //
-    runlist = new TArrayL((Int_t)totnorun);
+    if ( totnorun > 500 ){
+      if ( debug ) printf("\n RUNINFO - ERROR: can not handle more than 500 runs!\n");
+      return(-806);
+    };
+    //    runlist = new TArrayL((Int_t)totnorun);
     //
     first_file_entry = 0;
     //
@@ -619,7 +631,9 @@
   last_file_entry = 0;
   file_entries = 0ULL;
   norun = 0;
-  runlist = new TArrayL(0,NULL);
+  //  runlist = new TArrayL(0,NULL);
+  delete runlist;
+  //if ( file ) delete file;
   file = new TFile();  
   if ( isreadonly ) newtree->Delete();
 }