Commit 719108f8 authored by Gergő Érdi's avatar Gergő Érdi
Browse files

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