--- a/ByteCodeCompilerWithBreakpointSupport.st Tue Nov 15 19:10:42 2011 +0100
+++ b/ByteCodeCompilerWithBreakpointSupport.st Thu Nov 24 18:58:37 2011 +0100
@@ -73,7 +73,7 @@
bpnt isNil ifTrue:[^expr].
expr isBreakPointNode ifTrue:[^expr].
bpnt isReached:true.
-Transcript show:'adding breakpoint before: '; showCR:expr.
+ Transcript show:'adding breakpoint '; show:bpnt; show:' before: '; showCR:expr.
^ BreakpointNode new
breakpoint: bpnt;
expression: expr;
@@ -170,7 +170,7 @@
!ByteCodeCompilerWithBreakpointSupport class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompilerWithBreakpointSupport.st,v 1.2 2011-07-05 21:24:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompilerWithBreakpointSupport.st,v 1.3 2011-11-24 17:58:37 cg Exp $'
!
version_SVN