2010-10-23 20:15:23 -04:00
|
|
|
USING: io kernel math.parser sequences ui.gadgets.panes ;
|
2008-09-03 07:34:40 -04:00
|
|
|
IN: benchmark.ui-panes
|
|
|
|
|
|
2012-07-19 20:35:47 -04:00
|
|
|
: ui-panes-benchmark ( -- )
|
2017-06-01 17:59:35 -04:00
|
|
|
[ 10000 <iota> [ number>string print ] each ] make-pane drop ;
|
2008-09-03 07:34:40 -04:00
|
|
|
|
2012-07-19 20:35:47 -04:00
|
|
|
MAIN: ui-panes-benchmark
|