--- a/ReadEvalPrintLoop.st	Tue Nov 08 14:41:41 2016 +0100
+++ b/ReadEvalPrintLoop.st	Tue Nov 08 14:42:49 2016 +0100
@@ -387,10 +387,10 @@
         (showAll or:[ what startsWith:'flag' ]) ifTrue:[
             showAll ifTrue:[ errStream cr; nextPutLine:'Flags:'; nextPutLine:'------' ].
             errStream
-                nextPutLine:('trace :      ',traceFlag printString);
-                nextPutLine:('timing:      ',timingFlag printString);
-                nextPutLine:('profiling:   ',profilingFlag printString);
-                nextPutLine:('chunkFormat: ',doChunkFormat printString).
+                nextPutLine:('trace :      ',(traceFlag ? false) printString);
+                nextPutLine:('timing:      ',(timingFlag ? false) printString);
+                nextPutLine:('profiling:   ',(profilingFlag ? false) printString);
+                nextPutLine:('chunkFormat: ',(doChunkFormat ? false) printString).
             ok := true.
         ].
     ].