Variable breakpoint object-centric API.

pharo-project · Jun 11, 2020 · 34aceee · 34aceee
1 parent 49548f1
commit 34aceee
Showing 1 changed file with 31 additions and 0 deletions.
diff --git a/src/Reflectivity-VariableBreakpoint/Object.extension.st b/src/Reflectivity-VariableBreakpoint/Object.extension.st
@@ -0,0 +1,31 @@
+Extension { #name : #Object }
+
+{ #category : #'*Reflectivity-VariableBreakpoint' }
+Object >> haltOnAccess [
+	^ VariableBreakpoint watchVariablesInObject: self
+]
+
+{ #category : #'*Reflectivity-VariableBreakpoint' }
+Object >> haltOnAccessTo: aVariableName [
+	^VariableBreakpoint watchVariable: aVariableName inObject: self
+]
+
+{ #category : #'*Reflectivity-VariableBreakpoint' }
+Object >> haltOnRead [
+	^VariableBreakpoint watchVariablesReadsInObject: self
+]
+
+{ #category : #'*Reflectivity-VariableBreakpoint' }
+Object >> haltOnReadTo: aVariableName [
+	^VariableBreakpoint watchVariableReads: aVariableName inObject: self
+]
+
+{ #category : #'*Reflectivity-VariableBreakpoint' }
+Object >> haltOnWrite [
+	^VariableBreakpoint watchVariablesWritesInObject: self
+]
+
+{ #category : #'*Reflectivity-VariableBreakpoint' }
+Object >> haltOnWriteTo: aVariableName [
+	^VariableBreakpoint watchVariableWrites: aVariableName inObject: self
+]