CRC32Stream.st
changeset 2334 1a245a5b81ab
parent 2332 c3876696e7c9
child 2416 df3f9f02c8d8
--- a/CRC32Stream.st	Thu Nov 05 15:37:52 2009 +0100
+++ b/CRC32Stream.st	Thu Nov 05 17:25:21 2009 +0100
@@ -181,7 +181,7 @@
     int n;
     unsigned char c;
 
-    if (__isString(arg)) {
+    if (__isStringLike(arg)) {
         cp = __stringVal(arg);
         n = __stringSize(arg);
         goto doBytes;
@@ -292,11 +292,11 @@
 !CRC32Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/CRC32Stream.st,v 1.10 2009-11-05 14:37:11 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/CRC32Stream.st,v 1.11 2009-11-05 16:25:21 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/CRC32Stream.st,v 1.10 2009-11-05 14:37:11 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/CRC32Stream.st,v 1.11 2009-11-05 16:25:21 stefan Exp $'
 ! !
 
 CRC32Stream initialize!