The Trunk: Kernel-mt.919.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-mt.919.mcz

commits-2
Marcel Taeumel uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-mt.919.mcz

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

Name: Kernel-mt.919
Author: mt
Time: 14 April 2015, 9:42:18.399 am
UUID: 6ccd73b1-d88b-d045-89c6-6dfddbdc7f66
Ancestors: Kernel-mt.918

Fixed Object organization to not have all-category as a real category. Was empty anyway.

=============== Diff against Kernel-mt.918 ===============

Item was changed:
  SystemOrganization addCategory: #'Kernel-Chronology'!
  SystemOrganization addCategory: #'Kernel-Classes'!
  SystemOrganization addCategory: #'Kernel-Exceptions'!
  SystemOrganization addCategory: #'Kernel-Exceptions-Kernel'!
  SystemOrganization addCategory: #'Kernel-Methods'!
  SystemOrganization addCategory: #'Kernel-Models'!
  SystemOrganization addCategory: #'Kernel-Numbers'!
  SystemOrganization addCategory: #'Kernel-Numbers-Exceptions'!
  SystemOrganization addCategory: #'Kernel-Objects'!
+ SystemOrganization addCategory: #'Kernel-Pools'!
  SystemOrganization addCategory: #'Kernel-Processes'!
  SystemOrganization addCategory: #'Kernel-Processes-Variables'!
- SystemOrganization addCategory: #'Kernel-Pools'!

Item was changed:
  ----- Method: Categorizer>>categories (in category 'accessing') -----
  categories
  "Answer an Array of categories (names)."
  categoryArray isNil ifTrue: [^ nil].
+ self isEmpty ifTrue: [^Array with: NullCategory].
- (categoryArray size = 1
- and: [categoryArray first = Default & (elementArray size = 0)])
- ifTrue: [^Array with: NullCategory].
  ^categoryArray!

Item was added:
+ ----- Method: Categorizer>>isEmpty (in category 'testing') -----
+ isEmpty
+
+ ^ (categoryArray size = 1
+ and: [categoryArray first = Default & (elementArray size = 0)])!