Content - 640c1ac53461696ce67e04dd147075c8a191922c - 6d6bcc6/tutorials/cleanup.C

swh:1:snp:af87cd67498ef4fe47c76ed3e7caffe5b61facaf

Tip revision: de2c598a74ea814a2d113efd5e24b7e08debe95b authored by Unknown Author on 05 July 2005, 22:28:11 UTC
This commit was manufactured by cvs2svn to create tag 'v5-02-00'.

Tip revision: de2c598

cleanup.C

{
  gROOT->Reset();
  TCanvas *c = 0;
  c = (TCanvas*)gROOT->FindObject("c1"); if (c) c->Delete(); c = 0;
  c = (TCanvas*)gROOT->FindObject("c2"); if (c) c->Delete(); c = 0;
  c = (TCanvas*)gROOT->FindObject("ntuple"); if (c) c->Delete(); c = 0;
  c = (TCanvas*)gROOT->FindObject("tornadoCanvas"); if (c) c->Delete(); c = 0;
}