benchmark.ui-panes: clean up
parent
76344f6bc2
commit
36785f4625
|
@ -1,7 +1,7 @@
|
|||
USING: io math.parser sequences ui.gadgets.panes ;
|
||||
USING: io kernel math.parser sequences ui.gadgets.panes ;
|
||||
IN: benchmark.ui-panes
|
||||
|
||||
: ui-pane-benchmark ( -- )
|
||||
<pane> <pane-stream> [ 10000 iota [ number>string print ] each ] with-output-stream* ;
|
||||
[ 10000 iota [ number>string print ] each ] make-pane drop ;
|
||||
|
||||
MAIN: ui-pane-benchmark
|
||||
|
|
Loading…
Reference in New Issue