git.iko.soy/generic-lens
on master help sign in
Merge Test24 and Test25 with unit tests
commit78f415f41653f007679793852b2136f3d033b1ba authorMatthew Pickering <matthewtpickering@gmail.com> dateWed 24 Jan 2018, 12:18 (9 years ago) parent770b640
4 files changed+8−27
compare with master
unifiedsplit
generic-lens.cabal+2−25 test/Spec.hs+4 test/24.hs → test/Test24.hs+1−1 test/25.hs → test/Test25.hs+1−1
generic-lens.cabal+2−25
@@ -81,10 +81,11 @@ test-suite generic-lens-test
8181 type: exitcode-stdio-1.0
8282 hs-source-dirs: test
8383 main-is: Spec.hs
84− other-modules: Util
84+ other-modules: Util Test24 Test25
8585
8686 build-depends: base >= 4.9 && <= 5.0
8787 , generic-lens
88+ , lens
8889 , profunctors
8990 , inspection-testing >= 0.2
9091 , HUnit
@@ -95,30 +96,6 @@ test-suite generic-lens-test
9596 build-depends: dump-core
9697 ghc-options: -fplugin=DumpCore -fplugin-opt DumpCore:core-html
9798
98−test-suite generic-lens-test-25
99− type: exitcode-stdio-1.0
100− hs-source-dirs: test
101− main-is: 25.hs
102−
103− build-depends: base >= 4.9 && <= 5.0
104− , generic-lens
105− , lens
106−
107− default-language: Haskell2010
108− ghc-options: -Wall
109−
110−test-suite generic-lens-test-24
111− type: exitcode-stdio-1.0
112− hs-source-dirs: test
113− main-is: 24.hs
114−
115− build-depends: base >= 4.9 && <= 5.0
116− , generic-lens
117− , lens
118−
119− default-language: Haskell2010
120− ghc-options: -Wall
121−
12299test-suite doctests
123100 default-language: Haskell2010
124101 type: exitcode-stdio-1.0
test/Spec.hs+4
@@ -24,6 +24,10 @@ import Data.Generics.Internal.VL.Lens
2424import Data.Generics.Internal.VL.Prism
2525import Data.Generics.Internal.VL.Traversal
2626
27+-- This is sufficient at we only want to test that they typecheck
28+import Test24 ()
29+import Test25 ()
30+
2731main :: IO ()
2832main = do
2933 res <- runTestTT tests
test/24.hs → test/Test24.hsrenamed+1−1
@@ -1,6 +1,6 @@
11{-# LANGUAGE DataKinds, DeriveGeneric, TypeApplications #-}
22
3−module Main where
3+module Test24 where
44
55-- Test case from #24, comments preserved
66import Control.Lens
test/25.hs → test/Test25.hsrenamed+1−1
@@ -4,7 +4,7 @@
44{-# LANGUAGE DeriveGeneric #-}
55{-# OPTIONS_GHC -Wall #-}
66
7−module Main where
7+module Test25 where
88
99import Control.Lens
1010import Data.Generics.Product