Re: ... suggestion for enhancment

Rene Brun (Rene.Brun@cern.ch)
Thu, 28 May 1998 16:50:28 +0200


Valeriy Onuchin wrote:
>
> Hello Rooters!
>
> I have a class MyDirClass inherited from TDirectory
> and tree structure of such objects in TFile.
> Written once this file can not be read again.
>
> The possible solution of this problem
> in correction of TObject::Write() (see TObject source)
>
> substituting the string
>
> if (IsA() == TDirectory::Class()) {
>
> by
> if (InheritsFrom("TDirectory")) {
>

will be more efficient with:

if (InheritsFrom("Tdirectory::Class))

We never tested classes derived from TDirectory. Let us know if it
works. This could have interesting applications..

Rene Brun