equal
deleted
inserted
replaced
292 |
292 |
293 nextPutAll:aCollection |
293 nextPutAll:aCollection |
294 "Hash streams handle Strings and ByteArrays in nextPut:" |
294 "Hash streams handle Strings and ByteArrays in nextPut:" |
295 |
295 |
296 aCollection isByteCollection ifTrue:[ |
296 aCollection isByteCollection ifTrue:[ |
297 self nextPut:aCollection. |
297 self nextPutBytes:(aCollection byteSize) from:aCollection startingAt:1. |
298 ] ifFalse:[ |
298 ] ifFalse:[ |
299 super nextPutAll:aCollection |
299 super nextPutAll:aCollection |
300 ]. |
300 ]. |
301 |
301 |
302 "Created: / 14.10.1999 / 11:22:50 / stefan" |
302 "Created: / 14-10-1999 / 11:22:50 / stefan" |
|
303 "Modified: / 09-01-2012 / 13:02:44 / cg" |
303 ! |
304 ! |
304 |
305 |
305 nextPutBytes:count from:anObject startingAt:start |
306 nextPutBytes:count from:anObject startingAt:start |
306 "write count bytes from an object starting at index start. |
307 "write count bytes from an object starting at index start. |
307 Return the number of bytes written. |
308 Return the number of bytes written. |
327 ! ! |
328 ! ! |
328 |
329 |
329 !HashStream class methodsFor:'documentation'! |
330 !HashStream class methodsFor:'documentation'! |
330 |
331 |
331 version |
332 version |
332 ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.15 2012-01-04 18:55:36 cg Exp $' |
333 ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.16 2012-01-09 12:34:45 cg Exp $' |
333 ! |
334 ! |
334 |
335 |
335 version_CVS |
336 version_CVS |
336 ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.15 2012-01-04 18:55:36 cg Exp $' |
337 ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.16 2012-01-09 12:34:45 cg Exp $' |
337 ! ! |
338 ! ! |