Commit 719108f8 authored by cactus's avatar cactus

Add test suite for #8757

parent e0a55415
{-# LANGUAGE PatternSynonyms #-}
module ShouldFail where
varWithLocalPatSyn x = case x of
P -> ()
where
pattern P = ()
local.hs:7:5:
Illegal pattern synonym declaration
Pattern synonym declarations are only valid in the top-level scope
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