tests: Fix build with GHC 9

Related: https://github.com/xmonad/xmonad/issues/283
This commit is contained in:
Tomas Janousek
2021-03-29 14:01:14 +01:00
parent e4659c2475
commit c90df53081

View File

@@ -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)) $