--- a/ReadEvalPrintLoop.st	Thu Dec 07 19:21:37 2006 +0100
+++ b/ReadEvalPrintLoop.st	Thu Dec 07 19:22:30 2006 +0100
@@ -167,8 +167,8 @@
     ].
     (what startsWith:'mem') ifTrue:[
         self errorStream 
-            nextPutLine:('overall: ',(ObjectMemory bytesUsed / 1024) printString,' kb');
-            nextPutLine:('free   : ',(ObjectMemory freeSpace / 1024) printString,' kb');
+            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.
@@ -182,7 +182,7 @@
 
     self errorStream nextPutLine:'?? show what ?'.
 
-    "Modified: / 07-12-2006 / 19:22:10 / cg"
+    "Modified: / 07-12-2006 / 19:23:02 / cg"
 !
 
 cmd_use:lineStream
@@ -297,5 +297,5 @@
 !ReadEvalPrintLoop class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.10 2006-12-07 18:21:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.11 2006-12-07 18:22:30 cg Exp $'
 ! !