On 03.11.2008, at 02:10, Herbert König wrote:

> Hi,
>
> is the following class side method a disaster waiting to happen?

Yes.

> readData
> "persistance :-))"
>        |refStream |
>        refStream := ReferenceStream fileNamed: 'HkCalendar.data'.
>        classPool := refStream next.
>        refStream close.
>
>
> or is a class pool just another dictionary?

It is, but the associations in it are also referenced in the  
CompiledMethod's literals. The ref stream will have copies of the  
associations. You would have to recompile all those methods after  
bringing in the classpool.

> BTW it doesn't work but it seemed to do no harm otherwise.
>
> So is there a quick way to store and retrieve all class variables?


This should work:

refStream next keysAndValuesDo: [:k :v | classPool at: k put: v]

- Bert -