path: root/testsuite/tests/printer/T18052a.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE TypeOperators #-}
module T18052a where

(+++) = (++)
pattern x :||: y = (x,y)
type (^^^) = Either
data (&&&)