Commit 2cb2c7bf authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test for Trac #1806

parent 06d253c9
......@@ -175,3 +175,4 @@ test('tcfail185', normal, compile_fail, [''])
test('tcfail186',
extra_clean(['Tcfail186_Help.hi', 'Tcfail186_Help.o']),
multimod_compile_fail, ['tcfail186', '-v0'])
test('tcfail187', normal, compile_fail, [''])
-- Trac #1806
module ShouldFail where
data Foo = (:::)
foo (x ::: y) = ()
tcfail187.hs:7:7:
Constructor `:::' should have no arguments, but has been given 2
In the pattern: x ::: y
In the definition of `foo': foo (x ::: y) = ()
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