diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt index bd3f8851c7..670151e50d 100644 --- a/TODO.FACTOR.txt +++ b/TODO.FACTOR.txt @@ -9,6 +9,7 @@ + ui: +- "benchmark/help" runs out of memory - shortcuts: - find a listener - find a browser diff --git a/library/test/benchmark/help.factor b/library/test/benchmark/help.factor index b405c7f3b2..1b4014b9b2 100644 --- a/library/test/benchmark/help.factor +++ b/library/test/benchmark/help.factor @@ -3,9 +3,9 @@ sequences test threads words ; [ all-articles [ - stdio get pane-clear + stdio get duplex-stream-out pane-clear dup global [ . flush ] bind [ dup help ] assert-depth drop - yield + 1 sleep ] each ] time