Add HsSyn prettyprinter tests
[ghc.git] / testsuite / tests / typecheck / should_fail / ClassOperator.hs
1 {-# LANGUAGE PatternSynonyms, TypeOperators, TypeFamilies, MultiParamTypeClasses, GADTs #-}
2
3 module ClassOperator where
4
5 -- | Class with fixity, including associated types
6 class a ><> b where
7 type a <>< b :: *
8 data a ><< b
9 (>><), (<<>) :: a -> b -> ()
10
11 -- | Multiple fixities
12 (**>), (**<), (>**), (<**) :: a -> a -> ()
13
14 infixr 1 ><>
15 infixl 2 <><
16 infixl 3 ><<
17 infixr 4 >><
18 infixl 5 <<>
19
20 infixr 8 **>, >**
21 infixl 8 **<, <**