X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=sequence_slow%2Ftest.icl;h=48de0f0ac85fc9e7d29537ada1bbfc9aa23898be;hb=c5365b7691e053c9d9815e4e9cca9e32b3d48d0b;hp=58ea03419bf30b6e261a879dcf1f5e1d45d811ae;hpb=9f05ee89761c00fe033bddc6a4a3c25c21c77a68;p=clean-tests.git diff --git a/sequence_slow/test.icl b/sequence_slow/test.icl index 58ea034..48de0f0 100644 --- a/sequence_slow/test.icl +++ b/sequence_slow/test.icl @@ -5,7 +5,7 @@ import iTasks import iTasks.Extensions.DateTime Start w = startEngine ( - sequence (map t [0..3]) >>- traceValue) w + sequence (map t [0..20]) >>- traceValue) w t i = waitForTimer 1 -|| viewInformation () [] (toString i +++ "th item") >>- \_->treturn i