38 TString path( (
char*)strstr( target->GetPath(),
":" ) );
41 TFile* first_source = (TFile*)sourcelist->First();
42 first_source->cd( path );
43 TDirectory* current_sourcedir = gDirectory;
45 Bool_t status = TH1::AddDirectoryStatus();
46 TH1::AddDirectory( kFALSE );
49 TChain* globChain = 0;
50 TIter nextkey( current_sourcedir->GetListOfKeys() );
51 TKey *
key, *oldkey = 0;
52 while ( (
key = (TKey*)nextkey() ) )
56 if ( oldkey && !strcmp( oldkey->GetName(),
key->GetName() ) )
continue;
59 first_source->cd( path );
60 TObject* obj =
key->ReadObj();
62 TFolder* add =
dynamic_cast<TFolder*
>( obj );
63 TCollection* hh = add->GetListOfFolders();
64 TFolder* add1 =
new TFolder(
key->GetName(),
key->GetTitle() );
67 TFile* nextsource = (TFile*)sourcelist->After( first_source );
71 nextsource->cd( path );
72 std::cout <<
"nextsource->Name()==" << std::endl;
74 std::cout <<
"firstsource->Name()==" << std::endl;
75 first_source->Print();
76 TFolder* kk = (TFolder*)nextsource->Get(
key->GetName() );
77 std::cout <<
"key->GetName()==" <<
key->GetName() << std::endl;
78 first_source->cd( path );
79 while ( ( obj = next() ) )
82 std::cout <<
"obj->getName()==" << obj->GetName() << std::endl;
84 nextsource->cd( path );
85 TH1* h2 = (TH1*)kk->FindObjectAny( h1->GetName() );
89 std::cout <<
"h1->GetEntries()" << h1->GetEntries() << std::endl;
92 nextsource = (TFile*)sourcelist->After( nextsource );
100 target->SaveSelf( kTRUE );