equal
deleted
inserted
replaced
5402 "put the argument, anObject onto the receiver |
5402 "put the argument, anObject onto the receiver |
5403 - we do not know here how to do it, it must be redefined in subclass" |
5403 - we do not know here how to do it, it must be redefined in subclass" |
5404 |
5404 |
5405 uncompressedDataSize := uncompressedDataSize + 1. |
5405 uncompressedDataSize := uncompressedDataSize + 1. |
5406 crc32 := ZipStream crc32Add:anObject crc:crc32. |
5406 crc32 := ZipStream crc32Add:anObject crc:crc32. |
5407 compressingStream nextPut:anObject |
5407 compressingStream nextPut:anObject. |
|
5408 ^ anObject |
5408 ! |
5409 ! |
5409 |
5410 |
5410 nextPutAll:aCollection |
5411 nextPutAll:aCollection |
5411 |size| |
5412 |size| |
5412 |
5413 |