TEST @@ -1,4 +1,4 @@ module Main (main) where main :: IO () - main = return () + main = pure ()