packages feed

aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/ClassGuards/guarded-method-variations.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE GHC2021 #-}

class C a b where
  multiParam :: a -> b -> Bool
  multiParam x y | x == x = True
                 | otherwise = False

  infixMethod :: a -> a -> a
  x `infixMethod` y | x == y = x
                    | otherwise = y

  multipleEquations :: a -> a
  multipleEquations x = x
  multipleEquations _ = undefined