--- a/ProfileTree.st Fri Mar 25 16:44:42 2016 +0100
+++ b/ProfileTree.st Fri Mar 25 16:45:43 2016 +0100
@@ -9,8 +9,9 @@
other person. No title to or ownership of the software is
hereby transferred.
"
+"{ Package: 'stx:libbasic3' }"
-"{ Package: 'stx:libbasic3' }"
+"{ NameSpace: Smalltalk }"
Object subclass:#ProfileTree
instanceVariableNames:'receiver selector class leafTally totalTally called isBlock'
@@ -136,7 +137,7 @@
addChain:aCallChain
"{ Pragma: +optSpeed }"
- "merge a chain into the receivers tree"
+ "merge a chain into the receiver's tree"
|node found subTree chain called|
@@ -502,5 +503,6 @@
!ProfileTree class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ProfileTree.st,v 1.20 2000-08-22 19:57:21 cg Exp $'
+ ^ '$Header$'
! !
+