diff options
Diffstat (limited to 'testsuite/tests/th/T10828b.hs')
| -rw-r--r-- | testsuite/tests/th/T10828b.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/testsuite/tests/th/T10828b.hs b/testsuite/tests/th/T10828b.hs index 03706d6b7c..36e91eb11a 100644 --- a/testsuite/tests/th/T10828b.hs +++ b/testsuite/tests/th/T10828b.hs @@ -4,6 +4,7 @@ module T10828b where import Language.Haskell.TH import System.IO +import qualified Data.List.NonEmpty as NE ( singleton ) -- attempting to mix GADT and normal constructors $( return @@ -23,7 +24,7 @@ $( return [AppT (AppT EqualityT (VarT $ mkName "a" ) ) (ConT $ mkName "Int") ] $ RecGadtC - [ (mkName "MkC")] + (NE.singleton (mkName "MkC")) [ ( mkName "foo" , Bang NoSourceUnpackedness NoSourceStrictness , VarT (mkName "a") |