Commit 11d3f6b9 authored by Simon Peyton Jones's avatar Simon Peyton Jones Committed by thoughtpolice
Browse files

Test Trac #8893

(cherry picked from commit 7973bfb8)
parent c63af7a0
{-# OPTIONS_GHC -Wall #-}
{-# Language DeriveFunctor #-}
{-# Language PolyKinds #-}
module T8893 where
data V a = V [a] deriving Functor
data C x a = C (V (P x a)) deriving Functor
data P x a = P (x a) deriving Functor
......@@ -45,3 +45,4 @@ test('T8138', reqlib('primitive'), compile, ['-O2'])
test('T8631', normal, compile, [''])
test('T8758', extra_clean(['T8758a.o', 'T8758a.hi']), multimod_compile, ['T8758a', '-v0'])
test('T8865', normal, compile, [''])
test('T8893', normal, compile, [''])
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment