# HG changeset patch # User Claus Gittinger # Date 1478094564 -3600 # Node ID 25640118d11fe99fcdd6b3a78a3e33dde1ff2479 # Parent 78da2ec0985da838cc6e91ee3d796762c2336f11 #REFACTORING by cg class: Image changed: #vitualAntiAliasedAlongXvertical:horizontal:form:color:xRun:yRun:colorDictionary:blendStart: #vitualAntiAliasedAlongYhorizontal:vertical:form:color:xRun:yRun:colorDictionary:blendStart: diff -r 78da2ec0985d -r 25640118d11f Image.st --- a/Image.st Sun Oct 30 14:33:44 2016 +0100 +++ b/Image.st Wed Nov 02 14:49:24 2016 +0100 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 1991 by Claus Gittinger All Rights Reserved @@ -14982,10 +14980,10 @@ isLeft := leftOrRight sameAs:#left. isLeft ifTrue:[ workPoint := (xRun - 1)@yRun. - [( - (tempForm pixelAtX:workPoint x y:workPoint y) == 0 and:[ - (tempForm pixelAtX:workPoint x y:workPoint y + additionalY) == 1]) and:[ - (tempForm pixelAtX:workPoint x - 1 y:workPoint y + additionalY) == 1] + [ + ((tempForm pixelAtX:workPoint x y:workPoint y) == 0) + and:[ ((tempForm pixelAtX:workPoint x y:workPoint y + additionalY) == 1) + and:[ ((tempForm pixelAtX:workPoint x - 1 y:workPoint y + additionalY) == 1) ]] ] whileTrue:[ startX := workPoint x. endX isNil ifTrue:[endX := workPoint x]. @@ -14993,10 +14991,10 @@ ]. ] ifFalse:[ workPoint := (xRun + 1)@yRun. - [( - (tempForm pixelAtX:workPoint x y:workPoint y) == 0 and:[ - (tempForm pixelAtX:workPoint x y:workPoint y + additionalY) == 1]) and:[ - (tempForm pixelAtX:workPoint x + 1 y:workPoint y + additionalY) == 1] + [ + ((tempForm pixelAtX:workPoint x y:workPoint y) == 0) + and:[ ((tempForm pixelAtX:workPoint x y:workPoint y + additionalY) == 1) + and:[ ((tempForm pixelAtX:workPoint x + 1 y:workPoint y + additionalY) == 1) ]] ] whileTrue:[ endX := workPoint x. startX isNil ifTrue:[startX := workPoint x]. @@ -15053,10 +15051,10 @@ isBottom := bottomOrTop sameAs:#bottom. isBottom ifTrue:[ workPoint := xRun@(yRun + 1). - [( - (tempForm pixelAtX:workPoint x y:workPoint y) == 0 and:[ - (tempForm pixelAtX:workPoint x + additionalX y:workPoint y) == 1]) and:[ - (tempForm pixelAtX:workPoint x + additionalX y:workPoint y + 1) == 1] + [ + ((tempForm pixelAtX:workPoint x y:workPoint y) == 0) + and:[ ((tempForm pixelAtX:workPoint x + additionalX y:workPoint y) == 1) + and:[ ((tempForm pixelAtX:workPoint x + additionalX y:workPoint y + 1) == 1) ]] ] whileTrue:[ endY := workPoint y. startY isNil ifTrue:[startY := workPoint y]. @@ -15064,10 +15062,10 @@ ]. ] ifFalse:[ workPoint := xRun@(yRun - 1). - [( - (tempForm pixelAtX:workPoint x y:workPoint y) == 0 and:[ - (tempForm pixelAtX:workPoint x + additionalX y:workPoint y) == 1]) and:[ - (tempForm pixelAtX:workPoint x + additionalX y:workPoint y - 1) == 1] + [ + ((tempForm pixelAtX:workPoint x y:workPoint y) == 0) + and:[ ((tempForm pixelAtX:workPoint x + additionalX y:workPoint y) == 1) + and:[ ((tempForm pixelAtX:workPoint x + additionalX y:workPoint y - 1) == 1) ]] ] whileTrue:[ startY := workPoint y. endY isNil ifTrue:[endY := workPoint y].