--- a/BreakpointDescription.st	Sun Oct 02 06:59:15 2016 +0200
+++ b/BreakpointDescription.st	Sun Oct 09 22:38:00 2016 +0100
@@ -159,6 +159,10 @@
     "Created: / 28-06-2011 / 08:27:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+isTracepoint
+    ^ condition isNil and:[state == #tracing]
+!
+
 isVisible
     "Bad coding here, state should be full object"