--- a/ReadEvalPrintLoop.st	Thu Dec 07 19:19:31 2006 +0100
+++ b/ReadEvalPrintLoop.st	Thu Dec 07 19:21:37 2006 +0100
@@ -167,22 +167,22 @@
     ].
     (what startsWith:'mem') ifTrue:[
         self errorStream 
-            nextPutAll:('overall: ',(ObjectMemory bytesUsed / 1024) printString,' kb');
-            nextPutAll:('free   : ',(ObjectMemory freeSpace / 1024) printString,' kb');
-            nextPutAll:('minorGC: ',(ObjectMemory scavengeCount) printString);
-            nextPutAll:('majorGC: ',(ObjectMemory garbageCollectCount) printString).
+            nextPutLine:('overall: ',(ObjectMemory bytesUsed / 1024) printString,' kb');
+            nextPutLine:('free   : ',(ObjectMemory freeSpace / 1024) printString,' kb');
+            nextPutLine:('minorGC: ',(ObjectMemory scavengeCount) printString);
+            nextPutLine:('majorGC: ',(ObjectMemory garbageCollectCount) printString).
         ^ self.
     ].
     (what startsWith:'flag') ifTrue:[
         self errorStream 
-            nextPutAll:('trace : ',traceFlag printString);
-            nextPutAll:('timing: ',timingFlag printString).
+            nextPutLine:('trace : ',traceFlag printString);
+            nextPutLine:('timing: ',timingFlag printString).
         ^ self.
     ].
 
     self errorStream nextPutLine:'?? show what ?'.
 
-    "Modified: / 07-12-2006 / 19:14:08 / cg"
+    "Modified: / 07-12-2006 / 19:22:10 / cg"
 !
 
 cmd_use:lineStream
@@ -297,5 +297,5 @@
 !ReadEvalPrintLoop class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.9 2006-12-07 18:19:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.10 2006-12-07 18:21:37 cg Exp $'
 ! !