Adding manually pc: as pc := anInteger

pharo-project · Jul 29, 2021 · 5698d47 · 5698d47
1 parent 1689fe2
commit 5698d47
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/Kernel/Context.class.st b/src/Kernel/Context.class.st
@@ -280,6 +280,11 @@ Context >> activeHome [
 	^self sender findContextSuchThat: [:ctxt | ctxt = methodReturnContext]
 ]
 
+{ #category : #accessing }
+Context >> pc: anInteger [ 
+	pc := anInteger
+]
+
 { #category : #accessing }
 Context >> activeOuterContext [
 	"If executing closure, search senders for the activation in which the receiver's