hadrian: Add support for bindist compressors other than Xz
[ghc.git] / testsuite / tests / typecheck / should_compile / T7643.hs
1 {-# LANGUAGE MagicHash, TypeFamilies #-}
2
3 module T7643 where
4
5 import GHC.Exts
6
7 type family T
8 type instance T = RealWorld
9
10 foo :: () -> State# T
11 foo _ = unsafeCoerce# realWorld#