Depth4Image.st
changeset 5475 e6469c3d8a46
parent 4904 653051844382
child 6066 62426e8110ae
--- a/Depth4Image.st	Thu Nov 05 15:37:08 2009 +0100
+++ b/Depth4Image.st	Thu Nov 05 15:37:10 2009 +0100
@@ -191,7 +191,7 @@
         unsigned char *dstPtr = 0;
         OBJ _bytes = __INST(bytes);
 
-        if (__isByteArray(_bytes)) {
+        if (__isByteArrayLike(_bytes)) {
             srcPtr = _ByteArrayInstPtr(_bytes)->ba_element;
         } else {
             if (__isExternalBytesLike(_bytes)) {
@@ -265,7 +265,7 @@
             unsigned char *dstPtr = 0;
             OBJ _bytes = __INST(bytes);
 
-            if (__isByteArray(_bytes)) {
+            if (__isByteArrayLike(_bytes)) {
                 srcPtr = _ByteArrayInstPtr(_bytes)->ba_element;
             } else {
                 if (__isExternalBytesLike(_bytes)) {
@@ -337,7 +337,7 @@
                 unsigned char *dstPtr = 0;
                 OBJ _bytes = __INST(bytes);
 
-                if (__isByteArray(_bytes)) {
+                if (__isByteArrayLike(_bytes)) {
                     srcPtr = _ByteArrayInstPtr(_bytes)->ba_element;
                 } else {
                     if (__isExternalBytesLike(_bytes)) {
@@ -404,7 +404,7 @@
                     unsigned char *dstPtr = 0;
                     OBJ _bytes = __INST(bytes);
 
-                    if (__isByteArray(_bytes)) {
+                    if (__isByteArrayLike(_bytes)) {
                         srcPtr = _ByteArrayInstPtr(_bytes)->ba_element;
                     } else {
                         if (__isExternalBytesLike(_bytes)) {
@@ -901,7 +901,7 @@
 
     if (__bothSmallInteger(srcStart, dstStart)
      && __bothSmallInteger(w, mX)
-     && __isByteArray(srcBytes) && __isByteArray(dstBytes)) {
+     && __isByteArrayLike(srcBytes) && __isByteArray(dstBytes)) {
         _mag = __intVal(mX);
         srcP = __ByteArrayInstPtr(srcBytes)->ba_element - 1 + __intVal(srcStart);
         dstP = __ByteArrayInstPtr(dstBytes)->ba_element - 1 + __intVal(dstStart);
@@ -1047,5 +1047,9 @@
 !Depth4Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth4Image.st,v 1.50 2008-02-06 12:46:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth4Image.st,v 1.51 2009-11-05 14:37:10 stefan Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libview/Depth4Image.st,v 1.51 2009-11-05 14:37:10 stefan Exp $'
 ! !