diff -r 389cc9dfddfd -r ec3ef1be1a00 DebugView.st --- a/DebugView.st Tue Jun 26 20:00:15 2018 +0200 +++ b/DebugView.st Wed Jun 27 17:17:42 2018 +0200 @@ -7777,7 +7777,7 @@ ]. s := Text streamContents:[:s | aContext printWithSeparator:' ยป ' on:s ]. -s infoPrintCR. + "/ s infoPrintCR. RememberedCallChain notNil ifTrue:[ (RememberedCallChain includesIdentical:aContext) ifTrue:[ s := s withColor:#red. @@ -7787,7 +7787,7 @@ ]. "Created: / 21-05-2007 / 13:30:24 / cg" - "Modified: / 26-06-2018 / 19:15:12 / Claus Gittinger" + "Modified: / 27-06-2018 / 17:15:47 / Claus Gittinger" ! is:aHomeContext inCallingChainOf:aContext