PWGLF/FORWARD/analysis/scripts/TestTaskIO.C

   1 void
   2 TestTaskIO(bool read=false)
   3 {
   4   gSystem->Load("libANALYSIS.so");
   5   gSystem->Load("libANALYSISalice.so");
   6   gSystem->Load("libPWGLFforward.so");
   7
   8   TFile* file = TFile::Open("task.root", (read ? "READ" : "RECREATE"));
   9
  10   if (!read) TestTaskIOWrite(file);
  11   else       TestTaskIORead(file);
  12
  13   file->Close();
  14 }
  15
  16 void
  17 TestTaskIOWrite(TFile* f)
  18 {
  19   AliFMDAnaParameters* p = AliFMDAnaParameters::Instance();
  20   p->SetEnergy(AliFMDAnaParameters::k900);
  21   p->Init();
  22   p->Dump();
  23
  24   f->cd();
  25
  26   AliFMDAnalysisTaskSE* t = new AliFMDAnalysisTaskSE("FMD");
  27   t->Write();
  28   t->Print("p");
  29 }
  30
  31
  32 void
  33 TestTaskIORead(TFile* f)
  34 {
  35   AliFMDAnalysisTaskSE* t = static_cast<AliFMDAnalysisTaskSE*>(f->Get("FMD"));
  36   t->Print("p");
  37
  38   AliFMDAnaParameters* p = AliFMDAnaParameters::Instance();
  39   p->Dump();
  40 }