Support RecordWildCards in HPC
## Summary
Data type records are marked as "never executed" when I use them only with RecordWildCards. The same could probably be said for NamedFieldPuns as well.
## Steps to reproduce
```haskell
{-# LANGUAGE RecordWildCards #-}
data Foo = Foo
{ foo1 :: Int
, foo2 :: Int
}
showFoo :: Foo -> IO ()
showFoo Foo{..} = print (foo1, foo2)
main = showFoo (Foo 1 2)
```
Running the above with coverage shows `foo1` and `foo2` as uncovered.
[Main.hs](/uploads/1c2bf48faab46d8da7a7cc10bd50aaae/Main.hs)
[Main.hs.html](/uploads/da8184b460bc0d399de6f498997191ab/Main.hs.html)
## Expected behavior
`foo1` and `foo2` should be marked as "hit"
## Environment
* GHC version used: 8.8.1
Optional:
* Operating System: MacOS 10.14.6
* System Architecture:
issue