SHA1Stream.st
changeset 15998 4307e39fc342
parent 15993 c5eea718b0ff
child 16004 3d3da3b792a1
--- a/SHA1Stream.st	Wed Feb 12 15:31:14 2014 +0100
+++ b/SHA1Stream.st	Wed Feb 12 15:31:21 2014 +0100
@@ -549,7 +549,7 @@
             OBJ oClass = __Class(anObject);
             int nInstVars = __intVal(__ClassInstPtr(oClass)->c_ninstvars);
 
-            nInstBytes = OHDR_SIZE + __OBJS2BYTES__(nInstVars);
+            nInstBytes = __OBJS2BYTES__(nInstVars);
             switch (__intVal(__ClassInstPtr(oClass)->c_flags) & ARRAYMASK) {
                 case BYTEARRAY:
                 case WORDARRAY:
@@ -591,11 +591,11 @@
 !SHA1Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.42 2014-02-12 14:14:16 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.43 2014-02-12 14:31:21 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.42 2014-02-12 14:14:16 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.43 2014-02-12 14:31:21 stefan Exp $'
 ! !