ghc/tests/typecheck/should_fail/tcfail079.hs

   1 {-# OPTIONS -fglasgow-exts #-}
   2
   3 module ShouldFail where
   4
   5 -- !!! unboxed field in newtype declaration
   6
   7 import GlaExts ( Int# )
   8
   9 newtype Unboxed = Unboxed Int#
  10
  11 f = [ Unboxed 1#, Unboxed 2# ] -- shouldn't be allowed!