haskell-language-server-2.7.0.0: plugins/hls-explicit-record-fields-plugin/test/testdata/Mixed.hs

{-# LANGUAGE Haskell2010 #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE NamedFieldPuns #-}

module Mixed where

data MyRec = MyRec
  { foo :: Int
  , bar :: Int
  , baz :: Char
  , quux :: Double
  }

convertMe :: MyRec -> String
convertMe MyRec {foo, bar = bar', ..} = show foo ++ show bar' ++ show baz