packages feed

ghc-exactprint-1.14.0.0: tests/examples/pre-ghc910/T10184.hs

module T10184 where

import Data.Coerce

newtype Bar a = Bar (Either a (Bar a))
newtype Age = MkAge Int

x :: Bar Age
x = coerce (Bar (Left (5 :: Int)))