Spurious "Defined but not used" when using record wildcards
Code such as
{-# LANGUAGE RecordWildCards #-}
module Test(bar) where
data Foo = Foo { a, b :: Int } deriving(Eq)
bar Foo{..} = print aproduces "defined but not used" warnings for both a and b, when compiled with -Wall.
The expected output is that either only a warning for b is given, or none is given.
Trac metadata
| Trac field | Value |
|---|---|
| Version | 6.10.3 |
| Type | Bug |
| TypeOfFailure | OtherFailure |
| Priority | normal |
| Resolution | Unresolved |
| Component | Compiler |
| Test case | |
| Differential revisions | |
| BlockedBy | |
| Related | |
| Blocking | |
| CC | |
| Operating system | |
| Architecture |