From 9faf7fb877119bd52d664940c4326d326b3326fa Mon Sep 17 00:00:00 2001
From: Mikolaj Konarski <mikolaj.konarski@funktory.com>
Date: Mon, 1 Dec 2025 17:50:42 +0100
Subject: Don't call continuation-based functions just *FromList

---
 test/Tests/Permutation.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'test/Tests')

diff --git a/test/Tests/Permutation.hs b/test/Tests/Permutation.hs
index 98a6da5..4e75d64 100644
--- a/test/Tests/Permutation.hs
+++ b/test/Tests/Permutation.hs
@@ -24,7 +24,7 @@ tests = testGroup "Permutation"
   [testProperty "permCheckPermutation" $ property $ do
     n <- forAll $ Gen.int (Range.linear 0 10)
     list <- forAll $ genPermR n
-    let r = permFromList list $ \perm ->
+    let r = permFromListCont list $ \perm ->
               permCheckPermutation perm ()
     case r of
       Just () -> return ()
-- 
cgit v1.2.3-70-g09d2