UninterpretedBytes: bug fix in copying jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Tue, 05 Jun 2012 22:12:57 +0100
branchjv
changeset 17945 3b36feb6e349
parent 17944 084a2c804b87
child 17946 bf2407711058
UninterpretedBytes: bug fix in copying
UninterpretedBytes.st
--- a/UninterpretedBytes.st	Tue Jun 05 14:35:12 2012 +0100
+++ b/UninterpretedBytes.st	Tue Jun 05 22:12:57 2012 +0100
@@ -2505,7 +2505,7 @@
 
 #ifndef NO_PRIM_BYTEARR
     if ((__isBytes(aCollection) || __isExternalBytesLike(aCollection))
-     && (__isBytes(self) || __isWords(self))
+     && (__isBytes(self) /*|| __isWords(self) */)
      && __bothSmallInteger(start, stop)
      && __isSmallInteger(repStart)) {
 	startIndex = __intVal(start) - 1;
@@ -2958,7 +2958,7 @@
 !UninterpretedBytes class methodsFor:'documentation'!
 
 version
-    ^ '$Id: UninterpretedBytes.st 10814 2012-06-05 13:35:12Z vranyj1 $'
+    ^ '$Id: UninterpretedBytes.st 10815 2012-06-05 21:12:57Z vranyj1 $'
 !
 
 version_CVS
@@ -2966,5 +2966,5 @@
 !
 
 version_SVN
-    ^ '$Id: UninterpretedBytes.st 10814 2012-06-05 13:35:12Z vranyj1 $'
+    ^ '$Id: UninterpretedBytes.st 10815 2012-06-05 21:12:57Z vranyj1 $'
 ! !