haskell-src-exts-1.24.0: tests/examples/QualifiedRecordfieldPuns.hs

{-# LANGUAGE NamedFieldPuns #-}
f (C {M.a}) = a