言語ゲーム

とあるエンジニアが嘘ばかり書く日記

Twitter: @propella

PlayerExplorer

Tweak の世界はかなり作りこんであって表示される部品の構造が追いにくいので簡単なツールを作ってみた。実は、最初かなり気合を入れて作り出したのだがものの数分で出来てしまったので、さくっと日記に載せる。PlayerExplorer open で CWorldPlayer からの構造を見る事が出来ます。モーフィックからも、Tweak からも使えるのがミソ(アンドレアスは偉大だ!)

'From Squeak3.8gamma of ''24 November 2004'' [latest update: #6662] on 11 May 2005 at 10:52:41 pm'!
ObjectExplorerPlus subclass: #PlayerExplorer
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'PlayerExplorer'!

!PlayerExplorer methodsFor: 'tree handling' stamp: 'tak 5/11/2005 19:11'!
explorerContentsOf: assoc 
	| item elements player |
	item := assoc value.
	player := item player.
	elements := item elements
				collect: [:each | each name -> each].
	player
		ifNil: [^ elements]
		ifNotNil: [^ {'(player)' -> player} , elements]! !


!PlayerExplorer class methodsFor: 'instance creation' stamp: 'tak 5/11/2005 19:06'!
open
	self
		openOn: (Processor activeProcess hand isTweaked
				ifTrue: [Processor activeProcess hand root]
				ifFalse: [CWorldPlayer allInstances last
					"maybe..."])! !

!PlayerExplorer class methodsFor: 'instance creation' stamp: 'tak 5/11/2005 18:53'!
openOn: root
	^ToolBuilder open: (self on: root) label: 'PlayerExplorer'! !