diff -r 6eae8309c982 -r d393dae43c28 Depth32Image.st --- a/Depth32Image.st Sun Mar 02 14:59:49 2014 +0100 +++ b/Depth32Image.st Sun Mar 02 14:59:52 2014 +0100 @@ -81,6 +81,8 @@ |pixelIndex "{ Class: SmallInteger }"| + pixelFunction notNil ifTrue:[^ pixelFunction value:x value:y]. + pixelIndex := (width * 4 * y) + 1 + (x * 4). "left pixel in high bits" @@ -688,9 +690,10 @@ !Depth32Image class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libview/Depth32Image.st,v 1.12 2013-05-21 20:50:48 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview/Depth32Image.st,v 1.13 2014-03-02 13:59:52 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libview/Depth32Image.st,v 1.12 2013-05-21 20:50:48 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview/Depth32Image.st,v 1.13 2014-03-02 13:59:52 cg Exp $' ! ! +