--- a/HashStream.st	Mon Jan 09 22:30:01 2012 +0100
+++ b/HashStream.st	Mon Jan 09 22:30:04 2012 +0100
@@ -156,9 +156,11 @@
 !
 
 testVector
-    "define a testvector to test the implementation"
+    "/ obsolete - moved to TestHashAlgorithms unit test.
 
     ^ self subclassResponsibility
+
+    "Modified (comment): / 09-01-2012 / 21:49:59 / cg"
 ! !
 
 !HashStream class methodsFor:'utilities'!
@@ -372,9 +374,9 @@
 !HashStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.20 2012-01-09 17:13:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.21 2012-01-09 21:30:04 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.20 2012-01-09 17:13:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.21 2012-01-09 21:30:04 cg Exp $'
 ! !