changed: #beActiveIn:
authorClaus Gittinger <cg@exept.de>
Sun, 21 Aug 2011 12:33:50 +0200
changeset 2672 ca4221b5143e
parent 2671 9a0de515880c
child 2673 fc2b363fbc67
changed: #beActiveIn:
InstrumentationContext.st
--- a/InstrumentationContext.st	Sun Aug 21 12:31:39 2011 +0200
+++ b/InstrumentationContext.st	Sun Aug 21 12:33:50 2011 +0200
@@ -179,7 +179,8 @@
 beActiveIn:aProcess
     "become the current instrumentaion context for a process."
 
-    self class setInstrumentationContext:self in:aProcess
+    self class setInstrumentationContext:self in:aProcess.
+    CachedProcessToInstrumentationContextMapping removeKey:aProcess ifAbsent:[].
 
     "
      InstrumentationContext new beActiveIn:(Processor activeProcess)
@@ -218,9 +219,9 @@
 !InstrumentationContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentationContext.st,v 1.3 2011-08-17 14:32:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentationContext.st,v 1.4 2011-08-21 10:33:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentationContext.st,v 1.3 2011-08-17 14:32:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentationContext.st,v 1.4 2011-08-21 10:33:50 cg Exp $'
 ! !