Class new title: StackPaneNT
	subclassof: StackPane
	fields: '
	'
	declare: ''

close 
	[super close]

context: t1 instance: t2 code: t3 
	[contextVarPane _ t1.
	instanceVarPane _ t2.
	codePane _ t3.
	variables _ Stream new of: (Vector new: 16).
	proceed  nil  [proceed _ false , nil , 1]]

processFrame: t1 
	[self context: false instance: false code: false.
	self interrupt: false.
	self of: t1 inVector]