Commit 616f54bd authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #9023

parent 0a55a3ca
{-# LANGUAGE PatternSynonyms #-}
module T9023 where
pattern P a b = Just (a, b)
foo P{} = True
......@@ -9,3 +9,4 @@ test('num', normal, compile, [''])
test('incomplete', normal, compile, [''])
test('export', normal, compile, [''])
test('T8966', normal, compile, [''])
test('T9023', normal, compile, [''])
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