Commit a26252c4 authored by pcapriotti's avatar pcapriotti Committed by Simon Peyton Jones
Browse files

Add test for #7145

parent 9ffb400e
module T7145a ( Applicative(pure) ) where
import Control.Applicative ( Applicative(pure) )
module T7145b ( A.Applicative(pure) ) where
import qualified Control.Applicative as A
pure :: ()
pure = ()
T7145b.hs:6:1: Warning: Defined but not used: `pure'
......@@ -193,3 +193,5 @@ test('T6027', normal, compile, [''])
test('T6120', normal, compile, [''])
test('T7007', normal, compile, [''])
test('T7085', normal, compile, [''])
test('T7145a', normal, compile, ['-Wall -Werror'])
test('T7145b', normal, compile, ['-Wall'])
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