Skip to content
Snippets Groups Projects
Forked from Glasgow Haskell Compiler / GHC
67165 commits behind the upstream repository.
Code owners
Assign users and groups as approvers for specific file changes. Learn more.
Print004.hs 372 B
--!!! export a derived thingy which mentions an internal type
--
{- from simonpj; who adds:

   It is NOT ENOUGH to put

	   data OpaqueType deriving(Text)

   in the interface
-}

module ExportOpaque( OpaqueType ) where

data OpaqueType a = Con (FunnyInternalType a) deriving(Show)

data FunnyInternalType a = Junk11 | Junk2

instance Ord a => Show (FunnyInternalType a)