Commit 3a596be3 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #7943

parent 02e0df0a
module T7943 where
data Foo = A { bar :: String }
| B String { bar :: String }
T7943.hs:4:22: Record syntax is illegal here: {bar :: String}
......@@ -109,3 +109,4 @@ test('T7338a', normal, compile_fail, [''])
test('T7454', normal, compile, [''])
test('T7906', normal, compile_fail, [''])
test('T7937', normal, compile_fail, [''])
test('T7943', normal, compile_fail, [''])
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