[squeak-dev] The Trunk: System-topa.769.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Oct 8 19:14:59 UTC 2015


Tobias Pape uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-topa.769.mcz

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

Name: System-topa.769
Author: topa
Time: 8 October 2015, 9:14:34.222 pm
UUID: d3a735df-f3e3-4c1b-8398-b0dd65da8a7b
Ancestors: System-topa.768

Remind future me to remove CrLfFileStream from the #initializeStartUpList

=============== Diff against System-topa.768 ===============

Item was changed:
  ----- Method: SmalltalkImage class>>initializeStartUpList (in category 'class initialization') -----
  initializeStartUpList
  	"SmalltalkImage initialize"
+ 	
- 
  	| oldList |
  	oldList := StartUpList.
  	StartUpList := OrderedCollection new.
  	"These get processed from the top down..."
+ 	self flag: #'revisit in Squeak 5.3'.
  	#(
  		SmallInteger
  		Delay
  		DisplayScreen
  		Cursor
  		InputSensor
  		ProcessorScheduler  "Starts low space watcher and bkground."
  		FileDirectory  "Enables file stack dump and opens sources."
  		ShortIntegerArray
  		ShortRunArray
+ 		CrLfFileStream "Remove this in Squeak 5.3"
- 		CrLfFileStream
  	) do:[:clsName|
  		Smalltalk at: clsName ifPresent:[:cls| Smalltalk addToStartUpList: cls].
  	].
  	oldList ifNotNil: [oldList do: [:className | Smalltalk at: className
  						ifPresent: [:theClass | Smalltalk addToStartUpList: theClass]]].
  	#(
  		ImageSegment
  		PasteUpMorph
  		ControlManager
  	) do:[:clsName|
  		Smalltalk at: clsName ifPresent:[:cls| Smalltalk addToStartUpList: cls].
  	].
  !



More information about the Squeak-dev mailing list