--- a/CRC32Stream.st Wed Apr 23 14:59:44 2008 +0200
+++ b/CRC32Stream.st Thu Apr 24 16:18:30 2008 +0200
@@ -1,4 +1,4 @@
-"{ Package: 'exept:libcrypt' }"
+"{ Package: 'stx:libbasic2' }"
HashStream subclass:#CRC32Stream
instanceVariableNames:'crc'
@@ -39,11 +39,11 @@
[exBegin]
self information:(CRC32Stream hashValueOf:'Dies ist ein Test') printString
- [exEnd]
+CRC32Stream [exEnd]
[exBegin]
self information:(CRC32Stream new nextPut:4711; hashValue) printString
- [exEnd]
+CRC32Stream [exEnd]
[exBegin]
self information:(CRC32Stream hashValueOf:#[1 2 3 4 5 6 7]) printString
@@ -53,7 +53,7 @@
self information:((CRC32Stream hashValueOf:#[16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF
16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF
16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF
- 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF]) digitBytes printOn:Transcript base:16)
+ 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF]) digitBytes hexPrintString)
[exEnd]
"
! !
@@ -164,7 +164,7 @@
!CRC32Stream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/CRC32Stream.st,v 1.1 2003-05-05 12:57:01 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/CRC32Stream.st,v 1.2 2008-04-24 14:18:30 stefan Exp $'
! !
CRC32Stream initialize!