From c90df530814d3ae3a0664f8095ad46de7871f6f6 Mon Sep 17 00:00:00 2001 From: Tomas Janousek Date: Mon, 29 Mar 2021 14:01:14 +0100 Subject: [PATCH] tests: Fix build with GHC 9 Related: https://github.com/xmonad/xmonad/issues/283 --- tests/Properties/Screen.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/Properties/Screen.hs b/tests/Properties/Screen.hs index b614130..b679fb9 100644 --- a/tests/Properties/Screen.hs +++ b/tests/Properties/Screen.hs @@ -59,7 +59,7 @@ prop_aspect_fits = where pos = choose (0, 65535) -prop_point_within r @ (Rectangle x y w h) = +prop_point_within r@(Rectangle x y w h) = forAll ((,) <$> choose (0, fromIntegral w - 1) <*> choose (0, fromIntegral h - 1)) $