diff options
| -rw-r--r-- | tests/test/srfi-41-util.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tests/test/srfi-41-util.scm b/tests/test/srfi-41-util.scm index 12eccac5..ff0e3cce 100644 --- a/tests/test/srfi-41-util.scm +++ b/tests/test/srfi-41-util.scm @@ -79,6 +79,8 @@ (unless (zero? remaining) (loop (sleep remaining))))) +(test-skip "time limited stream") + (let ((strm (stream-map (lambda (x) (when (zero? (modulo x 4)) (true-sleep 1)) x) (stream-from 1)))) (let ((strm (stream-timeslice-limit strm 0.1))) (test-equal "time limited stream" |