SHA1Stream.st
changeset 15998 4307e39fc342
parent 15993 c5eea718b0ff
child 16004 3d3da3b792a1
equal deleted inserted replaced
15997:46cd77ec80df 15998:4307e39fc342
   547             }
   547             }
   548         } else {
   548         } else {
   549             OBJ oClass = __Class(anObject);
   549             OBJ oClass = __Class(anObject);
   550             int nInstVars = __intVal(__ClassInstPtr(oClass)->c_ninstvars);
   550             int nInstVars = __intVal(__ClassInstPtr(oClass)->c_ninstvars);
   551 
   551 
   552             nInstBytes = OHDR_SIZE + __OBJS2BYTES__(nInstVars);
   552             nInstBytes = __OBJS2BYTES__(nInstVars);
   553             switch (__intVal(__ClassInstPtr(oClass)->c_flags) & ARRAYMASK) {
   553             switch (__intVal(__ClassInstPtr(oClass)->c_flags) & ARRAYMASK) {
   554                 case BYTEARRAY:
   554                 case BYTEARRAY:
   555                 case WORDARRAY:
   555                 case WORDARRAY:
   556                 case LONGARRAY:
   556                 case LONGARRAY:
   557                 case SWORDARRAY:
   557                 case SWORDARRAY:
   589 ! !
   589 ! !
   590 
   590 
   591 !SHA1Stream class methodsFor:'documentation'!
   591 !SHA1Stream class methodsFor:'documentation'!
   592 
   592 
   593 version
   593 version
   594     ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.42 2014-02-12 14:14:16 stefan Exp $'
   594     ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.43 2014-02-12 14:31:21 stefan Exp $'
   595 !
   595 !
   596 
   596 
   597 version_CVS
   597 version_CVS
   598     ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.42 2014-02-12 14:14:16 stefan Exp $'
   598     ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.43 2014-02-12 14:31:21 stefan Exp $'
   599 ! !
   599 ! !
   600 
   600 
   601 
   601 
   602 SHA1Stream initialize!
   602 SHA1Stream initialize!