Testsuite: tabs -> spaces [skip ci]
[ghc.git] / testsuite / tests / patsyn / should_fail / unboxed-wrapper-naked.hs
1 {-# LANGUAGE PatternSynonyms, MagicHash #-}
2 module ShouldFail where
3
4 import GHC.Base
5
6 pattern P1 = 42#
7
8 x = P1