summaryrefslogtreecommitdiff
path: root/testsuite/tests/patsyn/should_fail/unidir.hs
blob: 020fc1282185ec29d1a5ee0fccae57d7f4ba541b (plain)
1
2
3
4
{-# LANGUAGE PatternSynonyms #-}
module ShouldFail where

pattern Head x = x:_