# HG changeset patch # User Stefan Vogel # Date 1209046710 -7200 # Node ID 0850a3e0d48452655c111f0a2137956a51ae9a90 # Parent 40ac9e5f036ce2f51165d991934850400ca74fd4 Fix examples diff -r 40ac9e5f036c -r 0850a3e0d484 CRC32Stream.st --- 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!