Commit 533a3790 authored by simonpj's avatar simonpj
Browse files

[project @ 2006-01-04 11:50:44 by simonpj]

Add test for data con returning wrong type
parent fa089da4
......@@ -139,3 +139,4 @@ test('tcfail151', normal, compile_fail, [''])
test('tcfail152', normal, compile_fail, [''])
test('tcfail153', normal, compile_fail, [''])
test('tcfail154', normal, compile_fail, [''])
test('tcfail155', normal, compile_fail, [''])
{-# OPTIONS_GHC -fglasgow-exts #-}
-- Data type returns the wrong type
module ShouldFail where
data T a where
P :: L1 -> L2
data L1 = L1
data L2 = L2
tcfail155.hs:8:5:
Data constructor `P' returns type `L2' instead of its parent type
In the definition of data constructor `P'
In the data type declaration for `T'
Markdown is supported
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