afp10
[clean-tests.git] / sequence_slow / test.icl
index 58ea034..48de0f0 100644 (file)
@@ -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