From 9d43550513b9602d211430283505fe810556e0c1 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Mon, 4 Mar 2019 20:06:36 -0500 Subject: [PATCH] src/Misc.hs: add a type annotation to avoid a monomorphism warning. --- src/Misc.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Misc.hs b/src/Misc.hs index e6cd07e..83b439c 100644 --- a/src/Misc.hs +++ b/src/Misc.hs @@ -110,7 +110,7 @@ test_flatten1 = assertEqual "flatten actually works" expected_list actual_list where target = [[[1::Int]], [[2, 3]]] - expected_list = [1, 2, 3] + expected_list = [1, 2, 3] :: [Int] actual_list = flatten target -- 2.44.2