#REFACTORING by cg
class: MiniDebugger
changed:
#printAllBacktraces
#printContext:
--- a/MiniDebugger.st Sat Oct 01 17:04:42 2016 +0200
+++ b/MiniDebugger.st Sat Oct 01 17:07:17 2016 +0200
@@ -504,12 +504,12 @@
"/ aContext fullPrint.
aContext receiverPrintString lowLevelErrorPrint. ' ' lowLevelErrorPrint.
- aContext selector lowLevelErrorPrint.
+ aContext selector asString lowLevelErrorPrint.
aContext argumentCount ~~ 0 ifTrue: [
' ' lowLevelErrorPrint. aContext argsDisplayString lowLevelErrorPrint
].
' [' lowLevelErrorPrint.
- aContext lineNumber printString lowLevelErrorPrint.
+ aContext lineNumber asString lowLevelErrorPrint.
']' lowLevelErrorPrintCR
!
@@ -1039,11 +1039,11 @@
(p isActive not
and:[p isDead not]) ifTrue:[
'---------------------------------------------------------' lowLevelErrorPrintCR.
- ' proc id=' lowLevelErrorPrint. p id lowLevelErrorPrint.
- ' name=''' lowLevelErrorPrint. p name lowLevelErrorPrint.
- ''' createdBy: ' lowLevelErrorPrint. p creatorId lowLevelErrorPrint.
- ' state=' lowLevelErrorPrint. p state lowLevelErrorPrint.
- ' prio=' lowLevelErrorPrint. p priority lowLevelErrorPrintCR.
+ ' proc id=' lowLevelErrorPrint. p id asString lowLevelErrorPrint.
+ ' name=''' lowLevelErrorPrint. p name asString lowLevelErrorPrint.
+ ''' createdBy: ' lowLevelErrorPrint. p creatorId asString lowLevelErrorPrint.
+ ' state=' lowLevelErrorPrint. p state asString lowLevelErrorPrint.
+ ' prio=' lowLevelErrorPrint. p priority asString lowLevelErrorPrintCR.
'' lowLevelErrorPrintCR. '' lowLevelErrorPrintCR.
self printBacktraceFrom:(p suspendedContext)