blob: ef7e9a2f3e2701147aac08b0c77d4318d8471db0 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
{-# LANGUAGE Haskell2010 #-}
{-# LANGUAGE TypeOperators, TypeFamilies #-}
module Bug722 where
class Foo a where
(!@#) :: a -> a -> a
infixl 4 !@#
type family (&*) :: * -> * -> *
infixr 3 &*
data a :-& b = a :^& b
infixl 6 :-&, :^&
|