# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 872272589 -7200
# Node ID fa0418a0f896a02885b5e0d0c6f0a58f6bca5e38
# Parent  66d5faa411fd6acc39392a4bcac771c0f687da21
*** empty log message ***

diff -r 66d5faa411fd -r fa0418a0f896 ByteArray.st
--- a/ByteArray.st	Fri Aug 22 17:52:31 1997 +0200
+++ b/ByteArray.st	Fri Aug 22 19:56:29 1997 +0200
@@ -2274,13 +2274,12 @@
      This is needed specially in the bitmap/Imageclasses to find used colors 
      of an image."
 
-    |result|
-
 %{  /* STACK: 400 */
 
     REGISTER unsigned char *cp;
     unsigned char *endp;
     REGISTER int len;
+    OBJ result;
     union {
         unsigned char flags[256];
         int toForceAlignmentOfFlags;
@@ -2350,5 +2349,5 @@
 !ByteArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.83 1997-08-19 17:05:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.84 1997-08-22 17:56:29 cg Exp $'
 ! !