class: InstrumentingCompiler
authorClaus Gittinger <cg@exept.de>
Tue, 03 Feb 2015 15:21:35 +0100
changeset 3570 0ac6e8f11416
parent 3569 d2ca8339f9f7
child 3571 617b63e557be
class: InstrumentingCompiler
InstrumentingCompiler.st
--- a/InstrumentingCompiler.st	Mon Feb 02 22:26:24 2015 +0100
+++ b/InstrumentingCompiler.st	Tue Feb 03 15:21:35 2015 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'stx:libcomp' }"
 
+"{ NameSpace: Smalltalk }"
+
 ByteCodeCompiler subclass:#InstrumentingCompiler
 	instanceVariableNames:'method methodEntryInfo blockInvocationInfo'
 	classVariableNames:''
@@ -882,7 +884,7 @@
 
 invokingMethodsDo:aBlock
     infoPerSendingMethod isNil ifTrue:[ ^ self].
-    ^ infoPerSendingMethod keysDo:aBlock.
+    infoPerSendingMethod keysDo:aBlock.
 !
 
 numberOfInvocations
@@ -1151,10 +1153,10 @@
 !InstrumentingCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.33 2013-07-28 23:20:46 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.34 2015-02-03 14:21:35 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.33 2013-07-28 23:20:46 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.34 2015-02-03 14:21:35 cg Exp $'
 ! !