+1

.gitignore

reviewed

··· 1 1 + dist-*/

+12

.vscode/tasks.json

reviewed

··· 1 1 + { 2 2 + // See https://go.microsoft.com/fwlink/?LinkId=733558 3 3 + // for the documentation about the tasks.json format 4 4 + "version": "2.0.0", 5 5 + "tasks": [ 6 6 + { 7 7 + "label": "echo", 8 8 + "type": "shell", 9 9 + "command": "echo Hello" 10 10 + } 11 11 + ] 12 12 + }

+5

CHANGELOG.md

reviewed

··· 1 1 + # Revision history for optics-book 2 2 + 3 3 + ## 0.1.0.0 -- YYYY-mm-dd 4 4 + 5 5 + * First version. Released on an unsuspecting world.

+2

Setup.hs

reviewed

··· 1 1 + import Distribution.Simple 2 2 + main = defaultMain

+7

app/Main.hs

reviewed

··· 1 1 + module Main where 2 2 + 3 3 + import Control.Lens 4 4 + import Traversals 5 5 + 6 6 + main :: IO [Char] 7 7 + main = traversalActions

+10

app/Traversals.hs

reviewed

··· 1 1 + module Traversals where 2 2 + 3 3 + import Control.Applicative 4 4 + import Control.Lens 5 5 + 6 6 + traversalActions = do 7 7 + a <- print $ sequenceAOf _1 ((Nothing, "RoseBud") :: (Maybe Char, String)) 8 8 + b <- print $ sequenceAOf (traversed . _1) [("ab", 1), ("cd", 2)] 9 9 + c <- print $ sequenceAOf traversed [ZipList [1, 2], ZipList [3, 4]] 10 10 + return ""

+4

hie.yaml

reviewed

··· 1 1 + cradle: 2 2 + cabal: 3 3 + - path: "./app" 4 4 + component: "exe:optics-book"

+41

optics-book.cabal

reviewed

··· 1 1 + cabal-version: >=1.10 2 2 + -- Initial package description 'optics-book.cabal' generated by 'cabal 3 3 + -- init'. For further documentation, see 4 4 + -- http://haskell.org/cabal/users-guide/ 5 5 + 6 6 + name: optics-book 7 7 + version: 0.1.0.0 8 8 + -- synopsis: 9 9 + -- description: 10 10 + -- bug-reports: 11 11 + -- license: 12 12 + license-file: LICENSE 13 13 + author: Kaushik Chakraborty 14 14 + maintainer: git@kaushikc.org 15 15 + -- copyright: 16 16 + -- category: 17 17 + build-type: Simple 18 18 + extra-source-files: CHANGELOG.md 19 19 + 20 20 + executable optics-book 21 21 + main-is: Main.hs 22 22 + other-modules: Traversals 23 23 + -- other-extensions: 24 24 + build-depends: base >=4.13 && <4.14 25 25 + , aeson 26 26 + , containers 27 27 + , lens 28 28 + , lens-aeson 29 29 + , mtl 30 30 + , text 31 31 + 32 32 + default-extensions: TemplateHaskell 33 33 + , FlexibleInstances 34 34 + , FlexibleContexts 35 35 + , RankNTypes 36 36 + , ScopedTypeVariables 37 37 + , TypeApplications 38 38 + , TypeFamilies 39 39 + , InstanceSigs 40 40 + hs-source-dirs: app 41 41 + default-language: Haskell2010