--- a/MiniDebugger.st	Sat Oct 01 16:57:32 2016 +0200
+++ b/MiniDebugger.st	Sat Oct 01 17:01:12 2016 +0200
@@ -504,7 +504,7 @@
     aContext argumentCount ~~ 0 ifTrue: [
         ' ' lowLevelErrorPrint. aContext argsDisplayString lowLevelErrorPrint
     ].
-    ' [' lowLevelErrorPrint. aContext lineNumber lowLevelErrorPrint. ']' lowLevelErrorPrintCR
+    ' [' lowLevelErrorPrint. aContext lineNumber printString lowLevelErrorPrint. ']' lowLevelErrorPrintCR
 !
 
 printDot
@@ -1051,7 +1051,9 @@
     |active|
 
     active := Processor activeProcess.
-    'current id=' lowLevelErrorPrint. active id lowLevelErrorPrint. ' name=''' lowLevelErrorPrint. active name lowLevelErrorPrint. '''' lowLevelErrorPrintCR.
+    'current id=' lowLevelErrorPrint. 
+    active id printString lowLevelErrorPrint. 
+    ' name=''' lowLevelErrorPrint. active name lowLevelErrorPrint. '''' lowLevelErrorPrintCR.
 
     (Process allSubInstances sort:[:a :b | (a id ? -1)<(b id ? -1)]) do:[:p |
         |doShow|