Hi Romain
This will be a great tool, but right after the browser opens up it goes
south on me -- didn't even get to read the docs. I have the latest sfuff
loaded you said were needed.
Again thanks,
Steve

13 September 2006 9:48 am

VM: Mac OS - a SmalltalkImage
Image: Squeak3.9gamma [latest update: #7056]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /Users/brendamoffitt/Desktop/Squeak3-1.9g-7056
Trusted Dir /Users/brendamoffitt/Desktop/Squeak3-1.9g-7056
Untrusted Dir foobar/tooBar/forSqueak/bogus

UndefinedObject(Object)>>error:
	Receiver: nil
	Arguments and temporary variables: 
		aString: 	'Error: Instances of UndefinedObject are not indexable'
	Receiver's instance variables: 
nil

[] in WorldState>>displayWorldSafely: {[:err :rcvr |  errCtx :=
thisContext.  [errCtx := errCtx sender.  [errCtx no...]}
	Arguments and temporary variables: 
		aWorld: 	a PasteUpMorph(1622) [world]
		err: 	'Error: Instances of UndefinedObject are not indexable'
		rcvr: 	nil
		errCtx: 	TextMorphForShout(TextMorph)>>drawOn:
		errMorph: 	a TextMorphForShout(3635)

BlockContext>>valueWithPossibleArgs:
	Receiver: [] in WorldState>>displayWorldSafely: {[:err :rcvr |  errCtx
:= thisContext.  [errCtx := e...etc...
	Arguments and temporary variables: 
		anArray: 	#('Error: Instances of UndefinedObject are not indexable'
nil)
	Receiver's instance variables: 
		sender: 	BlockContext>>valueWithPossibleArgs:
		pc: 	121
		stackp: 	0
		nargs: 	2
		startpc: 	74
		home: 	WorldState>>displayWorldSafely:

[] in BlockContext>>ifError: {[:ex | errorHandlerBlock
valueWithPossibleArgs: {ex description. ex receiver}]}
	Arguments and temporary variables: 
		errorHandlerBlock: 	[] in WorldState>>displayWorldSafely: {[:err :rcvr
|  errCtx...etc...
		ex: 	Error: Instances of UndefinedObject are not indexable


--- The full stack ---
UndefinedObject(Object)>>error:
[] in WorldState>>displayWorldSafely: {[:err :rcvr |  errCtx :=
thisContext.  [errCtx := errCtx sender.  [errCtx no...]}
BlockContext>>valueWithPossibleArgs:
[] in BlockContext>>ifError: {[:ex | errorHandlerBlock
valueWithPossibleArgs: {ex description. ex receiver}]}
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
BlockContext>>valueWithPossibleArgs:
[] in MethodContext(ContextPart)>>handleSignal: {[(self tempAt: 2)  
valueWithPossibleArgs: {exception}]}
BlockContext>>ensure:
MethodContext(ContextPart)>>handleSignal:
Error(Exception)>>signal
Error(Exception)>>signal:
UndefinedObject(Object)>>error:
UndefinedObject(Object)>>errorNotIndexable
UndefinedObject(Object)>>size
MultiNewParagraph(NewParagraph)>>fastFindFirstLineSuchThat:
MultiNewParagraph(NewParagraph)>>lineIndexForPoint:
MultiNewParagraph>>displayOn:using:at:
FormCanvas>>paragraph:bounds:color:
TextMorphForShout(TextMorph)>>drawOn:
FormCanvas(Canvas)>>draw:
FormCanvas(Canvas)>>drawMorph:
[] in TextMorphForShout(Morph)>>fullDrawOn: {[(aCanvas isVisible: self
bounds)   ifTrue: [aCanvas drawMorph: self].  self...]}
FormCanvas>>roundCornersOf:in:during:
FormCanvas(Canvas)>>roundCornersOf:during:
TextMorphForShout(Morph)>>fullDrawOn:
FormCanvas(Canvas)>>fullDraw:
FormCanvas(Canvas)>>fullDrawMorph:
[] in TransformMorph>>drawSubmorphsOn: {[:m | myCanvas fullDrawMorph:
m]}
Array(SequenceableCollection)>>reverseDo:
[] in TransformMorph>>drawSubmorphsOn: {[:myCanvas | submorphs  
reverseDo: [:m | myCanvas fullDrawMorph: m]]}
FormCanvas>>transformBy:clippingTo:during:smoothing:
TransformMorph>>drawSubmorphsOn:
[] in TransformMorph(Morph)>>fullDrawOn: {[(aCanvas isVisible: self
bounds)   ifTrue: [aCanvas drawMorph: self].  self...]}
FormCanvas>>roundCornersOf:in:during:
FormCanvas(Canvas)>>roundCornersOf:during:
TransformMorph(Morph)>>fullDrawOn:
FormCanvas(Canvas)>>fullDraw:
FormCanvas(Canvas)>>fullDrawMorph:
[] in PluggableShoutMorph(Morph)>>drawSubmorphsOn: {[:m | canvas
fullDrawMorph: m]}
Array(SequenceableCollection)>>reverseDo:
[] in PluggableShoutMorph(Morph)>>drawSubmorphsOn: {[:canvas | submorphs
  reverseDo: [:m | canvas fullDrawMorph: m]]}
PluggableShoutMorph(Morph)>>drawSubmorphsOn:
[] in PluggableShoutMorph(Morph)>>fullDrawOn: {[(aCanvas isVisible: self
bounds)   ifTrue: [aCanvas drawMorph: self].  self...]}
FormCanvas>>roundCornersOf:in:during:
FormCanvas(Canvas)>>roundCornersOf:during:
PluggableShoutMorph(Morph)>>fullDrawOn:
FormCanvas(Canvas)>>fullDraw:
FormCanvas(Canvas)>>fullDrawMorph:
[] in AlignmentMorph(Morph)>>drawSubmorphsOn: {[:m | canvas
fullDrawMorph: m]}
Array(SequenceableCollection)>>reverseDo:
[] in AlignmentMorph(Morph)>>drawSubmorphsOn: {[:canvas | submorphs  
reverseDo: [:m | canvas fullDrawMorph: m]]}
...etc...