path: root/testsuite/tests/ghc-regress/driver/recomp006/B1.hs

{-# LANGUAGE TypeOperators #-}

module B where

infixr 9 :-

type a :- b = (a,b)