--- a/UninterpretedBytes.st	Fri Jul 08 18:41:53 2005 +0200
+++ b/UninterpretedBytes.st	Fri Jul 08 19:15:03 2005 +0200
@@ -956,7 +956,7 @@
 #endif
                 }
 #if __POINTER_SIZE__ == 8
-                RETURN (__MKSMALLINT(iVal));
+                RETURN (__mkSmallInteger(iVal));
 #else
                 RETURN (__MKUINT(iVal));
 #endif
@@ -1144,7 +1144,7 @@
 		    int iVal = ((int *)cp)[0];
 
 # if __POINTER_SIZE__ == 8
-		    RETURN (__MKSMALLINT(iVal));
+		    RETURN (__mkSmallInteger(iVal));
 # else
 		    RETURN (__MKINT(iVal));
 # endif
@@ -1425,7 +1425,7 @@
 #endif
                 }
 #if __POINTER_SIZE__ == 8
-                RETURN (__MKSMALLINT(iVal));
+                RETURN (__mkSmallInteger(iVal));
 #else
                 RETURN (__MKINT(iVal));
 #endif
@@ -2213,5 +2213,5 @@
 !UninterpretedBytes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.56 2005-07-07 15:01:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.57 2005-07-08 17:15:03 cg Exp $'
 ! !