blob: 216ef832b3d75f587dfa890234ee37f5ba6930d6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
{-# LANGUAGE PatternSynonyms #-}
{-# OPTIONS_GHC -Wmissing-signatures #-}
module T14794a (testExported, pattern TestExported) where
-- These should generate warnings:
testExported = True
testUnexported = True
-- These should not generate warnings:
pattern TestExported <- True
pattern TestUnexported <- True
|
