equal
deleted
inserted
replaced
134 limit := Integer readFrom:answer onError:nil. |
134 limit := Integer readFrom:answer onError:nil. |
135 limit isNil ifTrue:[^ self]. |
135 limit isNil ifTrue:[^ self]. |
136 insts := (insts asArray copyTo:limit) |
136 insts := (insts asArray copyTo:limit) |
137 ]. |
137 ]. |
138 insts := insts asArray. |
138 insts := insts asArray. |
139 ObjectMemory displayRefChainToAny:insts limitNumberOfSearchedReferences:(limit ? 250). |
139 ObjectMemory displayRefChainToAny:insts limitNumberOfSearchedReferences:(limit ? 1000). |
140 ] |
140 ] |
141 ] |
141 ] |
142 |
142 |
143 "Modified: / 15.10.1996 / 22:09:29 / cg" |
143 "Modified: / 15.10.1996 / 22:09:29 / cg" |
144 "Created: / 3.2.1998 / 00:03:22 / cg" |
144 "Created: / 3.2.1998 / 00:03:22 / cg" |
665 ! ! |
665 ! ! |
666 |
666 |
667 !MemoryUsageView class methodsFor:'documentation'! |
667 !MemoryUsageView class methodsFor:'documentation'! |
668 |
668 |
669 version |
669 version |
670 ^ '$Header: /cvs/stx/stx/libtool/MemoryUsageView.st,v 1.51 2010-01-20 19:44:38 cg Exp $' |
670 ^ '$Header: /cvs/stx/stx/libtool/MemoryUsageView.st,v 1.52 2010-01-20 21:05:44 cg Exp $' |
671 ! |
671 ! |
672 |
672 |
673 version_CVS |
673 version_CVS |
674 ^ '$Header: /cvs/stx/stx/libtool/MemoryUsageView.st,v 1.51 2010-01-20 19:44:38 cg Exp $' |
674 ^ '$Header: /cvs/stx/stx/libtool/MemoryUsageView.st,v 1.52 2010-01-20 21:05:44 cg Exp $' |
675 ! ! |
675 ! ! |