equal
deleted
inserted
replaced
244 !ArithmeticValue class methodsFor:'queries'! |
244 !ArithmeticValue class methodsFor:'queries'! |
245 |
245 |
246 isAbstract |
246 isAbstract |
247 "Return if this class is an abstract class. |
247 "Return if this class is an abstract class. |
248 True is returned for ArithmeticValue here; false for subclasses. |
248 True is returned for ArithmeticValue here; false for subclasses. |
249 Abstract subclasses must redefine again." |
249 Abstract subclasses must redefine this again." |
250 |
250 |
251 ^ self == ArithmeticValue |
251 ^ self == ArithmeticValue |
252 ! ! |
252 ! ! |
|
253 |
253 |
254 |
254 !ArithmeticValue methodsFor:'arithmetic'! |
255 !ArithmeticValue methodsFor:'arithmetic'! |
255 |
256 |
256 * something |
257 * something |
257 "return the product of the receiver and the argument." |
258 "return the product of the receiver and the argument." |