haskell-language-server-2.7.0.0: plugins/hls-rename-plugin/test/testdata/Typeclass.expected.hs
module Typeclass () where
class Equal a where
equals :: a -> a -> Bool
instance Equal Int where
equals = (==)
allEqual :: Equal a => [a] -> Bool
allEqual = all =<< equals . head