The Trunk: System-nice.284.mcz

Nicolas Cellier uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-nice.284.mcz

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

Name: System-nice.284
Author: nice
Time: 6 March 2010, 8:59:00.58 pm
UUID: 323f3119-4d2c-534c-83c9-efac319a7989
Ancestors: System-dtl.283

1) Change SystemDictionary comment.
2) add new accessor to system attribute: #buildDate

=============== Diff against System-dtl.283 ===============

Item was added:
+ ----- Method: SmalltalkImage>>buildDate (in category 'system attribute') -----
+ buildDate
+ "Return a String reflecting the build date of the VM"
+ "Smalltalk buildDate"
+
+ ^self getSystemAttribute: 1006!

Item was changed:
  IdentityDictionary subclass: #SystemDictionary
  instanceVariableNames: 'cachedClassNames'
  classVariableNames: ''
  poolDictionaries: ''
  category: 'System-Support'!
 
+ !SystemDictionary commentStamp: 'nice 3/6/2010 20:54' prior: 0!
+ I represent a special dictionary used as global namespace for class names :
+
+ Smalltalk globals classNames.
+
+ and for traits too:
+
+ Smalltalk globals traitNames.
+
+ and a few other globals:
+
+ (Smalltalk globals keys reject: [:k | (Smalltalk globals at: k) isBehavior])
+ collect: [:k | k -> (Smalltalk globals at: k) class].
+
+ As the above example let you guess, the global namespace of Smalltalk system is accessed though:
+
+ Smalltalk globals.!
- !SystemDictionary commentStamp: '<historical>' prior: 0!
- I represent a special dictionary that supports protocol for asking questions about the structure of the system. Other than class names, I contain (print this)...
- Smalltalk keys select: [:k | ((Smalltalk at: k) isKindOf: Class) not]
- thenCollect: [:k | k -> (Smalltalk at: k) class]
- !