GTSpotterMorph new
		extent: (World width / 3.25 @ (World height / 2.25)) asIntegerPoint;
		spotterModel: ((GTSpotter on: Object>>#copy)
			processorsFilter: (GTSpotterMethodListProcessorFilter new 
				allowProcessorsFrom: Collection>>#spotterItemsFor:;
				allowProcessorsFrom: CompiledMethod>>#spotterForImplementorsFor: 
				configuredWith: [ :aProcessor | aProcessor
					actLogic: [ :aMethod :step | 
						step exit.
						aMethod inform: aMethod name ];
					candidatesLimit: 50 ]));
		openCenteredInWorld