On 04/09/2011 10:24 AM, Paolo Bonzini wrote:
> On 04/09/2011 09:55 AM, Holger Hans Peter Freyther wrote:
>> Hi Paolo,
>
> x := SomeClass someInstance.
> [o := x allOwners. o isEmpty] whileTrue: [ x := x nextInstance ].
> (o collect: [ :each |each class]) asBag
>
Hi,
thanks for your fast reply. I was doing this test code:
[
[
top select: 'SELECT * FROM version()'.
] repeat
] ensure: [
ObjectMemory compact.
DBI.Statement allSubinstancesDo: [:each | each class printNl].
DBI.ResultSet allSubinstancesDo: [:each | each class printNl].
].
then using CTRL+C and it appears that after GC many ResultSets are still in
the image. I am now going to use your trick to find the owners.
thanks
holger
_______________________________________________
help-smalltalk mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/help-smalltalk
