ghc-exactprint-0.5.0.0: tests/examples/ghc8/D.hs

{-# LANGUAGE TypeFamilies #-}

module D where

import A
import C

type instance F a b = a

unsafeCoerce :: a -> b
unsafeCoerce x = oops x x