Update Trac ticket URLs to point to GitLab
[ghc.git] / testsuite / tests / rename / should_compile / T2205.hs
1 {-# OPTIONS_GHC -XTypeOperators #-}
2
3 -- Test fixity of type operators
4 -- #2205
5
6 module ShouldCompile where
7
8 infixr 0 :->
9 data a :-> b = P a b
10
11 fst3:: (a :-> (b :-> c)) -> a
12 fst3 (P a (P b c)) = a
13
14
15 fst3':: (a :-> b :-> c) -> a
16 fst3' (P a (P b c)) = a
17