[BUG]Array(Object)>>doesNotUnderstand: #markExteriorEdges

tim at sumeru.stanford.edu tim at sumeru.stanford.edu
Sun May 2 19:21:51 UTC 2004


PoohTestMorph new openInWorld
Opens a morph - drag the mouse around a little an release mouse button.
boom. 
TWO notifiers appear, first one for this stack, second one when the
display safely fails to display safly...

2 May 2004 12:17:26 pm

VM: RiscOS - a SmalltalkImage
Image: Squeak3.7beta [latest update: #5878]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir ADFS::HardDisc4/$/Squeak/sq31
Trusted Dir ADFS::HardDisc4/$/Squeak/sq31/secure
Untrusted Dir ADFS::HardDisc4/$/Squeak/sq31/untrusted

Array(Object)>>doesNotUnderstand: #markExteriorEdges
	Receiver: #(222.0 at 253.0 233.0 at 253.0 245.0 at 253.0 258.0 at 253.0 270.0 at 252.0
280.0 at 249.0 288.0 at 245.0 294.0 at 240.0 297.0 at 233.0 300.0 at 224.0 3...etc...
	Arguments and temporary variables: 
		aMessage: 	markExteriorEdges
	Receiver's instance variables: 
#(222.0 at 253.0 233.0 at 253.0 245.0 at 253.0 258.0 at 253.0 270.0 at 252.0
280.0 at 249.0 288.0 at 245.0 294.0 at 240.0 297.0 at 233.0 300.0 at 224.0 3...etc...

PoohTestMorph>>triangulate
	Receiver: a PoohTestMorph(4002)
	Arguments and temporary variables: 

	Receiver's instance variables: 
		bounds: 	393 at 277 corner: 793 at 677
		owner: 	a PasteUpMorph<page>(1248)
		submorphs: 	#()
		fullBounds: 	393 at 277 corner: 793 at 677
		color: 	Color white
		extension: 	a MorphExtension (3088) [other:  (borderStyle -> a
SimpleBorder) (errorOnDraw -> true)]...etc...
		borderWidth: 	2
		borderColor: 	Color black
		points: 	#(213.0 at 252.0 213.0 at 252.0 222.0 at 253.0 222.0 at 253.0 222.0 at 253.0
233.0 at 253.0 233.0 at 253.0 233.0 at 253.0 245.0...etc...
		subdivision: 	#(222.0 at 253.0 233.0 at 253.0 245.0 at 253.0 258.0 at 253.0
270.0 at 252.0 280.0 at 249.0 288.0 at 245.0 294.0 at 240.0...etc...
		lastPoint: 	177 at 117
		firstPoly: 	nil
		time: 	nil

[] in PoohTestMorph>>subdivide {[points := self simplify: points. 
points := self smoothen: points length: 1...]}
	Arguments and temporary variables: 

Time class>>millisecondsToRun:
	Receiver: Time
	Arguments and temporary variables: 
		timedBlock: 	[] in PoohTestMorph>>subdivide {[points := self simplify:
points.  points := self smoothen: points length: 1...]}...etc...
		initialMilliseconds: 	47714203
	Receiver's instance variables: 
		superclass: 	Magnitude
		methodDict: 	a MethodDictionary(#<->a CompiledMethod (1795) #=->a
CompiledMethod...etc...
		format: 	134
		instanceVariables: 	#('seconds' 'nanos')
		organization: 	('ansi protocol' < = duration hash hour hour12 hour24
meridianAbb...etc...
		subclasses: 	nil
		name: 	#Time
		classPool: 	nil
		sharedPools: 	an OrderedCollection(ChronologyConstants)
		environment: 	a SystemDictionary(lots of globals)
		category: 	nil


--- The full stack ---
Array(Object)>>doesNotUnderstand: #markExteriorEdges
PoohTestMorph>>triangulate
[] in PoohTestMorph>>subdivide {[points := self simplify: points. 
points := self smoothen: points length: 1...]}
Time class>>millisecondsToRun:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
BlockContext>>timeToRun
PoohTestMorph>>subdivide
PoohTestMorph>>mouseUp:
PoohTestMorph(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
PoohTestMorph(Morph)>>handleEvent:
PoohTestMorph(Morph)>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self. 
ActiveEvent := anEvent.  result := focusHolder     han...]}
[] in PasteUpMorph>>becomeActiveDuring: {[aBlock value]}
BlockContext>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h
processEvents.  capturingGesture := capturingGest...]}
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle.  Processor
yield.  false] whileFalse.  nil]}
[] in BlockContext>>newProcess {[self value.  Processor
terminateActive]}



More information about the Squeak-dev mailing list