--- a/ObjectMemory.st	Wed Aug 21 11:51:30 2013 +0100
+++ b/ObjectMemory.st	Fri Aug 23 11:44:50 2013 +0100
@@ -4334,12 +4334,12 @@
 #ifdef COLLECTEDOLD_ADDRESS
     RETURN(__MKUINT(COLLECTEDOLD_ADDRESS));
 #else
-    RETURN(__MKUINT(0));
+    RETURN(__mkSmallInteger(0));
 #endif
 %}
 
     "
-	self collectedOldSpaceAddress
+        self collectedOldSpaceAddress
     "
 !
 
@@ -4674,12 +4674,12 @@
 #ifdef OLDSPACE_ADDRESS
     RETURN(__MKUINT(OLDSPACE_ADDRESS));
 #else
-    RETURN(__MKUINT(0));
+    RETURN(__mkSmallInteger(0));
 #endif
 %}
 
     "
-	self oldSpaceAddress
+        self oldSpaceAddress
     "
 !
 
@@ -5506,7 +5506,7 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.271 2013-08-16 17:38:47 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.272 2013-08-19 10:02:34 stefan Exp $'
 !
 
 version_SVN