--- a/HashStream.st	Tue Jan 03 15:44:49 2012 +0100
+++ b/HashStream.st	Wed Jan 04 19:55:36 2012 +0100
@@ -85,6 +85,12 @@
      Use hashFunction: there"
 
     ^ true
+!
+
+hashSize
+    self subclassResponsibility
+
+    "Created: / 04-01-2012 / 19:22:32 / cg"
 ! !
 
 !HashStream class methodsFor:'self tests'!
@@ -323,9 +329,9 @@
 !HashStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.14 2011-05-13 08:32:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.15 2012-01-04 18:55:36 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.14 2011-05-13 08:32:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.15 2012-01-04 18:55:36 cg Exp $'
 ! !