Commit 59d86a3a authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #8448

parent 5c4c46d6
{-# LANGUAGE RecordWildCards #-}
module T8448 where
data R = R {r :: Int}
f x = undefined [] {r = x}
T8448.hs:5:21: ‛r’ is not a (visible) field of constructor ‛[]’
...@@ -110,3 +110,4 @@ test('T7454', normal, compile, ['']) ...@@ -110,3 +110,4 @@ test('T7454', normal, compile, [''])
test('T7906', normal, compile_fail, ['']) test('T7906', normal, compile_fail, [''])
test('T7937', normal, compile_fail, ['']) test('T7937', normal, compile_fail, [''])
test('T7943', normal, compile_fail, ['']) test('T7943', normal, compile_fail, [''])
test('T8448', 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