hls-explicit-record-fields-plugin-1.0.1.0: test/testdata/noop/Puns.hs

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

module Puns where

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

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