repositories
/
clean-tests.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
.
[clean-tests.git]
/
sequence_slow
/
test.icl
1
module test
2
3
import Data.Func
4
import iTasks
5
import iTasks.Extensions.DateTime
6
7
Start w = startEngine (
8
sequence (map t [0..20]) >>- traceValue) w
9
10
t i = waitForTimer 1 -|| viewInformation () [] (toString i +++ "th item")
11
>>- \_->treturn i