The Inbox: Kernel-fbs.760.mcz

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

The Inbox: Kernel-fbs.760.mcz

commits-2
A new version of Kernel was added to project The Inbox:
http://source.squeak.org/inbox/Kernel-fbs.760.mcz

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

Name: Kernel-fbs.760
Author: fbs
Time: 23 May 2013, 8:48:40.24 pm
UUID: 75bf5248-3ed6-4176-a46a-810b486a0ac4
Ancestors: Kernel-fbs.759

Object >> #localeChanged moved to System-Localization because it's a localisation thing, and because I'd rather have System depend on Kernel than Kernel depend on System.

=============== Diff against Kernel-fbs.759 ===============

Item was changed:
  ----- Method: Class class>>rootsOfTheWorld (in category 'inquiries') -----
  rootsOfTheWorld
  "return a collection of classes which have a nil superclass"
+ ^(Smalltalk globals select: [:each | each isBehavior and: [each superclass isNil]]) asOrderedCollection!
- ^ Smalltalk globals rootClasses!

Item was changed:
  ----- Method: Class>>rename: (in category 'class name') -----
  rename: aString
  "The new name of the receiver is the argument, aString."
 
  | oldName newName |
  (newName := aString asSymbol) = (oldName := self name)
  ifTrue: [^ self].
  (self environment includesKey: newName)
  ifTrue: [^ self error: newName , ' already exists'].
  (environment undeclared includesKey: newName)
+ ifTrue: [self inform: 'There are references to ' , aString printString , '
- ifTrue: [self inform: 'There are references to, ' , aString printString , '
  from Undeclared. Check them after this change.'].
  name := newName.
  self environment renameClass: self from: oldName!

Item was removed:
- ----- Method: Object>>localeChanged (in category 'locales') -----
- localeChanged
- self shouldBeImplemented!