--- a/BreakpointNode.st	Mon Mar 26 15:51:08 2018 +0200
+++ b/BreakpointNode.st	Mon Mar 26 15:53:53 2018 +0200
@@ -82,7 +82,7 @@
 codeForCascadeOn:aStream inBlock:b for:aCompiler
     |node|
 
-    node := MessageNode
+    node := UnaryNode
                 receiver: (ConstantNode value: breakpoint)
                 selector: #break.
     node lineNumber:lineNumber.
@@ -90,12 +90,14 @@
     expression notNil ifTrue:[
         expression codeForCascadeOn:aStream inBlock:b for:aCompiler
     ].
+
+    "Modified: / 26-03-2018 / 15:39:38 / stefan"
 !
 
 codeForSideEffectOn:aStream inBlock:b for:aCompiler
     |node|
 
-    node := MessageNode
+    node := UnaryNode
                 receiver: (ConstantNode value: breakpoint)
                 selector: #break.
     node lineNumber:lineNumber.
@@ -103,12 +105,14 @@
     expression notNil ifTrue:[
         expression codeForSideEffectOn:aStream inBlock:b for:aCompiler
     ].
+
+    "Modified: / 26-03-2018 / 15:39:33 / stefan"
 !
 
 codeOn:aStream inBlock:codeBlock for:aCompiler
     |node|
 
-    node := MessageNode
+    node := UnaryNode
                 receiver: (ConstantNode value: breakpoint)
                 selector: #break.
     node lineNumber:lineNumber.
@@ -119,6 +123,7 @@
 
     "Created: / 16-06-2011 / 15:17:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 22-07-2013 / 16:08:34 / cg"
+    "Modified: / 26-03-2018 / 15:38:22 / stefan"
 ! !
 
 !BreakpointNode methodsFor:'node protocol forwarding'!