ZipArchive.st
changeset 2333 892d1d5605b2
parent 2315 0685502fd2f3
child 2420 cd223e66f004
--- a/ZipArchive.st	Thu Nov 05 15:37:11 2009 +0100
+++ b/ZipArchive.st	Thu Nov 05 15:37:52 2009 +0100
@@ -3431,23 +3431,23 @@
     |inflateReturnCode|
 
 %{  /* STACK:32768 */
-    if (__isByteArray(inBytes)
+    if (__isByteArrayLike(inBytes)
      && __isByteArray(outBytes)) {
-	char *in, *out;
-	int rc;
-
-	in = __ByteArrayInstPtr(inBytes)->ba_element;
-	out = __ByteArrayInstPtr(outBytes)->ba_element;
-
-	if ((rc = stx_inflate(in, out)) == 0) {
-	    RETURN (outBytes);
-	}
-	inflateReturnCode = __MKSMALLINT(rc);
+        char *in, *out;
+        int rc;
+
+        in = __ByteArrayInstPtr(inBytes)->ba_element;
+        out = __ByteArrayInstPtr(outBytes)->ba_element;
+
+        if ((rc = stx_inflate(in, out)) == 0) {
+            RETURN (outBytes);
+        }
+        inflateReturnCode = __MKSMALLINT(rc);
     }
 %}.
     inflateReturnCode notNil ifTrue:[
-	"/ bad blockType 2
-	self error:'inflate error: ' , inflateReturnCode printString
+        "/ bad blockType 2
+        self error:'inflate error: ' , inflateReturnCode printString
     ].
     ^ nil.
 
@@ -4943,11 +4943,11 @@
 !ZipArchive class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.80 2009-10-26 15:22:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.81 2009-11-05 14:37:52 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.80 2009-10-26 15:22:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.81 2009-11-05 14:37:52 stefan Exp $'
 ! !
 
 ZipArchive initialize!