diff options
Diffstat (limited to 'testsuite/tests/deriving/should_fail/drvfail010.hs')
-rw-r--r-- | testsuite/tests/deriving/should_fail/drvfail010.hs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/testsuite/tests/deriving/should_fail/drvfail010.hs b/testsuite/tests/deriving/should_fail/drvfail010.hs new file mode 100644 index 0000000000..efecf07cf1 --- /dev/null +++ b/testsuite/tests/deriving/should_fail/drvfail010.hs @@ -0,0 +1,10 @@ +{-# LANGUAGE DeriveDataTypeable #-} + +module ShouldFail where +import Data.Typeable + +data A a b c d e f g h i j = A deriving (Typeable) + -- Too many args + +data B a b = B (a b) deriving (Typeable) + -- Non type-kind args
\ No newline at end of file |