Nicolas Cellier uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-nice.551.mcz
==================== Summary ====================
Name: Graphics-nice.551 Author: nice Time: 27 February 2024, 11:04:54.187486 pm UUID: 6687a9e4-2fa7-4981-8548-fa272b631eda Ancestors: Graphics-mt.550, Graphics-nice.550
Merge Graphics-mt.550 & Graphics-nice.550
=============== Diff against Graphics-mt.550 ===============
Item was added: + ----- Method: Form>>hackBits:width: (in category 'private') ----- + hackBits: bitThing width: anInteger + "This method provides an initialization so that BitBlt may be used, eg, to + copy ByteArrays and other non-pointer objects efficiently. + The resulting form looks anInteger wide, 8 bits deep, and height is adjusted to fit the bitThing size. + anInteger shall be a multiple of 4, because lines in a Form always fall on a Word boundary. + If not, some dead bytes will remain unaccessible to the BitBlt operations on each line. + That's also the case of trailing excess bytes" + width := anInteger. + depth := 8. + bitThing class isBits ifFalse: [self error: 'bitThing must be a non-pointer object']. + height := bitThing basicSize * bitThing bytesPerBasicElement // (width + 3 // 4 * 4). + bits := bitThing!