Commit 60343a41 authored by Ryan Scott's avatar Ryan Scott
Browse files

Add test for #12732

parent aae2b3d5
module T12732 where
(a ... b) xs
| a == x
, (l, _:r) <- break (== x) xs
= l ++ [x]
T12732.hs:4:10: error: Variable not in scope: x
T12732.hs:5:27: error: Variable not in scope: x
T12732.hs:6:11: error: Variable not in scope: x
......@@ -63,3 +63,4 @@ test('T11976', normal, compile_fail, [''])
test('PatBind3', normal, compile_fail, [''])
test('T12039', normal, compile_fail, [''])
test('T12634', normal, compile_fail, [''])
test('T12732', normal, compile_fail, ['-fobject-code -fdefer-typed-holes'])
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