Tools__NewSystemBrowser.st
changeset 12936 3624ecb36435
parent 12926 7f1d75d9ba0a
child 12939 78a465c907cd
--- a/Tools__NewSystemBrowser.st	Thu Jun 20 13:24:29 2013 +0200
+++ b/Tools__NewSystemBrowser.st	Thu Jun 20 13:27:17 2013 +0200
@@ -9433,6 +9433,11 @@
           )
          (MenuItem
             enabled: hasMethodSelectedHolder
+            label: 'Start Counting by Receiver Class'
+            itemValue: debugMenuStartCountingByReceiverClass
+          )
+         (MenuItem
+            enabled: hasMethodSelectedHolder
             label: 'Start Memory Usage'
             itemValue: debugMenuStartMemoryUsage
           )
@@ -36880,6 +36885,12 @@
     self commonTraceHelperWith:#startCounting with:nil clear:true
 !
 
+debugMenuStartCountingByReceiverClass
+    "set a countpoint for memory usage on the current method"
+
+    self commonTraceHelperWith:#startCountingByReceiverClass with:nil clear:true
+!
+
 debugMenuStartMemoryUsage
     "set a countpoint for memory usage on the current method"
 
@@ -58552,15 +58563,15 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1898 2013-06-17 14:17:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1899 2013-06-20 11:27:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1898 2013-06-17 14:17:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1899 2013-06-20 11:27:17 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1898 2013-06-17 14:17:38 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1899 2013-06-20 11:27:17 cg Exp $'
 ! !