Using labels as lenses with GHC 8

LensLabels.hs

{-# LANGUAGE OverloadedLabels #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE DeriveGeneric #-}
module LensLabels where

import Prelude
import Control.Lens
import Data.Generics.Labels
import GHC.Generics

main :: IO ()
main = do
  putStrLn $ foo ^. #name
  putStrLn $ bar ^. #name
  print    $ baz ^. #foo
  putStrLn $ baz ^. #foo . #name
  where
  foo = Foo "hey"
  bar = Bar "you"
  baz = Baz foo

data Foo = Foo { name :: String } deriving (Show, Generic)
data Bar = Bar { name :: String } deriving (Show, Generic)
data Baz = Baz { foo :: Foo } deriving (Show, Generic)

package.yml

dependencies:
- base >=4.7 && <5
- containers
- directory
- free
- lens
- generic-lens
- generic-lens-labels
- parsec
- semigroupoids
- transformers