Increasing leeway for integration test with large number of tasks.

robinheghan · robinheghan · commit e099f421da68 · 2025-05-19T10:53:29.000+02:00
diff --git a/integration_tests/src/Test/Task.gren b/integration_tests/src/Test/Task.gren
@@ -65,7 +65,7 @@ tests =
                 "large concurrent array of tasks"
                 (\res ->
                     test "completes in reasonable time"
-                        (\_ -> duration res |> Expect.lessThan (10 + leeway))
+                        (\_ -> duration res |> Expect.lessThan (10 + leeway * 3))
                 )
             , awaitError
                 (Task.concurrent

Original file line number	Diff line number	Diff line change
`@@ -65,7 +65,7 @@ tests =`
`65`	`65`	`"large concurrent array of tasks"`
`66`	`66`	`(\res ->`
`67`	`67`	`test "completes in reasonable time"`
`68`		`- (\_ -> duration res \|> Expect.lessThan (10 + leeway))`
	`68`	`+ (\_ -> duration res \|> Expect.lessThan (10 + leeway * 3))`
`69`	`69`	`)`
`70`	`70`	`, awaitError`
`71`	`71`	`(Task.concurrent`