equal
deleted
inserted
replaced
92 ! ! |
92 ! ! |
93 |
93 |
94 !DisplayTransform methodsFor:'initialize'! |
94 !DisplayTransform methodsFor:'initialize'! |
95 |
95 |
96 setIdentity |
96 setIdentity |
97 "Initialize the receiver to the identity transformation (e.g., not affecting points)" |
97 "Initialize the receiver to the identity transformation (e.g., not affecting points)" |
98 ^self subclassResponsibility |
98 |
|
99 ^self subclassResponsibility |
99 ! ! |
100 ! ! |
100 |
101 |
101 !DisplayTransform methodsFor:'testing'! |
102 !DisplayTransform methodsFor:'testing'! |
102 |
103 |
103 isCompositeTransform |
104 isCompositeTransform |
117 ! |
118 ! |
118 |
119 |
119 isMorphicTransform |
120 isMorphicTransform |
120 "Return true if the receiver is a MorphicTransform, that is specifies the transformation values explicitly." |
121 "Return true if the receiver is a MorphicTransform, that is specifies the transformation values explicitly." |
121 ^false |
122 ^false |
|
123 ! |
|
124 |
|
125 isNoScale |
|
126 "return true if the identity scale is in effect (i.e. saleFactor is 1); |
|
127 return false, otherwise." |
|
128 |
|
129 |s| |
|
130 |
|
131 s := self scale. |
|
132 ^ s x = 1 and:[s y = 1] |
122 ! |
133 ! |
123 |
134 |
124 isPureTranslation |
135 isPureTranslation |
125 "Return true if the receiver specifies no rotation or scaling." |
136 "Return true if the receiver specifies no rotation or scaling." |
126 ^self subclassResponsibility |
137 ^self subclassResponsibility |
177 ! ! |
188 ! ! |
178 |
189 |
179 !DisplayTransform class methodsFor:'documentation'! |
190 !DisplayTransform class methodsFor:'documentation'! |
180 |
191 |
181 version |
192 version |
182 ^ '$Header: /cvs/stx/stx/libview2/DisplayTransform.st,v 1.2 2014-12-21 21:20:45 cg Exp $' |
193 ^ '$Header: /cvs/stx/stx/libview2/DisplayTransform.st,v 1.3 2014-12-21 22:23:28 cg Exp $' |
|
194 ! |
|
195 |
|
196 version_CVS |
|
197 ^ '$Header: /cvs/stx/stx/libview2/DisplayTransform.st,v 1.3 2014-12-21 22:23:28 cg Exp $' |
183 ! ! |
198 ! ! |
184 |
199 |