--- a/Tools__BreakpointService.st	Fri Nov 25 14:48:53 2011 +0100
+++ b/Tools__BreakpointService.st	Fri Nov 25 14:49:15 2011 +0100
@@ -213,7 +213,7 @@
                     foldConstants:true
                     ifFail:[ self halt ].
             ].
-self halt.
+"/ self halt.
             breakpoints := breakpoints 
                             select:[:bp | 
                                 bp isReached ifFalse:[ Transcript show:'remove unreached:'; showCR:bp ].
@@ -284,7 +284,7 @@
 !BreakpointService class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointService.st,v 1.9 2011-11-24 17:58:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointService.st,v 1.10 2011-11-25 13:49:15 cg Exp $'
 !
 
 version_SVN