fix accessor. oops
parent
f7c27f4127
commit
d2861cae6e
|
@ -17,7 +17,7 @@ IN: ui.tools.traceback
|
||||||
t "Data stack" <labelled-pane> ;
|
t "Data stack" <labelled-pane> ;
|
||||||
|
|
||||||
: <retainstack-display> ( model -- gadget )
|
: <retainstack-display> ( model -- gadget )
|
||||||
[ [ return>> stack. ] when* ]
|
[ [ retain>> stack. ] when* ]
|
||||||
t "Retain stack" <labelled-pane> ;
|
t "Retain stack" <labelled-pane> ;
|
||||||
|
|
||||||
TUPLE: traceback-gadget < track ;
|
TUPLE: traceback-gadget < track ;
|
||||||
|
|
Loading…
Reference in New Issue