The Trunk: Kernel-fbs.788.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Kernel-fbs.788.mcz

commits-2
Frank Shearar uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-fbs.788.mcz

==================== Summary ====================

Name: Kernel-fbs.788
Author: fbs
Time: 6 July 2013, 4:38:01.284 pm
UUID: d82773ba-c570-2e4c-b757-b7eb3a457e30
Ancestors: Kernel-fbs.787

Actually deprecate the deprecated Kernel methods.

=============== Diff against Kernel-fbs.787 ===============

Item was removed:
- ----- Method: Behavior>>whichSelectorsAssign: (in category 'queries') -----
- whichSelectorsAssign: instVarName
- "Answer a Set of selectors whose methods store into the argument,
- instVarName, as a named instance variable."
-
- self deprecated: 'Use #whichSelectorsStoreInto:.'.
- ^self whichSelectorsStoreInto: instVarName!

Item was removed:
- ----- Method: CompiledMethod>>setMySourcePointer: (in category 'source code management') -----
- setMySourcePointer: srcPointer
-
- self deprecated: 'Use #setSourcePointer: '.
-
- ^ self setSourcePointer: srcPointer!

Item was removed:
- ----- Method: Integer>>asStringWithCommasSigned (in category 'printing') -----
- asStringWithCommasSigned
- "123456789 asStringWithCommasSigned"
- "-123456789 asStringWithCommasSigned"
- | digits |
- self deprecated: 'Use #asStringWithCommasSigned:'.
- digits := self abs printString.
- ^ String streamContents:
- [:strm |
- self sign = -1 ifTrue: [strm nextPut: $-] ifFalse:[strm nextPut: $+].
- 1 to: digits size do:
- [:i | strm nextPut: (digits at: i).
- (i < digits size and: [(i - digits size) \\ 3 = 0])
- ifTrue: [strm nextPut: $,]]]!

Item was removed:
- ----- Method: Integer>>raisedToInteger:modulo: (in category 'mathematical functions') -----
- raisedToInteger: exp modulo: m
- self deprecated: 'rather use #raisedTo:modulo: for efficiency'.
- (exp = 0) ifTrue: [^ 1].
- exp even
- ifTrue: [^ (self raisedToInteger: (exp // 2) modulo: m) squared \\ m]
- ifFalse: [^ (self * (self raisedToInteger: (exp - 1) modulo: m)) \\ m].!

Item was removed:
- ----- Method: MethodDictionary>>methodArray (in category 'private') -----
- methodArray
-
- self deprecated: 'Use #array'.
- ^array!

Item was removed:
- ----- Method: Number>>isInf (in category 'testing') -----
- isInf
- self deprecated: 'Use #isInfinite instead'.
- ^self isInfinite!