--- a/ArithmeticValue.st Wed Apr 23 13:36:17 2003 +0200
+++ b/ArithmeticValue.st Wed Apr 23 19:09:32 2003 +0200
@@ -450,10 +450,9 @@
*= aNumber
"Return the product of self multiplied by aNumber.
- Self MAY, but NEED NOT be changed to contain the product.
- So this method must be used: 'a := a *= 5'.
- This method can be redefined for constructed datatypes
- to do optimisations"
+ The receiver MAY, but NEED NOT be changed to contain the product.
+ So this method must be used as: 'a := a *= 5'.
+ This method can be redefined for constructed datatypes to do optimisations"
^ self * aNumber
@@ -463,10 +462,9 @@
+= aNumber
"Return the sum of self and aNumber.
- Self MAY, but NEED NOT be changed to contain the product.
- So this method must be used: 'a := a += 5'.
- This method can be redefined for constructed datatypes
- to do optimisations"
+ The receiver MAY, but NEED NOT be changed to contain the sum.
+ So this method must be used as: 'a := a += 5'.
+ This method can be redefined for constructed datatypes to do optimisations"
^ self + aNumber
@@ -476,10 +474,9 @@
-= aNumber
"Return the difference of self and aNumber.
- Self MAY, but NEED NOT be changed to contain the product.
- So this method must be used: 'a := a -= 5'.
- This method can be redefined for constructed datatypes
- to do optimisations"
+ The receiver MAY, but NEED NOT be changed to contain the difference.
+ So this method must be used as: 'a := a -= 5'.
+ This method can be redefined for constructed datatypes to do optimisations"
^ self - aNumber
@@ -489,10 +486,9 @@
/= aNumber
"Return the quotient of self and aNumber.
- Self MAY, but NEED NOT be changed to contain the product.
- So this method must be used: 'a := a /= 5'.
- This method can be redefined for constructed datatypes
- to do optimisations"
+ The receiver MAY, but NEED NOT be changed to contain the quotient.
+ So this method must be used as: 'a := a /= 5'.
+ This method can be redefined for constructed datatypes to do optimisations"
^ self / aNumber
@@ -502,10 +498,9 @@
div2
"Return the quotient of self divided by 2.
- Self MAY, but NEED NOT be changed to contain the product.
- So this method must be used: 'a := a div2.
- This method can be redefined for constructed datatypes
- to do optimisations"
+ The receiver MAY, but NEED NOT be changed to contain the result.
+ So this method must be used as: 'a := a div2.
+ This method can be redefined for constructed datatypes to do optimisations"
^ self // 2
@@ -515,10 +510,9 @@
mul2
"Return the product of self multiplied by 2.
- Self MAY, but NEED NOT be changed to contain the product.
- So this method must be used: 'a := a mul2.
- This method can be redefined for constructed datatypes
- to do optimisations"
+ The receiver MAY, but NEED NOT be changed to contain the result.
+ So this method must be used as: 'a := a mul2.
+ This method can be redefined for constructed datatypes to do optimisations"
^ self * 2
@@ -1042,7 +1036,7 @@
!ArithmeticValue class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.45 2003-03-31 09:53:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.46 2003-04-23 17:09:32 cg Exp $'
! !
ArithmeticValue initialize!