$ /nix/store/vzx1mi9c0xfadmsm9dhd83d005cb1qs9-coreutils-9.8/bin/timeout --kill-after=15s 7200s /nix/store/99b1z08awpxj8b6mzggn59gp1shljnff-nix-2.34.5/bin/nix --extra-experimental-features nix-command --extra-experimental-features flakes --log-format internal-json build --no-link git+https://github.com/NorfairKing/sydtest?ref=mutation-testing&rev=0b774cd71b385f2210b2cbb42429a4492d30527a#checks.x86_64-linux.mutation-opt-env-conf --print-build-logs warning: ignoring untrusted flake configuration setting 'extra-substituters'. Pass '--accept-flake-config' to trust it warning: ignoring untrusted flake configuration setting 'extra-trusted-public-keys'. Pass '--accept-flake-config' to trust it  Waiting for lock on sydtest-mutation-plugin Building opt-env-conf [opt-env-conf] Phase: setupCompilerEnvironmentPhase [opt-env-conf] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [opt-env-conf] Phase: unpackPhase [opt-env-conf] unpacking source archive /nix/store/p7jp2n8d06q5ay540q30a7jj6x1i02xg-opt-env-conf-source-0.15.0.1/opt-env-conf-0.15.0.1.tar.gz [opt-env-conf] source root is opt-env-conf-0.15.0.1 [opt-env-conf] setting SOURCE_DATE_EPOCH to timestamp 1778337408 of file "opt-env-conf-0.15.0.1/src/OptEnvConf/Validation.hs" [opt-env-conf] Phase: patchPhase [opt-env-conf] Phase: compileBuildDriverPhase [opt-env-conf] setupCompileFlags: -package-db=/build/tmp.DqyAqoeFcR/setup-package.conf.d -threaded [opt-env-conf] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.DqyAqoeFcR/Main.o ) [opt-env-conf] [2 of 2] Linking Setup [opt-env-conf] Phase: updateAutotoolsGnuConfigScriptsPhase [opt-env-conf] Phase: configurePhase [opt-env-conf] configureFlags: --verbose --prefix=/nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --with-gcc=gcc --package-db=/build/tmp.DqyAqoeFcR/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --disable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --ghc-options=-fplugin-opt=Test.Syd.Mutation.Plugin:--debug --disable-optimization --ghc-option=-j1 --ghc-option=+RTS --ghc-option=-A32M --ghc-option=-M16g --ghc-option=-RTS --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [opt-env-conf] Using Parsec parser [opt-env-conf] Configuring opt-env-conf-0.15.0.1... [opt-env-conf] Dependency aeson: using aeson-2.2.3.0 [opt-env-conf] Dependency autodocodec >=0.3.0.0: using autodocodec-0.5.0.0 [opt-env-conf] Dependency autodocodec-nix: using autodocodec-nix-0.1.0.1 [opt-env-conf] Dependency autodocodec-schema: using autodocodec-schema-0.2.0.1 [opt-env-conf] Dependency autodocodec-yaml: using autodocodec-yaml-0.4.0.2 [opt-env-conf] Dependency base <5: using base-4.20.2.0 [opt-env-conf] Dependency containers: using containers-0.7 [opt-env-conf] Dependency hashable: using hashable-1.5.0.0 [opt-env-conf] Dependency mtl: using mtl-2.3.1 [opt-env-conf] Dependency path: using path-0.9.6 [opt-env-conf] Dependency path-io: using path-io-1.8.2 [opt-env-conf] Dependency safe-coloured-text >=0.3.0.2: using safe-coloured-text-0.5.0.0 [opt-env-conf] Dependency safe-coloured-text-layout >=0.2.0.0: using [opt-env-conf] safe-coloured-text-layout-0.2.0.1 [opt-env-conf] Dependency safe-coloured-text-terminfo: using [opt-env-conf] safe-coloured-text-terminfo-0.3.0.0 [opt-env-conf] Dependency selective: using selective-0.7.0.1 [opt-env-conf] Dependency text: using text-2.1.3 [opt-env-conf] Dependency validity: using validity-0.12.1.0 [opt-env-conf] Dependency validity-containers: using validity-containers-0.5.0.5 [opt-env-conf] Dependency validity-text: using validity-text-0.3.1.3 [opt-env-conf] Source component graph: component lib [opt-env-conf] Configured component graph: [opt-env-conf]  component opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [opt-env-conf]  include autodocodec-nix-0.1.0.1-5MESxkCYs5t3k83QmZ9hdE [opt-env-conf]  include autodocodec-schema-0.2.0.1-EMdcjRrADhKDtaa7HekBFN [opt-env-conf]  include autodocodec-yaml-0.4.0.2-ELmM8ZZECuN9RM2KQlslRT [opt-env-conf]  include base-4.20.2.0-64da [opt-env-conf]  include containers-0.7-504a [opt-env-conf]  include hashable-1.5.0.0-HOT2SU7kjP9HxgwMjYLBlH [opt-env-conf]  include mtl-2.3.1-b4af [opt-env-conf]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [opt-env-conf]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [opt-env-conf]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf]  include safe-coloured-text-layout-0.2.0.1-ImxtJEFz2ymH91rITWZHG6 [opt-env-conf]  include safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [opt-env-conf]  include selective-0.7.0.1-GNtXMZVm0YvIj2VYkVe04f [opt-env-conf]  include text-2.1.3-c691 [opt-env-conf]  include validity-0.12.1.0-2vJMqyxn6Ae2B1jlP90HgP [opt-env-conf]  include validity-containers-0.5.0.5-JMisIHg6jT0HAhS7h7vTA4 [opt-env-conf]  include validity-text-0.3.1.3-5Fc5JnrCHq56kou0H34Gip [opt-env-conf] Linked component graph: [opt-env-conf]  unit opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [opt-env-conf]  include autodocodec-nix-0.1.0.1-5MESxkCYs5t3k83QmZ9hdE [opt-env-conf]  include autodocodec-schema-0.2.0.1-EMdcjRrADhKDtaa7HekBFN [opt-env-conf]  include autodocodec-yaml-0.4.0.2-ELmM8ZZECuN9RM2KQlslRT [opt-env-conf]  include base-4.20.2.0-64da [opt-env-conf]  include containers-0.7-504a [opt-env-conf]  include hashable-1.5.0.0-HOT2SU7kjP9HxgwMjYLBlH [opt-env-conf]  include mtl-2.3.1-b4af [opt-env-conf]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [opt-env-conf]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [opt-env-conf]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf]  include safe-coloured-text-layout-0.2.0.1-ImxtJEFz2ymH91rITWZHG6 [opt-env-conf]  include safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [opt-env-conf]  include selective-0.7.0.1-GNtXMZVm0YvIj2VYkVe04f [opt-env-conf]  include text-2.1.3-c691 [opt-env-conf]  include validity-0.12.1.0-2vJMqyxn6Ae2B1jlP90HgP [opt-env-conf]  include validity-containers-0.5.0.5-JMisIHg6jT0HAhS7h7vTA4 [opt-env-conf]  include validity-text-0.3.1.3-5Fc5JnrCHq56kou0H34Gip [opt-env-conf]  OptEnvConf=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf,OptEnvConf.Args=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Args,OptEnvConf.Capability=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Capability,OptEnvConf.Casing=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Casing,OptEnvConf.Check=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Check,OptEnvConf.Completer=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Completer,OptEnvConf.Completion=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Completion,OptEnvConf.Doc=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Doc,OptEnvConf.EnvMap=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.EnvMap,OptEnvConf.Error=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Error,OptEnvConf.Lint=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Lint,OptEnvConf.Main=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Main,OptEnvConf.Nix=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Nix,OptEnvConf.NonDet=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.NonDet,OptEnvConf.Output=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Output,OptEnvConf.Parser=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Parser,OptEnvConf.Reader=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Reader,OptEnvConf.Run=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Run,OptEnvConf.Setting=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Setting,OptEnvConf.Terminal=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Terminal,OptEnvConf.Validation=opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI:OptEnvConf.Validation [opt-env-conf] Ready component graph: [opt-env-conf]  definite opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf]  depends aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf]  depends autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [opt-env-conf]  depends autodocodec-nix-0.1.0.1-5MESxkCYs5t3k83QmZ9hdE [opt-env-conf]  depends autodocodec-schema-0.2.0.1-EMdcjRrADhKDtaa7HekBFN [opt-env-conf]  depends autodocodec-yaml-0.4.0.2-ELmM8ZZECuN9RM2KQlslRT [opt-env-conf]  depends base-4.20.2.0-64da [opt-env-conf]  depends containers-0.7-504a [opt-env-conf]  depends hashable-1.5.0.0-HOT2SU7kjP9HxgwMjYLBlH [opt-env-conf]  depends mtl-2.3.1-b4af [opt-env-conf]  depends path-0.9.6-JuNdYVciddTDWUiQr3NuVx [opt-env-conf]  depends path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [opt-env-conf]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf]  depends safe-coloured-text-layout-0.2.0.1-ImxtJEFz2ymH91rITWZHG6 [opt-env-conf]  depends safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [opt-env-conf]  depends selective-0.7.0.1-GNtXMZVm0YvIj2VYkVe04f [opt-env-conf]  depends text-2.1.3-c691 [opt-env-conf]  depends validity-0.12.1.0-2vJMqyxn6Ae2B1jlP90HgP [opt-env-conf]  depends validity-containers-0.5.0.5-JMisIHg6jT0HAhS7h7vTA4 [opt-env-conf]  depends validity-text-0.3.1.3-5Fc5JnrCHq56kou0H34Gip [opt-env-conf] Using Cabal-3.12.1.0 compiled by ghc-9.10 [opt-env-conf] Using compiler: ghc-9.10.3 [opt-env-conf] Using install prefix: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 [opt-env-conf] Executables installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/bin [opt-env-conf] Libraries installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf] Dynamic Libraries installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [opt-env-conf] Private executables installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/libexec/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-0.15.0.1 [opt-env-conf] Data files installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/share/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-0.15.0.1 [opt-env-conf] Documentation installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/share/doc/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-0.15.0.1 [opt-env-conf] Configuration files installed in: [opt-env-conf] /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/etc [opt-env-conf] No alex found [opt-env-conf] Using ar found on system at: [opt-env-conf] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [opt-env-conf] No c2hs found [opt-env-conf] No cpphs found [opt-env-conf] No doctest found [opt-env-conf] Using gcc version 14.3.0 given by user at: [opt-env-conf] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [opt-env-conf] Using ghc version 9.10.3 found on system at: [opt-env-conf] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [opt-env-conf] Using ghc-pkg version 9.10.3 found on system at: [opt-env-conf] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [opt-env-conf] No ghcjs found [opt-env-conf] No ghcjs-pkg found [opt-env-conf] No greencard found [opt-env-conf] Using haddock version 2.31.1 found on system at: [opt-env-conf] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [opt-env-conf] No happy found [opt-env-conf] Using haskell-suite found on system at: haskell-suite-dummy-location [opt-env-conf] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [opt-env-conf] No hmake found [opt-env-conf] Using hpc version 0.69 found on system at: [opt-env-conf] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [opt-env-conf] Using hsc2hs version 0.68.10 found on system at: [opt-env-conf] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [opt-env-conf] Using hscolour version 1.25 found on system at: [opt-env-conf] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [opt-env-conf] No jhc found [opt-env-conf] Using ld found on system at: [opt-env-conf] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [opt-env-conf] No pkg-config found [opt-env-conf] Using runghc version 9.10.3 found on system at: [opt-env-conf] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [opt-env-conf] Using strip version 2.44 found on system at: [opt-env-conf] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [opt-env-conf] Using tar found on system at: [opt-env-conf] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [opt-env-conf] No uhc found [opt-env-conf] Phase: buildPhase [opt-env-conf] mutation-nix: setting MUTATION_MANIFEST_DIR=/nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest [opt-env-conf] Preprocessing library for opt-env-conf-0.15.0.1... [opt-env-conf] Building library for opt-env-conf-0.15.0.1... [opt-env-conf] [ 1 of 22] Compiling OptEnvConf.Args ( src/OptEnvConf/Args.hs, dist/build/OptEnvConf/Args.o, dist/build/OptEnvConf/Args.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Args [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:426:25-31 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:418:26-32 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:406:20-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:406:20-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:372:27-31 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:355:14-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:324:16-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:324:16-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:309:11-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:309:11-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:296:14-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:301:18-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:7-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:7-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:32-41 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:32-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:31-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:31-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:27-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:27-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:283:9-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:133:33-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:133:33-47 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:148:35-45 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:150:32-40 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:154:25-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:168:45-60 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:187:31-49 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:201:39-57 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:204:65-82 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:204:65-82 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:205:39-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:77-91 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:77-91 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:206:39-57 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:36-37 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:36-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:198:27-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:198:27-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:143:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:143:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:138:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:138:23-26 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:222:31-71 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:226:34-72 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:225:7-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:225:7-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:241:25-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:247:39-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:248:42-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:243:17-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:243:17-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:240:13-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:240:13-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:387:23-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:79:26-30 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:77:23-33 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:77:23-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:82:26-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:80:17-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:80:17-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:67:26-31 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:68:18-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf] added 151 mutations [opt-env-conf] [ 2 of 22] Compiling OptEnvConf.Capability ( src/OptEnvConf/Capability.hs, dist/build/OptEnvConf/Capability.o, dist/build/OptEnvConf/Capability.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Capability [opt-env-conf] added 0 mutations [opt-env-conf] [ 3 of 22] Compiling OptEnvConf.Casing ( src/OptEnvConf/Casing.hs, dist/build/OptEnvConf/Casing.o, dist/build/OptEnvConf/Casing.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Casing [opt-env-conf] added 0 mutations [opt-env-conf] [ 4 of 22] Compiling OptEnvConf.Completer ( src/OptEnvConf/Completer.hs, dist/build/OptEnvConf/Completer.o, dist/build/OptEnvConf/Completer.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Completer [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:266:27-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:266:27-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:266:26-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:266:26-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completer.hs:266:15-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:267:34-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:267:34-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:267:33-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:267:33-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completer.hs:267:22-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:265:7-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:265:7-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:243:66-75 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:243:66-75 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completer.hs:243:28-76 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completer.hs:244:15-16 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:243:23-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:243:23-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completer.hs:246:27-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:19-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:19-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:54-78 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:54-78 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:53-79 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:53-79 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:49-79 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:49-79 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completer.hs:215:16-20 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completer.hs:216:8-13 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:192:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:192:9-10 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:144:9-50 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:144:9-50 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completer.hs:144:53-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf] added 88 mutations [opt-env-conf] [ 5 of 22] Compiling OptEnvConf.EnvMap ( src/OptEnvConf/EnvMap.hs, dist/build/OptEnvConf/EnvMap.o, dist/build/OptEnvConf/EnvMap.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.EnvMap [opt-env-conf] added 0 mutations [opt-env-conf] [ 6 of 22] Compiling OptEnvConf.NonDet ( src/OptEnvConf/NonDet.hs, dist/build/OptEnvConf/NonDet.o, dist/build/OptEnvConf/NonDet.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.NonDet [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/NonDet.hs:74:24-42 [opt-env-conf] added 1 mutations [opt-env-conf] [ 7 of 22] Compiling OptEnvConf.Reader ( src/OptEnvConf/Reader.hs, dist/build/OptEnvConf/Reader.o, dist/build/OptEnvConf/Reader.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Reader [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:78:41-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:78:41-20 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Reader.hs:70:32-36 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:62:23-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:62:23-20 [opt-env-conf] added 5 mutations [opt-env-conf] [ 8 of 22] Compiling OptEnvConf.Setting ( src/OptEnvConf/Setting.hs, dist/build/OptEnvConf/Setting.o, dist/build/OptEnvConf/Setting.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Setting [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:416:43-48 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:397:43-47 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:379:57-62 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:375:47-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:275:45-52 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:276:47-51 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:277:43-47 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:278:52-58 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:284:55-70 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:286:40-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:287:48-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:244:13-17 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:240:41-45 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:201:17-21 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:183:28-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:185:26-31 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:191:23-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf] added 112 mutations [opt-env-conf] [ 9 of 22] Compiling OptEnvConf.Parser ( src/OptEnvConf/Parser.hs, dist/build/OptEnvConf/Parser.o, dist/build/OptEnvConf/Parser.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Parser [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:705:57-63 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:703:13-68 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:703:13-68 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:686:41-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:674:15-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:674:15-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:664:25-30 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:618:31-36 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1055:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1072:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1093:12-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1063:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1084:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1102:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:563:72-117 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:877:11-26 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:878:11-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:879:11-33 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:898:34-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:899:39-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:899:34-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:900:32-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:905:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:917:34-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:918:39-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:918:34-44 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:919:32-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:924:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:939:36-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:941:34-39 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:942:32-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:946:31-36 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:947:32-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:960:36-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:962:34-39 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:964:35-42 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:967:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:979:34-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:980:39-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:980:34-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:981:32-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:986:29-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:829:41-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:829:41-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:774:47-68 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:788:19-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:788:19-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:297:39-40 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:255:27-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:258:28-32 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:259:28-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:266:32-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:238:30-34 [opt-env-conf] added 381 mutations [opt-env-conf] [10 of 22] Compiling OptEnvConf.Output ( src/OptEnvConf/Output.hs, dist/build/OptEnvConf/Output.o, dist/build/OptEnvConf/Output.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Output [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Output.hs:112:34-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:81:18-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:81:18-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:71:12-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:71:12-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:72:8-91 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:72:8-91 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:66:26-73 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:66:26-73 [opt-env-conf] added 17 mutations [opt-env-conf] [11 of 22] Compiling OptEnvConf.Nix ( src/OptEnvConf/Nix.hs, dist/build/OptEnvConf/Nix.o, dist/build/OptEnvConf/Nix.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Nix [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Nix.hs:90:47-55 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Nix.hs:85:69-97 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:75:35-98 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:75:35-98 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:38:19-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:38:19-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf] added 16 mutations [opt-env-conf] [12 of 22] Compiling OptEnvConf.Doc ( src/OptEnvConf/Doc.hs, dist/build/OptEnvConf/Doc.o, dist/build/OptEnvConf/Doc.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Doc [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:819:51-71 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:819:51-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:819:50-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:819:50-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:819:46-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:819:46-72 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:819:7-73 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:824:18-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:824:18-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:826:17-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:826:17-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:769:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:769:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:776:50-69 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:776:50-69 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:776:49-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:776:49-70 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:776:45-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:776:45-70 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:776:7-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:727:17-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:727:17-34 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:725:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:724:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:724:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:733:50-69 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:733:50-69 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:733:49-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:733:49-70 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:733:45-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:733:45-70 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:733:7-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:632:55-85 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:632:55-85 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:632:107-112 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:637:38-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:638:30-35 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:639:29-34 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:640:18-22 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:650:22-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:651:21-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:649:39-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:649:39-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:653:29-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:655:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:658:29-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:658:11-79 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:658:11-79 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:672:21-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:672:21-38 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:671:19-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:675:21-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:675:21-36 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:674:19-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:681:21-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:681:21-36 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:679:25-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:679:25-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:678:23-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:678:23-24 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:677:19-20 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:476:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:477:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:478:29-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:485:31-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:485:31-82 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:474:5-10 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:459:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:460:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:461:29-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:462:27-43 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:462:27-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:468:24-50 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:457:5-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:392:19-23 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:393:18-23 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:394:20-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:395:19-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:396:22-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:232:9-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:232:9-26 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:229:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:229:11-12 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:228:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:238:9-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:238:9-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:235:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:235:11-12 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:234:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:246:9-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:246:9-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:244:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:244:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:242:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:242:11-12 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:241:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:252:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:252:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:250:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:250:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:268:32-56 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:268:32-56 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:279:14-33 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:279:14-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:279:13-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:279:13-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:279:9-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:279:9-34 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:278:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:139:24-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:139:24-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:168:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:168:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:169:40-54 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:169:40-54 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:171:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:171:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:172:35-64 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:172:35-64 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:173:39-69 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:173:39-69 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:177:46-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:177:46-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:452:47-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:452:47-61 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:510:28-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:501:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:501:13-14 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:541:40-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:588:28-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:579:29-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:579:29-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:579:25-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:579:25-39 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:575:58-64 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:574:23-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:573:19-20 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:573:19-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:555:37-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:559:20-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:549:11-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:549:11-21 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:607:35-58 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:20-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:20-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:19-90 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:19-90 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:717:27-53 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:697:43-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:36-77 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:36-77 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:35-106 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:35-106 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:704:24-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:704:24-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:707:23-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:707:23-54 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:434:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:434:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:444:18-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:444:18-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:444:17-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:444:17-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:444:13-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:444:13-48 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:441:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:441:13-14 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:441:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:413:37-49 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:297:38-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:312:15-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:312:15-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:313:15-47 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:313:15-47 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:314:15-48 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:314:15-48 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:315:15-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:315:15-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:317:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:317:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:319:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:319:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:326:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:326:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:326:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:326:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:326:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:326:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:19-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:19-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:323:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:332:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:332:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:332:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:332:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:19-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:19-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:329:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:338:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:338:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:338:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:338:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:338:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:338:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:19-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:19-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:335:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:344:22-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:344:22-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:344:21-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:344:21-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:344:17-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:344:17-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:19-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:19-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:341:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:367:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:367:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:367:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:367:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:367:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:367:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:364:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:364:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:364:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:373:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:373:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:373:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:373:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:370:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:370:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:370:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:379:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:379:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:379:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:379:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:379:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:379:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:376:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:376:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:376:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:385:22-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:385:22-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:385:21-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:385:21-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:385:17-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:385:17-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:382:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:382:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:382:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf] added 431 mutations [opt-env-conf] [13 of 22] Compiling OptEnvConf.Error ( src/OptEnvConf/Error.hs, dist/build/OptEnvConf/Error.o, dist/build/OptEnvConf/Error.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Error [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:89:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:89:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:93:11-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:93:11-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:13-80 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:13-80 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:132:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:132:11-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:83:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:83:5-6 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:52:22-26 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:53:29-34 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:54:26-31 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf] added mutation Negate at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:56:34-38 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:57:33-38 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:58:32-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:59:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:60:32-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:61:32-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:62:28-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:63:33-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:64:31-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:66:40-45 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:67:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:68:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:69:36-41 [opt-env-conf] added 58 mutations [opt-env-conf] [14 of 22] Compiling OptEnvConf.Completion ( src/OptEnvConf/Completion.hs, dist/build/OptEnvConf/Completion.o, dist/build/OptEnvConf/Completion.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Completion [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:254:20-23 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:257:25-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:307:18-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:307:18-42 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:296:31-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:297:31-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:274:22-29 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:281:37-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:287:23-30 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:287:23-30 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:287:41-50 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:288:43-50 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:315:30-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:350:59-75 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:361:29-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:360:17-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:360:17-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:378:19-31 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:378:19-31 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:378:86-94 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:378:57-95 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:378:57-95 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:388:28-36 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:379:32-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:398:70-77 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completion.hs:401:37-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completion.hs:402:38-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:413:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:415:23-30 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:428:28-35 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:426:35-35 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:437:39-51 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:451:32-39 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:449:35-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:459:36-43 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:457:44-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:473:53-60 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:474:47-63 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:487:32-39 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completion.hs:163:17-18 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completion.hs:163:17-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:171:3-100 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf] added 97 mutations [opt-env-conf] [15 of 22] Compiling OptEnvConf.Terminal ( src/OptEnvConf/Terminal.hs, dist/build/OptEnvConf/Terminal.o, dist/build/OptEnvConf/Terminal.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Terminal [opt-env-conf] added 0 mutations [opt-env-conf] [16 of 22] Compiling OptEnvConf.Validation ( src/OptEnvConf/Validation.hs, dist/build/OptEnvConf/Validation.o, dist/build/OptEnvConf/Validation.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Validation [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:81:46-17 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:81:46-17 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:69:32-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:69:32-20 [opt-env-conf] added 4 mutations [opt-env-conf] [17 of 22] Compiling OptEnvConf.Run ( src/OptEnvConf/Run.hs, dist/build/OptEnvConf/Run.o, dist/build/OptEnvConf/Run.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Run [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:716:13-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:712:3-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:712:3-21 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:707:13-19 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:703:3-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:703:3-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:644:14-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:636:3-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:636:3-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Run.hs:511:27-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:529:31-33 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:535:35-33 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:553:30-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:544:32-37 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:556:35-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:559:35-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:562:43-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:565:42-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:568:44-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:595:38-78 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:594:32-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:594:32-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:587:21-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:587:21-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:582:17-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:582:17-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:490:19-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:490:19-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:485:20-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:485:20-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:464:22-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:463:3-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:463:3-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Run.hs:75:27-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:80:9-79 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:80:9-79 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:97:31-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:97:31-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:101:41-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:101:41-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:92:15-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:92:15-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:86:36-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:86:36-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:113:25-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:116:27-37 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:119:29-42 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:131:24-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:127:11-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:127:11-31 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:122:26-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:138:11-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:138:11-28 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:134:29-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:143:29-25 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:158:11-112 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:158:11-112 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:152:20-112 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:150:37-112 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:195:29-70 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:194:15-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:194:15-25 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:216:25-85 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:216:25-85 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:215:28-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:213:15-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:213:15-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:222:25-73 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:222:25-73 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:221:27-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:219:15-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:219:15-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:207:11-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:207:11-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:224:38-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:273:21-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:273:21-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:268:17-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:268:17-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:292:19-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:292:19-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:288:26-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:288:26-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:323:29-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:323:29-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:315:25-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:315:25-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:352:29-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:352:29-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:360:27-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:360:27-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:339:37-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:339:37-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:388:49-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:388:49-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:386:72-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:386:72-82 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:419:58-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:407:59-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:407:59-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:398:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:398:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:427:43-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:427:43-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:423:70-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:423:70-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:379:31-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:379:31-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:375:36-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:375:36-54 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:443:53-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:440:44-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:436:31-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:436:31-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:431:27-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:431:27-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:369:23-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:369:23-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:333:19-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:333:19-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:303:15-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:303:15-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:283:11-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:283:11-42 [opt-env-conf] added 201 mutations [opt-env-conf] [18 of 22] Compiling OptEnvConf.Check ( src/OptEnvConf/Check.hs, dist/build/OptEnvConf/Check.o, dist/build/OptEnvConf/Check.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Check [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Check.hs:80:42-56 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Check.hs:91:72-105 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:95:11-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:95:11-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:81:10-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:81:10-40 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:34:25-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:40:7-83 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:39:7-143 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:44:7-71 [opt-env-conf] added 10 mutations [opt-env-conf] [19 of 22] Compiling OptEnvConf.Lint ( src/OptEnvConf/Lint.hs, dist/build/OptEnvConf/Lint.o, dist/build/OptEnvConf/Lint.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Lint [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Lint.hs:238:20-25 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Lint.hs:246:28-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Lint.hs:255:29-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:280:21-62 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:280:21-62 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:280:20-63 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:280:20-63 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Lint.hs:278:16-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:13-63 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:13-63 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:13-65 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:13-65 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:196:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:196:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:208:13-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:208:13-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:11-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf] added 197 mutations [opt-env-conf] [20 of 22] Compiling OptEnvConf.Main ( src/OptEnvConf/Main.hs, dist/build/OptEnvConf/Main.o, dist/build/OptEnvConf/Main.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Main [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:284:20-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:286:19-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:170:14-19 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:172:11-19 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:172:11-19 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:172:24-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:185:15-19 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:74:7-61 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:96:15-71 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:100:15-78 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:126:19-69 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:132:21-88 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:137:21-98 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:142:21-96 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:146:21-97 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:150:21-67 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:154:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:158:21-67 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:160:56-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added 88 mutations [opt-env-conf] [21 of 22] Compiling OptEnvConf ( src/OptEnvConf.hs, dist/build/OptEnvConf.o, dist/build/OptEnvConf.dyn_o ) [opt-env-conf] mutation: instrumenting OptEnvConf [opt-env-conf] added 0 mutations [opt-env-conf] [22 of 22] Compiling Paths_opt_env_conf ( dist/build/autogen/Paths_opt_env_conf.hs, dist/build/Paths_opt_env_conf.o, dist/build/Paths_opt_env_conf.dyn_o ) [opt-env-conf] [ 1 of 22] Compiling OptEnvConf.Args ( src/OptEnvConf/Args.hs, dist/build/OptEnvConf/Args.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Args [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:426:25-31 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:418:26-32 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:406:20-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:406:20-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:372:27-31 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:355:14-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:324:16-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:324:16-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:309:11-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:309:11-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:296:14-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:301:18-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:7-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:7-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:32-41 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:32-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:31-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:31-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:27-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:27-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:283:9-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:133:33-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:133:33-47 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:148:35-45 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:150:32-40 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:154:25-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:168:45-60 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:187:31-49 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:201:39-57 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:204:65-82 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:204:65-82 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:205:39-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:77-91 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:77-91 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:206:39-57 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:36-37 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:205:36-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:198:27-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:198:27-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:143:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:143:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:138:23-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:138:23-26 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:222:31-71 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:226:34-72 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:225:7-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:225:7-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:241:25-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:247:39-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:248:42-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:243:17-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:243:17-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:240:13-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:240:13-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Args.hs:387:23-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:79:26-30 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:77:23-33 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:77:23-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:82:26-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:80:17-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:80:17-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:67:26-31 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Args.hs:68:18-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation Negate at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf] added 151 mutations [opt-env-conf] [ 2 of 22] Compiling OptEnvConf.Capability ( src/OptEnvConf/Capability.hs, dist/build/OptEnvConf/Capability.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Capability [opt-env-conf] added 0 mutations [opt-env-conf] [ 3 of 22] Compiling OptEnvConf.Casing ( src/OptEnvConf/Casing.hs, dist/build/OptEnvConf/Casing.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Casing [opt-env-conf] added 0 mutations [opt-env-conf] [ 4 of 22] Compiling OptEnvConf.Completer ( src/OptEnvConf/Completer.hs, dist/build/OptEnvConf/Completer.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Completer [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:266:27-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:266:27-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:266:26-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:266:26-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completer.hs:266:15-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:267:34-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:267:34-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:267:33-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:267:33-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completer.hs:267:22-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:265:7-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:265:7-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:243:66-75 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:243:66-75 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completer.hs:243:28-76 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completer.hs:244:15-16 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:243:23-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:243:23-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completer.hs:246:27-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:19-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:19-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:54-78 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:54-78 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:53-79 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:53-79 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:254:49-79 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:254:49-79 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completer.hs:215:16-20 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completer.hs:216:8-13 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:192:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:192:9-10 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:144:9-50 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:144:9-50 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completer.hs:144:53-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf] added 88 mutations [opt-env-conf] [ 5 of 22] Compiling OptEnvConf.EnvMap ( src/OptEnvConf/EnvMap.hs, dist/build/OptEnvConf/EnvMap.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.EnvMap [opt-env-conf] added 0 mutations [opt-env-conf] [ 6 of 22] Compiling OptEnvConf.NonDet ( src/OptEnvConf/NonDet.hs, dist/build/OptEnvConf/NonDet.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.NonDet [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/NonDet.hs:74:24-42 [opt-env-conf] added 1 mutations [opt-env-conf] [ 7 of 22] Compiling OptEnvConf.Reader ( src/OptEnvConf/Reader.hs, dist/build/OptEnvConf/Reader.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Reader [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:78:41-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:78:41-20 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Reader.hs:70:32-36 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:62:23-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Reader.hs:62:23-20 [opt-env-conf] added 5 mutations [opt-env-conf] [ 8 of 22] Compiling OptEnvConf.Setting ( src/OptEnvConf/Setting.hs, dist/build/OptEnvConf/Setting.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Setting [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:416:43-48 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:397:43-47 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:379:57-62 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:375:47-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:275:45-52 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:276:47-51 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:277:43-47 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:278:52-58 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:284:55-70 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:286:40-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Setting.hs:287:48-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:244:13-17 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:240:41-45 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:201:17-21 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:183:28-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:185:26-31 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Setting.hs:191:23-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf] added mutation Negate at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf] added 112 mutations [opt-env-conf] [ 9 of 22] Compiling OptEnvConf.Parser ( src/OptEnvConf/Parser.hs, dist/build/OptEnvConf/Parser.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Parser [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:705:57-63 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:703:13-68 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:703:13-68 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:686:41-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:674:15-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:674:15-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:664:25-30 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:618:31-36 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1055:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1072:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1093:12-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1063:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1084:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:1102:12-18 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:563:72-117 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:877:11-26 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:878:11-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:879:11-33 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:898:34-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:899:39-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:899:34-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:900:32-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:905:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:917:34-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:918:39-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:918:34-44 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:919:32-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:924:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:939:36-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:941:34-39 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:942:32-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:946:31-36 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:947:32-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:960:36-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:962:34-39 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:964:35-42 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:967:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:979:34-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:980:39-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:980:34-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:981:32-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:986:29-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:829:41-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:829:41-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Parser.hs:774:47-68 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:788:19-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:788:19-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Parser.hs:297:39-40 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:255:27-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:258:28-32 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:259:28-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:266:32-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Parser.hs:238:30-34 [opt-env-conf] added 381 mutations [opt-env-conf] [10 of 22] Compiling OptEnvConf.Output ( src/OptEnvConf/Output.hs, dist/build/OptEnvConf/Output.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Output [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Output.hs:112:34-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:81:18-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:81:18-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:71:12-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:71:12-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:72:8-91 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:72:8-91 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:66:26-73 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Output.hs:66:26-73 [opt-env-conf] added 17 mutations [opt-env-conf] [11 of 22] Compiling OptEnvConf.Nix ( src/OptEnvConf/Nix.hs, dist/build/OptEnvConf/Nix.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Nix [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Nix.hs:90:47-55 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Nix.hs:85:69-97 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:75:35-98 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Nix.hs:75:35-98 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:38:19-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:38:19-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf] added 16 mutations [opt-env-conf] [12 of 22] Compiling OptEnvConf.Doc ( src/OptEnvConf/Doc.hs, dist/build/OptEnvConf/Doc.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Doc [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:819:51-71 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:819:51-71 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:819:50-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:819:50-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:819:46-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:819:46-72 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:819:7-73 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:824:18-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:824:18-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:826:17-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:826:17-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:769:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:769:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:776:50-69 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:776:50-69 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:776:49-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:776:49-70 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:776:45-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:776:45-70 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:776:7-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:727:17-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:727:17-34 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:725:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:724:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:724:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:733:50-69 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:733:50-69 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:733:49-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:733:49-70 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:733:45-70 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:733:45-70 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:733:7-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:632:55-85 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:632:55-85 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:632:107-112 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:637:38-43 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:638:30-35 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:639:29-34 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:640:18-22 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:650:22-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:651:21-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:649:39-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:649:39-39 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:653:29-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:655:20-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:658:29-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:658:11-79 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:658:11-79 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:672:21-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:672:21-38 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:671:19-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:675:21-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:675:21-36 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:674:19-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:681:21-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:681:21-36 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:679:25-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:679:25-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:678:23-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:678:23-24 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:677:19-20 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:476:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:477:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:478:29-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:485:31-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:485:31-82 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:474:5-10 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:459:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:460:29-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:461:29-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:462:27-43 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:462:27-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:468:24-50 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:457:5-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:392:19-23 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:393:18-23 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:394:20-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:395:19-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:396:22-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:232:9-26 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:232:9-26 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:229:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:229:11-12 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:228:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:238:9-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:238:9-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:235:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:235:11-12 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:234:7-8 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:246:9-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:246:9-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:244:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:244:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:242:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:242:11-12 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:241:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:252:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:252:18-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:250:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:250:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:268:32-56 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:268:32-56 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:279:14-33 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:279:14-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:279:13-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:279:13-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:279:9-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:279:9-34 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:278:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:139:24-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:139:24-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:168:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:168:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:169:40-54 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:169:40-54 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:171:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:171:36-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:172:35-64 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:172:35-64 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:173:39-69 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:173:39-69 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:177:46-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:177:46-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:452:47-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:452:47-61 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:510:28-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:501:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:501:13-14 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:541:40-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:588:28-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:579:29-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:579:29-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:579:25-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:579:25-39 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:575:58-64 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:574:23-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:573:19-20 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:573:19-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:555:37-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Doc.hs:559:20-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:549:11-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:549:11-21 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:607:35-58 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:20-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:20-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:19-90 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:609:19-90 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:717:27-53 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:697:43-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:36-77 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:36-77 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:35-106 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:700:35-106 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:704:24-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:704:24-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:707:23-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Doc.hs:707:23-54 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:434:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:434:9-10 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:444:18-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:444:18-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:444:17-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:444:17-48 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:444:13-48 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:444:13-48 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:441:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:441:13-14 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:441:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:413:37-49 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Doc.hs:297:38-50 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:312:15-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:312:15-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:313:15-47 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:313:15-47 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:314:15-48 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:314:15-48 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:315:15-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:315:15-34 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:317:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:317:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:319:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:319:15-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:326:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:326:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:326:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:326:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:326:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:326:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:19-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:19-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:323:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:323:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:332:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:332:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:332:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:332:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:19-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:19-38 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:329:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:329:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:338:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:338:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:338:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:338:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:338:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:338:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:19-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:19-52 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:335:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:335:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:344:22-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:344:22-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:344:21-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:344:21-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:344:17-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:344:17-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:19-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:19-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:341:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:341:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:367:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:367:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:367:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:367:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:367:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:367:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:364:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:364:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:364:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:373:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:373:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:373:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:373:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:370:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:370:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:370:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:379:22-38 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:379:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:379:21-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:379:21-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:379:17-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:379:17-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:376:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:376:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:376:15-16 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:385:22-39 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:385:22-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:385:21-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:385:21-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:385:17-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:385:17-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:382:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:382:17-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Doc.hs:382:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf] added mutation Negate at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf] added 431 mutations [opt-env-conf] [13 of 22] Compiling OptEnvConf.Error ( src/OptEnvConf/Error.hs, dist/build/OptEnvConf/Error.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Error [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:89:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:89:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:93:11-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:93:11-53 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:13-80 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:13-80 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:127:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:132:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:132:11-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:83:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Error.hs:83:5-6 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:52:22-26 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:53:29-34 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:54:26-31 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf] added mutation Negate at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:56:34-38 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:57:33-38 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:58:32-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:59:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:60:32-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:61:32-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:62:28-33 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:63:33-37 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:64:31-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf] added mutation Negate at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:66:40-45 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:67:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:68:31-36 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Error.hs:69:36-41 [opt-env-conf] added 58 mutations [opt-env-conf] [14 of 22] Compiling OptEnvConf.Completion ( src/OptEnvConf/Completion.hs, dist/build/OptEnvConf/Completion.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Completion [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:254:20-23 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:257:25-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:307:18-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:307:18-42 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:296:31-38 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:297:31-38 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:274:22-29 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:281:37-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:287:23-30 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:287:23-30 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:287:41-50 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:288:43-50 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:315:30-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:350:59-75 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:361:29-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:360:17-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:360:17-42 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:378:19-31 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:378:19-31 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:378:86-94 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:378:57-95 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:378:57-95 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:388:28-36 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:379:32-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:398:70-77 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completion.hs:401:37-41 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Completion.hs:402:38-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:413:22-38 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:415:23-30 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:428:28-35 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:426:35-35 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:437:39-51 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:451:32-39 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:449:35-39 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:459:36-43 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:457:44-43 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:473:53-60 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:474:47-63 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Completion.hs:487:32-39 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completion.hs:163:17-18 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Completion.hs:163:17-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf] added mutation Negate at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Completion.hs:171:3-100 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf] added 97 mutations [opt-env-conf] [15 of 22] Compiling OptEnvConf.Terminal ( src/OptEnvConf/Terminal.hs, dist/build/OptEnvConf/Terminal.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Terminal [opt-env-conf] added 0 mutations [opt-env-conf] [16 of 22] Compiling OptEnvConf.Validation ( src/OptEnvConf/Validation.hs, dist/build/OptEnvConf/Validation.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Validation [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:81:46-17 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:81:46-17 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:69:32-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Validation.hs:69:32-20 [opt-env-conf] added 4 mutations [opt-env-conf] [17 of 22] Compiling OptEnvConf.Run ( src/OptEnvConf/Run.hs, dist/build/OptEnvConf/Run.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Run [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:716:13-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:712:3-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:712:3-21 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:707:13-19 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:703:3-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:703:3-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:644:14-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:636:3-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:636:3-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Run.hs:511:27-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:529:31-33 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:535:35-33 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:553:30-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:544:32-37 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:556:35-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:559:35-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:562:43-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:565:42-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:568:44-43 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:595:38-78 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:594:32-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:594:32-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:587:21-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:587:21-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:582:17-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:582:17-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:490:19-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:490:19-27 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:485:20-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:485:20-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:464:22-66 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:463:3-20 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:463:3-20 [opt-env-conf] added mutation IntLit at src/OptEnvConf/Run.hs:75:27-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:80:9-79 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:80:9-79 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:97:31-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:97:31-41 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:101:41-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:101:41-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:92:15-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:92:15-43 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:86:36-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:86:36-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:113:25-35 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:116:27-37 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:119:29-42 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:131:24-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:127:11-31 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:127:11-31 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:122:26-31 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:138:11-28 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:138:11-28 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:134:29-28 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:143:29-25 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:158:11-112 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:158:11-112 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:152:20-112 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:150:37-112 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:195:29-70 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:194:15-25 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:194:15-25 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:216:25-85 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:216:25-85 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:215:28-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:213:15-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:213:15-40 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:222:25-73 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:222:25-73 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:221:27-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:219:15-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:219:15-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:207:11-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:207:11-39 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:224:38-20 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:273:21-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:273:21-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:268:17-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:268:17-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:292:19-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:292:19-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:288:26-37 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:288:26-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf] added mutation Negate at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:323:29-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:323:29-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:315:25-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:315:25-47 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:352:29-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:352:29-39 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:360:27-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:360:27-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:339:37-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:339:37-53 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:388:49-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:388:49-81 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:386:72-82 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:386:72-82 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:419:58-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:407:59-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:407:59-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:398:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:398:55-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:427:43-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:427:43-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:423:70-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:423:70-69 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:379:31-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:379:31-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:375:36-54 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:375:36-54 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Run.hs:443:53-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Run.hs:440:44-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:436:31-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:436:31-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:431:27-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:431:27-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:369:23-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:369:23-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:333:19-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:333:19-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:303:15-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:303:15-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:283:11-42 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Run.hs:283:11-42 [opt-env-conf] added 201 mutations [opt-env-conf] [18 of 22] Compiling OptEnvConf.Check ( src/OptEnvConf/Check.hs, dist/build/OptEnvConf/Check.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Check [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Check.hs:80:42-56 [opt-env-conf] added mutation MaybeOp at src/OptEnvConf/Check.hs:91:72-105 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:95:11-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:95:11-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:81:10-40 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Check.hs:81:10-40 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:34:25-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:40:7-83 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:39:7-143 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Check.hs:44:7-71 [opt-env-conf] added 10 mutations [opt-env-conf] [19 of 22] Compiling OptEnvConf.Lint ( src/OptEnvConf/Lint.hs, dist/build/OptEnvConf/Lint.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Lint [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Lint.hs:238:20-25 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Lint.hs:246:28-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Lint.hs:255:29-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:280:21-62 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:280:21-62 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:280:20-63 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:280:20-63 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Lint.hs:278:16-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation LogicOp at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf] added mutation Negate at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:74:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:13-63 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:13-63 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:96:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:13-65 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:13-65 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:196:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:196:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:208:13-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:208:13-44 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:207:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:211:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:224:11-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf] added 197 mutations [opt-env-conf] [20 of 22] Compiling OptEnvConf.Main ( src/OptEnvConf/Main.hs, dist/build/OptEnvConf/Main.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf.Main [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:284:20-24 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:286:19-24 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf] added mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:170:14-19 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:172:11-19 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:172:11-19 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:172:24-28 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf] added mutation BoolLit at src/OptEnvConf/Main.hs:185:15-19 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:74:7-61 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:96:15-71 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:100:15-78 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:126:19-69 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:132:21-88 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:137:21-98 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:142:21-96 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:146:21-97 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:150:21-67 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:154:21-66 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:158:21-67 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf] added mutation ConstBool at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf] added mutation Negate at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf] added mutation RemoveAction at src/OptEnvConf/Main.hs:160:56-32 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf] added 88 mutations [opt-env-conf] [21 of 22] Compiling OptEnvConf ( src/OptEnvConf.hs, dist/build/OptEnvConf.p_o ) [opt-env-conf] mutation: instrumenting OptEnvConf [opt-env-conf] added 0 mutations [opt-env-conf] [22 of 22] Compiling Paths_opt_env_conf ( dist/build/autogen/Paths_opt_env_conf.hs, dist/build/Paths_opt_env_conf.p_o ) [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Args.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Capability.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Casing.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Check.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Completer.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Completion.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Doc.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/EnvMap.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Error.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Lint.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Main.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Nix.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/NonDet.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Output.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Parser.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Reader.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Run.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Setting.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Terminal.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Validation.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/Paths_opt_env_conf.dyn_o' [opt-env-conf] mutation-nix: manifest output at /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest: [opt-env-conf] total 2100 [opt-env-conf] drwxr-xr-x 2 nixbld nixbld 4096 May 15 07:51 . [opt-env-conf] drwxrwxr-t 281 nobody nixbld 32768 May 15 07:50 .. [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 182629 May 15 07:51 OptEnvConf.Args.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:51 OptEnvConf.Capability.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:51 OptEnvConf.Casing.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 8860 May 15 07:52 OptEnvConf.Check.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 78480 May 15 07:51 OptEnvConf.Completer.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 92441 May 15 07:51 OptEnvConf.Completion.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 318412 May 15 07:51 OptEnvConf.Doc.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:51 OptEnvConf.EnvMap.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 147693 May 15 07:51 OptEnvConf.Error.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:52 OptEnvConf.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 364740 May 15 07:52 OptEnvConf.Lint.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 107503 May 15 07:52 OptEnvConf.Main.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 15285 May 15 07:51 OptEnvConf.Nix.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 561 May 15 07:51 OptEnvConf.NonDet.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 11638 May 15 07:51 OptEnvConf.Output.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 266056 May 15 07:51 OptEnvConf.Parser.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 3652 May 15 07:51 OptEnvConf.Reader.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 354591 May 15 07:51 OptEnvConf.Run.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 103892 May 15 07:51 OptEnvConf.Setting.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:51 OptEnvConf.Terminal.json [opt-env-conf] -rw-r--r-- 1 nixbld nixbld 3120 May 15 07:51 OptEnvConf.Validation.json [opt-env-conf] mutation-nix: building remaining components with plugin silenced [opt-env-conf] Preprocessing library for opt-env-conf-0.15.0.1... [opt-env-conf] Building library for opt-env-conf-0.15.0.1... [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Args.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Capability.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Casing.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Check.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Completer.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Completion.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Doc.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/EnvMap.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Error.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Lint.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Main.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Nix.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/NonDet.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Output.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Parser.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Reader.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Run.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Setting.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Terminal.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Validation.dyn_o' [opt-env-conf] Warning: ignoring unrecognised input `dist/build/Paths_opt_env_conf.dyn_o' [opt-env-conf] buildPhase completed in 2 minutes 7 seconds [opt-env-conf] Phase: haddockPhase [opt-env-conf] Phase: installPhase [opt-env-conf] Installing library in /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf] Phase: fixupPhase [opt-env-conf] shrinking RPATHs of ELF executables and libraries in /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 [opt-env-conf] shrinking /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSopt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI-ghc9.10.3.so [opt-env-conf] checking for references to /build/ in /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1... [opt-env-conf] patching script interpreter paths in /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 [opt-env-conf] stripping (with command strip and flags -S -p) in /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/lib /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1/bin [opt-env-conf] shrinking RPATHs of ELF executables and libraries in /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest [opt-env-conf] checking for references to /build/ in /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest... [opt-env-conf] patching script interpreter paths in /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest [post-build-hook] Pushing 2 paths (238 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest (1.97 MiB) [post-build-hook] Pushing /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 (43.44 MiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1 /nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 2 paths... [post-build-hook] copying path '/nix/store/74aad89218v4qrl9sq059bs9klg5pidp-opt-env-conf-0.15.0.1-manifest' to 'https://cache.staging.nix-ci.com'... [post-build-hook] copying path '/nix/store/3xc64ipz44465san4pyb76llx80fw5ic-opt-env-conf-0.15.0.1' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/fpdvfr9s34if2lvd4lg3r0d5055z5nw6-opt-env-conf-0.15.0.1.drv' to 'https://cache.staging.nix-ci.com'... Progress: 1 of 10 built Building sydtest-source [sydtest-source] Phase: setupCompilerEnvironmentPhase [sydtest-source] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [sydtest-source] Phase: unpackPhase [sydtest-source] unpacking source archive /nix/store/vnw3gzq4r2vq3gzy2ac6ydc1hlk9fm6z-sydtest [sydtest-source] source root is sydtest [sydtest-source] Phase: patchPhase [sydtest-source] Phase: compileBuildDriverPhase [sydtest-source] setupCompileFlags: -package-db=/build/tmp.ITD4ItyDBB/setup-package.conf.d -threaded [sydtest-source] [1 of 2] Compiling Main ( /nix/store/4mdp8nhyfddh7bllbi7xszz7k9955n79-Setup.hs, /build/tmp.ITD4ItyDBB/Main.o ) [sydtest-source] [2 of 2] Linking Setup [sydtest-source] Phase: updateAutotoolsGnuConfigScriptsPhase [sydtest-source] Phase: configurePhase [sydtest-source] configureFlags: --verbose --prefix=/nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/share/doc/sydtest-0.23.0.2 --with-gcc=gcc --package-db=/build/tmp.ITD4ItyDBB/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --enable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Wunused-packages --ghc-options=-Werror --ghc-options=-Wno-deprecations --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [sydtest-source] Using Parsec parser [sydtest-source] Configuring sydtest-0.23.0.2... [sydtest-source] Dependency MonadRandom: using MonadRandom-0.6.2 [sydtest-source] Dependency QuickCheck: using QuickCheck-2.15.0.1 [sydtest-source] Dependency async: using async-2.2.5 [sydtest-source] Dependency autodocodec: using autodocodec-0.5.0.0 [sydtest-source] Dependency base >=4.7 && <5: using base-4.20.2.0 [sydtest-source] Dependency bytestring: using bytestring-0.12.2.0 [sydtest-source] Dependency containers: using containers-0.7 [sydtest-source] Dependency deepseq: using deepseq-1.5.0.0 [sydtest-source] Dependency dlist: using dlist-1.0 [sydtest-source] Dependency fast-myers-diff >=0.0.1: using fast-myers-diff-0.0.2 [sydtest-source] Dependency filepath: using filepath-1.5.4.0 [sydtest-source] Dependency mtl: using mtl-2.3.1 [sydtest-source] Dependency opt-env-conf >=0.10: using opt-env-conf-0.15.0.1 [sydtest-source] Dependency path: using path-0.9.6 [sydtest-source] Dependency path-io: using path-io-1.8.2 [sydtest-source] Dependency pretty-show: using pretty-show-1.10 [sydtest-source] Dependency quickcheck-io: using quickcheck-io-0.2.0 [sydtest-source] Dependency random: using random-1.2.1.3 [sydtest-source] Dependency random-shuffle: using random-shuffle-0.0.4 [sydtest-source] Dependency safe: using safe-0.3.21 [sydtest-source] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0 [sydtest-source] Dependency safe-coloured-text-terminfo: using [sydtest-source] safe-coloured-text-terminfo-0.3.0.0 [sydtest-source] Dependency stm: using stm-2.5.3.1 [sydtest-source] Dependency svg-builder: using svg-builder-0.1.1 [sydtest-source] Dependency sydtest-mutation-runtime: using sydtest-mutation-runtime-0.0.0.0 [sydtest-source] Dependency text: using text-2.1.3 [sydtest-source] Dependency time: using time-1.12.2 [sydtest-source] Dependency typed-process: using typed-process-0.2.13.0 [sydtest-source] Dependency vector: using vector-0.13.2.0 [sydtest-source] Source component graph: component lib [sydtest-source] Configured component graph: [sydtest-source]  component sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest-source]  include MonadRandom-0.6.2-4OUPXxFoP45JPrY3Hi7G9u [sydtest-source]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [sydtest-source]  include async-2.2.5-AVpB3MY1d7nLZpywuDqSMi [sydtest-source]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [sydtest-source]  include base-4.20.2.0-64da [sydtest-source]  include bytestring-0.12.2.0-262e [sydtest-source]  include containers-0.7-504a [sydtest-source]  include deepseq-1.5.0.0-9a2c [sydtest-source]  include dlist-1.0-2bT47M9he3qC9V8UeGXfX3 [sydtest-source]  include fast-myers-diff-0.0.2-IH1IhqvSmc78PSV8V5d1yX [sydtest-source]  include filepath-1.5.4.0-e600 [sydtest-source]  include mtl-2.3.1-b4af [sydtest-source]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [sydtest-source]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [sydtest-source]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [sydtest-source]  include pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [sydtest-source]  include quickcheck-io-0.2.0-uOZJkNmNm67gZuqoT5mgz [sydtest-source]  include random-1.2.1.3-9T1sBqjfI7C3JconfAiPFk [sydtest-source]  include random-shuffle-0.0.4-730ncrKawDMDidTBZfhecB [sydtest-source]  include safe-0.3.21-3KkbrJIc4RVHGJea2Lg3Om [sydtest-source]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [sydtest-source]  include safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [sydtest-source]  include stm-2.5.3.1-a2f3 [sydtest-source]  include svg-builder-0.1.1-5RHVKdPXgHp8o619RGrosD [sydtest-source]  include sydtest-mutation-runtime-0.0.0.0-6NLQU9FgCflC3T5utcSmV7 [sydtest-source]  include text-2.1.3-c691 [sydtest-source]  include time-1.12.2-652a [sydtest-source]  include typed-process-0.2.13.0-7OrVL3LKwQnF65e4jVhmYU [sydtest-source]  include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a [sydtest-source] Linked component graph: [sydtest-source]  unit sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest-source]  include MonadRandom-0.6.2-4OUPXxFoP45JPrY3Hi7G9u [sydtest-source]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [sydtest-source]  include async-2.2.5-AVpB3MY1d7nLZpywuDqSMi [sydtest-source]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [sydtest-source]  include base-4.20.2.0-64da [sydtest-source]  include bytestring-0.12.2.0-262e [sydtest-source]  include containers-0.7-504a [sydtest-source]  include deepseq-1.5.0.0-9a2c [sydtest-source]  include dlist-1.0-2bT47M9he3qC9V8UeGXfX3 [sydtest-source]  include fast-myers-diff-0.0.2-IH1IhqvSmc78PSV8V5d1yX [sydtest-source]  include filepath-1.5.4.0-e600 [sydtest-source]  include mtl-2.3.1-b4af [sydtest-source]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [sydtest-source]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [sydtest-source]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [sydtest-source]  include pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [sydtest-source]  include quickcheck-io-0.2.0-uOZJkNmNm67gZuqoT5mgz [sydtest-source]  include random-1.2.1.3-9T1sBqjfI7C3JconfAiPFk [sydtest-source]  include random-shuffle-0.0.4-730ncrKawDMDidTBZfhecB [sydtest-source]  include safe-0.3.21-3KkbrJIc4RVHGJea2Lg3Om [sydtest-source]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [sydtest-source]  include safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [sydtest-source]  include stm-2.5.3.1-a2f3 [sydtest-source]  include svg-builder-0.1.1-5RHVKdPXgHp8o619RGrosD [sydtest-source]  include sydtest-mutation-runtime-0.0.0.0-6NLQU9FgCflC3T5utcSmV7 [sydtest-source]  include text-2.1.3-c691 [sydtest-source]  include time-1.12.2-652a [sydtest-source]  include typed-process-0.2.13.0-7OrVL3LKwQnF65e4jVhmYU [sydtest-source]  include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a [sydtest-source]  Test.Syd=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd,Test.Syd.Def=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def,Test.Syd.Def.Around=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Around,Test.Syd.Def.AroundAll=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.AroundAll,Test.Syd.Def.Golden=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Golden,Test.Syd.Def.Scenario=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Scenario,Test.Syd.Def.SetupFunc=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.SetupFunc,Test.Syd.Def.Specify=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Specify,Test.Syd.Def.TestDefM=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.TestDefM,Test.Syd.Expectation=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Expectation,Test.Syd.HList=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.HList,Test.Syd.Modify=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Modify,Test.Syd.Mutation.Forest=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Mutation.Forest,Test.Syd.MutationMode=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.MutationMode,Test.Syd.OptParse=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.OptParse,Test.Syd.Output=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output,Test.Syd.Output.Common=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output.Common,Test.Syd.Output.Pretty=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output.Pretty,Test.Syd.Output.Terse=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output.Terse,Test.Syd.Path=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Path,Test.Syd.ReRun=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.ReRun,Test.Syd.Run=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Run,Test.Syd.Runner=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner,Test.Syd.Runner.Asynchronous=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Asynchronous,Test.Syd.Runner.Single=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Single,Test.Syd.Runner.Synchronous=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Synchronous,Test.Syd.Runner.Synchronous.Interleaved=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Synchronous.Interleaved,Test.Syd.Runner.Synchronous.Separate=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Synchronous.Separate,Test.Syd.Runner.Wrappers=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Wrappers,Test.Syd.SVG=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.SVG,Test.Syd.SpecDef=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.SpecDef,Test.Syd.SpecForest=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.SpecForest [sydtest-source] Ready component graph: [sydtest-source]  definite sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest-source]  depends MonadRandom-0.6.2-4OUPXxFoP45JPrY3Hi7G9u [sydtest-source]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [sydtest-source]  depends async-2.2.5-AVpB3MY1d7nLZpywuDqSMi [sydtest-source]  depends autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [sydtest-source]  depends base-4.20.2.0-64da [sydtest-source]  depends bytestring-0.12.2.0-262e [sydtest-source]  depends containers-0.7-504a [sydtest-source]  depends deepseq-1.5.0.0-9a2c [sydtest-source]  depends dlist-1.0-2bT47M9he3qC9V8UeGXfX3 [sydtest-source]  depends fast-myers-diff-0.0.2-IH1IhqvSmc78PSV8V5d1yX [sydtest-source]  depends filepath-1.5.4.0-e600 [sydtest-source]  depends mtl-2.3.1-b4af [sydtest-source]  depends opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [sydtest-source]  depends path-0.9.6-JuNdYVciddTDWUiQr3NuVx [sydtest-source]  depends path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [sydtest-source]  depends pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [sydtest-source]  depends quickcheck-io-0.2.0-uOZJkNmNm67gZuqoT5mgz [sydtest-source]  depends random-1.2.1.3-9T1sBqjfI7C3JconfAiPFk [sydtest-source]  depends random-shuffle-0.0.4-730ncrKawDMDidTBZfhecB [sydtest-source]  depends safe-0.3.21-3KkbrJIc4RVHGJea2Lg3Om [sydtest-source]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [sydtest-source]  depends safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [sydtest-source]  depends stm-2.5.3.1-a2f3 [sydtest-source]  depends svg-builder-0.1.1-5RHVKdPXgHp8o619RGrosD [sydtest-source]  depends sydtest-mutation-runtime-0.0.0.0-6NLQU9FgCflC3T5utcSmV7 [sydtest-source]  depends text-2.1.3-c691 [sydtest-source]  depends time-1.12.2-652a [sydtest-source]  depends typed-process-0.2.13.0-7OrVL3LKwQnF65e4jVhmYU [sydtest-source]  depends vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a [sydtest-source] Using Cabal-3.12.1.0 compiled by ghc-9.10 [sydtest-source] Using compiler: ghc-9.10.3 [sydtest-source] Using install prefix: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2 [sydtest-source] Executables installed in: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/bin [sydtest-source] Libraries installed in: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest-source] Dynamic Libraries installed in: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [sydtest-source] Private executables installed in: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/libexec/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2 [sydtest-source] Data files installed in: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/share/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2 [sydtest-source] Documentation installed in: /share/doc/sydtest-0.23.0.2 [sydtest-source] Configuration files installed in: [sydtest-source] /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/etc [sydtest-source] No alex found [sydtest-source] Using ar found on system at: [sydtest-source] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [sydtest-source] No c2hs found [sydtest-source] No cpphs found [sydtest-source] No doctest found [sydtest-source] Using gcc version 14.3.0 given by user at: [sydtest-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [sydtest-source] Using ghc version 9.10.3 found on system at: [sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [sydtest-source] Using ghc-pkg version 9.10.3 found on system at: [sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [sydtest-source] No ghcjs found [sydtest-source] No ghcjs-pkg found [sydtest-source] No greencard found [sydtest-source] Using haddock version 2.31.1 found on system at: [sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [sydtest-source] No happy found [sydtest-source] Using haskell-suite found on system at: haskell-suite-dummy-location [sydtest-source] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [sydtest-source] No hmake found [sydtest-source] Using hpc version 0.69 found on system at: [sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [sydtest-source] Using hsc2hs version 0.68.10 found on system at: [sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [sydtest-source] Using hscolour version 1.25 found on system at: [sydtest-source] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [sydtest-source] No jhc found [sydtest-source] Using ld found on system at: [sydtest-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [sydtest-source] No pkg-config found [sydtest-source] Using runghc version 9.10.3 found on system at: [sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [sydtest-source] Using strip version 2.44 found on system at: [sydtest-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [sydtest-source] Using tar found on system at: [sydtest-source] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [sydtest-source] No uhc found [sydtest-source] Phase: buildPhase [sydtest-source] Distribution quality warnings: [sydtest-source] [long-synopsis] The 'synopsis' field is rather long (max 80 chars is [sydtest-source] recommended). [sydtest-source] [missing-upper-bounds] On library, these packages miss upper bounds: [sydtest-source] - MonadRandom [sydtest-source] - QuickCheck [sydtest-source] - async [sydtest-source] - autodocodec [sydtest-source] - bytestring [sydtest-source] - containers [sydtest-source] - deepseq [sydtest-source] - dlist [sydtest-source] - fast-myers-diff [sydtest-source] - filepath [sydtest-source] - mtl [sydtest-source] - opt-env-conf [sydtest-source] - path [sydtest-source] - path-io [sydtest-source] - pretty-show [sydtest-source] - quickcheck-io [sydtest-source] - random [sydtest-source] - random-shuffle [sydtest-source] - safe [sydtest-source] - safe-coloured-text [sydtest-source] - stm [sydtest-source] - svg-builder [sydtest-source] - sydtest-mutation-runtime [sydtest-source] - text [sydtest-source] - time [sydtest-source] - typed-process [sydtest-source] - vector [sydtest-source] - ansi-terminal [sydtest-source] - safe-coloured-text-terminfo [sydtest-source] Please add them. There is more information at https://pvp.haskell.org/ [sydtest-source] Building source dist for sydtest-0.23.0.2... [sydtest-source] Source tarball created: dist/sydtest-0.23.0.2.tar.gz [sydtest-source] Phase: checkPhase [sydtest-source] Phase: haddockPhase [sydtest-source] Phase: installPhase [sydtest-source] Phase: fixupPhase [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2 [post-build-hook] Pushing 1 paths (0 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2 (65.34 KiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2 [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/brwn29gwkwibmqys0zx41nslmanymyz2-sydtest-source-0.23.0.2.drv' to 'https://cache.staging.nix-ci.com'... Progress: 2 of 9 built Building sydtest [sydtest] Phase: setupCompilerEnvironmentPhase [sydtest] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [sydtest] Phase: unpackPhase [sydtest] unpacking source archive /nix/store/p4xiijj7x2hb4kcp486lpsbi2ny62mzm-sydtest-source-0.23.0.2/sydtest-0.23.0.2.tar.gz [sydtest] source root is sydtest-0.23.0.2 [sydtest] setting SOURCE_DATE_EPOCH to timestamp 1778831588 of file "sydtest-0.23.0.2/sydtest.cabal" [sydtest] warning: file "sydtest-0.23.0.2/sydtest.cabal" may be generated; SOURCE_DATE_EPOCH may be non-deterministic [sydtest] Phase: patchPhase [sydtest] Phase: compileBuildDriverPhase [sydtest] setupCompileFlags: -package-db=/build/tmp.Z2XTUTmjCB/setup-package.conf.d -threaded [sydtest] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.Z2XTUTmjCB/Main.o ) [sydtest] [2 of 2] Linking Setup [sydtest] Phase: updateAutotoolsGnuConfigScriptsPhase [sydtest] Phase: configurePhase [sydtest] configureFlags: --verbose --prefix=/nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc/share/doc/sydtest-0.23.0.2 --with-gcc=gcc --package-db=/build/tmp.Z2XTUTmjCB/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --enable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Wunused-packages --ghc-options=-Werror --ghc-options=-Wno-deprecations --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [sydtest] Using Parsec parser [sydtest] Configuring sydtest-0.23.0.2... [sydtest] Dependency MonadRandom: using MonadRandom-0.6.2 [sydtest] Dependency QuickCheck: using QuickCheck-2.15.0.1 [sydtest] Dependency async: using async-2.2.5 [sydtest] Dependency autodocodec: using autodocodec-0.5.0.0 [sydtest] Dependency base >=4.7 && <5: using base-4.20.2.0 [sydtest] Dependency bytestring: using bytestring-0.12.2.0 [sydtest] Dependency containers: using containers-0.7 [sydtest] Dependency deepseq: using deepseq-1.5.0.0 [sydtest] Dependency dlist: using dlist-1.0 [sydtest] Dependency fast-myers-diff >=0.0.1: using fast-myers-diff-0.0.2 [sydtest] Dependency filepath: using filepath-1.5.4.0 [sydtest] Dependency mtl: using mtl-2.3.1 [sydtest] Dependency opt-env-conf >=0.10: using opt-env-conf-0.15.0.1 [sydtest] Dependency path: using path-0.9.6 [sydtest] Dependency path-io: using path-io-1.8.2 [sydtest] Dependency pretty-show: using pretty-show-1.10 [sydtest] Dependency quickcheck-io: using quickcheck-io-0.2.0 [sydtest] Dependency random: using random-1.2.1.3 [sydtest] Dependency random-shuffle: using random-shuffle-0.0.4 [sydtest] Dependency safe: using safe-0.3.21 [sydtest] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0 [sydtest] Dependency safe-coloured-text-terminfo: using [sydtest] safe-coloured-text-terminfo-0.3.0.0 [sydtest] Dependency stm: using stm-2.5.3.1 [sydtest] Dependency svg-builder: using svg-builder-0.1.1 [sydtest] Dependency sydtest-mutation-runtime: using sydtest-mutation-runtime-0.0.0.0 [sydtest] Dependency text: using text-2.1.3 [sydtest] Dependency time: using time-1.12.2 [sydtest] Dependency typed-process: using typed-process-0.2.13.0 [sydtest] Dependency vector: using vector-0.13.2.0 [sydtest] Source component graph: component lib [sydtest] Configured component graph: [sydtest]  component sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest]  include MonadRandom-0.6.2-4OUPXxFoP45JPrY3Hi7G9u [sydtest]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [sydtest]  include async-2.2.5-AVpB3MY1d7nLZpywuDqSMi [sydtest]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [sydtest]  include base-4.20.2.0-64da [sydtest]  include bytestring-0.12.2.0-262e [sydtest]  include containers-0.7-504a [sydtest]  include deepseq-1.5.0.0-9a2c [sydtest]  include dlist-1.0-2bT47M9he3qC9V8UeGXfX3 [sydtest]  include fast-myers-diff-0.0.2-IH1IhqvSmc78PSV8V5d1yX [sydtest]  include filepath-1.5.4.0-e600 [sydtest]  include mtl-2.3.1-b4af [sydtest]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [sydtest]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [sydtest]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [sydtest]  include pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [sydtest]  include quickcheck-io-0.2.0-uOZJkNmNm67gZuqoT5mgz [sydtest]  include random-1.2.1.3-9T1sBqjfI7C3JconfAiPFk [sydtest]  include random-shuffle-0.0.4-730ncrKawDMDidTBZfhecB [sydtest]  include safe-0.3.21-3KkbrJIc4RVHGJea2Lg3Om [sydtest]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [sydtest]  include safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [sydtest]  include stm-2.5.3.1-a2f3 [sydtest]  include svg-builder-0.1.1-5RHVKdPXgHp8o619RGrosD [sydtest]  include sydtest-mutation-runtime-0.0.0.0-6NLQU9FgCflC3T5utcSmV7 [sydtest]  include text-2.1.3-c691 [sydtest]  include time-1.12.2-652a [sydtest]  include typed-process-0.2.13.0-7OrVL3LKwQnF65e4jVhmYU [sydtest]  include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a [sydtest] Linked component graph: [sydtest]  unit sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest]  include MonadRandom-0.6.2-4OUPXxFoP45JPrY3Hi7G9u [sydtest]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [sydtest]  include async-2.2.5-AVpB3MY1d7nLZpywuDqSMi [sydtest]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [sydtest]  include base-4.20.2.0-64da [sydtest]  include bytestring-0.12.2.0-262e [sydtest]  include containers-0.7-504a [sydtest]  include deepseq-1.5.0.0-9a2c [sydtest]  include dlist-1.0-2bT47M9he3qC9V8UeGXfX3 [sydtest]  include fast-myers-diff-0.0.2-IH1IhqvSmc78PSV8V5d1yX [sydtest]  include filepath-1.5.4.0-e600 [sydtest]  include mtl-2.3.1-b4af [sydtest]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [sydtest]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [sydtest]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [sydtest]  include pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [sydtest]  include quickcheck-io-0.2.0-uOZJkNmNm67gZuqoT5mgz [sydtest]  include random-1.2.1.3-9T1sBqjfI7C3JconfAiPFk [sydtest]  include random-shuffle-0.0.4-730ncrKawDMDidTBZfhecB [sydtest]  include safe-0.3.21-3KkbrJIc4RVHGJea2Lg3Om [sydtest]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [sydtest]  include safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [sydtest]  include stm-2.5.3.1-a2f3 [sydtest]  include svg-builder-0.1.1-5RHVKdPXgHp8o619RGrosD [sydtest]  include sydtest-mutation-runtime-0.0.0.0-6NLQU9FgCflC3T5utcSmV7 [sydtest]  include text-2.1.3-c691 [sydtest]  include time-1.12.2-652a [sydtest]  include typed-process-0.2.13.0-7OrVL3LKwQnF65e4jVhmYU [sydtest]  include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a [sydtest]  Test.Syd=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd,Test.Syd.Def=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def,Test.Syd.Def.Around=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Around,Test.Syd.Def.AroundAll=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.AroundAll,Test.Syd.Def.Golden=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Golden,Test.Syd.Def.Scenario=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Scenario,Test.Syd.Def.SetupFunc=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.SetupFunc,Test.Syd.Def.Specify=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.Specify,Test.Syd.Def.TestDefM=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Def.TestDefM,Test.Syd.Expectation=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Expectation,Test.Syd.HList=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.HList,Test.Syd.Modify=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Modify,Test.Syd.Mutation.Forest=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Mutation.Forest,Test.Syd.MutationMode=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.MutationMode,Test.Syd.OptParse=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.OptParse,Test.Syd.Output=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output,Test.Syd.Output.Common=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output.Common,Test.Syd.Output.Pretty=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output.Pretty,Test.Syd.Output.Terse=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Output.Terse,Test.Syd.Path=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Path,Test.Syd.ReRun=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.ReRun,Test.Syd.Run=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Run,Test.Syd.Runner=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner,Test.Syd.Runner.Asynchronous=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Asynchronous,Test.Syd.Runner.Single=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Single,Test.Syd.Runner.Synchronous=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Synchronous,Test.Syd.Runner.Synchronous.Interleaved=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Synchronous.Interleaved,Test.Syd.Runner.Synchronous.Separate=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Synchronous.Separate,Test.Syd.Runner.Wrappers=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.Runner.Wrappers,Test.Syd.SVG=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.SVG,Test.Syd.SpecDef=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.SpecDef,Test.Syd.SpecForest=sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7:Test.Syd.SpecForest [sydtest] Ready component graph: [sydtest]  definite sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest]  depends MonadRandom-0.6.2-4OUPXxFoP45JPrY3Hi7G9u [sydtest]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [sydtest]  depends async-2.2.5-AVpB3MY1d7nLZpywuDqSMi [sydtest]  depends autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [sydtest]  depends base-4.20.2.0-64da [sydtest]  depends bytestring-0.12.2.0-262e [sydtest]  depends containers-0.7-504a [sydtest]  depends deepseq-1.5.0.0-9a2c [sydtest]  depends dlist-1.0-2bT47M9he3qC9V8UeGXfX3 [sydtest]  depends fast-myers-diff-0.0.2-IH1IhqvSmc78PSV8V5d1yX [sydtest]  depends filepath-1.5.4.0-e600 [sydtest]  depends mtl-2.3.1-b4af [sydtest]  depends opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [sydtest]  depends path-0.9.6-JuNdYVciddTDWUiQr3NuVx [sydtest]  depends path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [sydtest]  depends pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [sydtest]  depends quickcheck-io-0.2.0-uOZJkNmNm67gZuqoT5mgz [sydtest]  depends random-1.2.1.3-9T1sBqjfI7C3JconfAiPFk [sydtest]  depends random-shuffle-0.0.4-730ncrKawDMDidTBZfhecB [sydtest]  depends safe-0.3.21-3KkbrJIc4RVHGJea2Lg3Om [sydtest]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [sydtest]  depends safe-coloured-text-terminfo-0.3.0.0-DAw6hIDCr4QLuqCDqY7ecg [sydtest]  depends stm-2.5.3.1-a2f3 [sydtest]  depends svg-builder-0.1.1-5RHVKdPXgHp8o619RGrosD [sydtest]  depends sydtest-mutation-runtime-0.0.0.0-6NLQU9FgCflC3T5utcSmV7 [sydtest]  depends text-2.1.3-c691 [sydtest]  depends time-1.12.2-652a [sydtest]  depends typed-process-0.2.13.0-7OrVL3LKwQnF65e4jVhmYU [sydtest]  depends vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a [sydtest] Using Cabal-3.12.1.0 compiled by ghc-9.10 [sydtest] Using compiler: ghc-9.10.3 [sydtest] Using install prefix: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 [sydtest] Executables installed in: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/bin [sydtest] Libraries installed in: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest] Dynamic Libraries installed in: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [sydtest] Private executables installed in: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/libexec/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2 [sydtest] Data files installed in: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/share/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2 [sydtest] Documentation installed in: [sydtest] /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc/share/doc/sydtest-0.23.0.2 [sydtest] Configuration files installed in: [sydtest] /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/etc [sydtest] No alex found [sydtest] Using ar found on system at: [sydtest] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [sydtest] No c2hs found [sydtest] No cpphs found [sydtest] No doctest found [sydtest] Using gcc version 14.3.0 given by user at: [sydtest] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [sydtest] Using ghc version 9.10.3 found on system at: [sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [sydtest] Using ghc-pkg version 9.10.3 found on system at: [sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [sydtest] No ghcjs found [sydtest] No ghcjs-pkg found [sydtest] No greencard found [sydtest] Using haddock version 2.31.1 found on system at: [sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [sydtest] No happy found [sydtest] Using haskell-suite found on system at: haskell-suite-dummy-location [sydtest] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [sydtest] No hmake found [sydtest] Using hpc version 0.69 found on system at: [sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [sydtest] Using hsc2hs version 0.68.10 found on system at: [sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [sydtest] Using hscolour version 1.25 found on system at: [sydtest] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [sydtest] No jhc found [sydtest] Using ld found on system at: [sydtest] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [sydtest] No pkg-config found [sydtest] Using runghc version 9.10.3 found on system at: [sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [sydtest] Using strip version 2.44 found on system at: [sydtest] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [sydtest] Using tar found on system at: [sydtest] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [sydtest] No uhc found [sydtest] Phase: buildPhase [sydtest] Preprocessing library for sydtest-0.23.0.2... [sydtest] Building library for sydtest-0.23.0.2... [sydtest] [ 1 of 33] Compiling Paths_sydtest ( dist/build/autogen/Paths_sydtest.hs, dist/build/Paths_sydtest.o, dist/build/Paths_sydtest.dyn_o ) [sydtest] [ 2 of 33] Compiling Test.Syd.HList ( src/Test/Syd/HList.hs, dist/build/Test/Syd/HList.o, dist/build/Test/Syd/HList.dyn_o ) [sydtest] [ 3 of 33] Compiling Test.Syd.Run ( src/Test/Syd/Run.hs, dist/build/Test/Syd/Run.o, dist/build/Test/Syd/Run.dyn_o ) [sydtest] [ 4 of 33] Compiling Test.Syd.OptParse ( src/Test/Syd/OptParse.hs, dist/build/Test/Syd/OptParse.o, dist/build/Test/Syd/OptParse.dyn_o ) [sydtest] [ 5 of 33] Compiling Test.Syd.Expectation ( src/Test/Syd/Expectation.hs, dist/build/Test/Syd/Expectation.o, dist/build/Test/Syd/Expectation.dyn_o ) [sydtest] [ 6 of 33] Compiling Test.Syd.Def.Golden ( src/Test/Syd/Def/Golden.hs, dist/build/Test/Syd/Def/Golden.o, dist/build/Test/Syd/Def/Golden.dyn_o ) [sydtest] [ 7 of 33] Compiling Test.Syd.SpecForest ( src/Test/Syd/SpecForest.hs, dist/build/Test/Syd/SpecForest.o, dist/build/Test/Syd/SpecForest.dyn_o ) [sydtest] [ 8 of 33] Compiling Test.Syd.SpecDef ( src/Test/Syd/SpecDef.hs, dist/build/Test/Syd/SpecDef.o, dist/build/Test/Syd/SpecDef.dyn_o ) [sydtest] [ 9 of 33] Compiling Test.Syd.Runner.Wrappers ( src/Test/Syd/Runner/Wrappers.hs, dist/build/Test/Syd/Runner/Wrappers.o, dist/build/Test/Syd/Runner/Wrappers.dyn_o ) [sydtest] [10 of 33] Compiling Test.Syd.Runner.Single ( src/Test/Syd/Runner/Single.hs, dist/build/Test/Syd/Runner/Single.o, dist/build/Test/Syd/Runner/Single.dyn_o ) [sydtest] [11 of 33] Compiling Test.Syd.Mutation.Forest ( src/Test/Syd/Mutation/Forest.hs, dist/build/Test/Syd/Mutation/Forest.o, dist/build/Test/Syd/Mutation/Forest.dyn_o ) [sydtest] [12 of 33] Compiling Test.Syd.Def.TestDefM ( src/Test/Syd/Def/TestDefM.hs, dist/build/Test/Syd/Def/TestDefM.o, dist/build/Test/Syd/Def/TestDefM.dyn_o ) [sydtest] [13 of 33] Compiling Test.Syd.Def.Specify ( src/Test/Syd/Def/Specify.hs, dist/build/Test/Syd/Def/Specify.o, dist/build/Test/Syd/Def/Specify.dyn_o ) [sydtest] [14 of 33] Compiling Test.Syd.Def.Scenario ( src/Test/Syd/Def/Scenario.hs, dist/build/Test/Syd/Def/Scenario.o, dist/build/Test/Syd/Def/Scenario.dyn_o ) [sydtest] [15 of 33] Compiling Test.Syd.Def.AroundAll ( src/Test/Syd/Def/AroundAll.hs, dist/build/Test/Syd/Def/AroundAll.o, dist/build/Test/Syd/Def/AroundAll.dyn_o ) [sydtest] [16 of 33] Compiling Test.Syd.Def.Around ( src/Test/Syd/Def/Around.hs, dist/build/Test/Syd/Def/Around.o, dist/build/Test/Syd/Def/Around.dyn_o ) [sydtest] [17 of 33] Compiling Test.Syd.Def.SetupFunc ( src/Test/Syd/Def/SetupFunc.hs, dist/build/Test/Syd/Def/SetupFunc.o, dist/build/Test/Syd/Def/SetupFunc.dyn_o ) [sydtest] [18 of 33] Compiling Test.Syd.Path ( src/Test/Syd/Path.hs, dist/build/Test/Syd/Path.o, dist/build/Test/Syd/Path.dyn_o ) [sydtest] [19 of 33] Compiling Test.Syd.Def ( src/Test/Syd/Def.hs, dist/build/Test/Syd/Def.o, dist/build/Test/Syd/Def.dyn_o ) [sydtest] [20 of 33] Compiling Test.Syd.Modify ( src/Test/Syd/Modify.hs, dist/build/Test/Syd/Modify.o, dist/build/Test/Syd/Modify.dyn_o ) [sydtest] [21 of 33] Compiling Test.Syd.SVG ( src/Test/Syd/SVG.hs, dist/build/Test/Syd/SVG.o, dist/build/Test/Syd/SVG.dyn_o ) [sydtest] [22 of 33] Compiling Test.Syd.Runner.Synchronous.Separate ( src/Test/Syd/Runner/Synchronous/Separate.hs, dist/build/Test/Syd/Runner/Synchronous/Separate.o, dist/build/Test/Syd/Runner/Synchronous/Separate.dyn_o ) [sydtest] [23 of 33] Compiling Test.Syd.ReRun ( src/Test/Syd/ReRun.hs, dist/build/Test/Syd/ReRun.o, dist/build/Test/Syd/ReRun.dyn_o ) [sydtest] [24 of 33] Compiling Test.Syd.Output.Common ( src/Test/Syd/Output/Common.hs, dist/build/Test/Syd/Output/Common.o, dist/build/Test/Syd/Output/Common.dyn_o ) [sydtest] [25 of 33] Compiling Test.Syd.Output.Terse ( src/Test/Syd/Output/Terse.hs, dist/build/Test/Syd/Output/Terse.o, dist/build/Test/Syd/Output/Terse.dyn_o ) [sydtest] [26 of 33] Compiling Test.Syd.Output.Pretty ( src/Test/Syd/Output/Pretty.hs, dist/build/Test/Syd/Output/Pretty.o, dist/build/Test/Syd/Output/Pretty.dyn_o ) [sydtest] [27 of 33] Compiling Test.Syd.Output ( src/Test/Syd/Output.hs, dist/build/Test/Syd/Output.o, dist/build/Test/Syd/Output.dyn_o ) [sydtest] [28 of 33] Compiling Test.Syd.Runner.Synchronous.Interleaved ( src/Test/Syd/Runner/Synchronous/Interleaved.hs, dist/build/Test/Syd/Runner/Synchronous/Interleaved.o, dist/build/Test/Syd/Runner/Synchronous/Interleaved.dyn_o ) [sydtest] [29 of 33] Compiling Test.Syd.Runner.Synchronous ( src/Test/Syd/Runner/Synchronous.hs, dist/build/Test/Syd/Runner/Synchronous.o, dist/build/Test/Syd/Runner/Synchronous.dyn_o ) [sydtest] [30 of 33] Compiling Test.Syd.Runner.Asynchronous ( src/Test/Syd/Runner/Asynchronous.hs, dist/build/Test/Syd/Runner/Asynchronous.o, dist/build/Test/Syd/Runner/Asynchronous.dyn_o ) [sydtest] [31 of 33] Compiling Test.Syd.Runner ( src/Test/Syd/Runner.hs, dist/build/Test/Syd/Runner.o, dist/build/Test/Syd/Runner.dyn_o ) [sydtest] [32 of 33] Compiling Test.Syd.MutationMode ( src/Test/Syd/MutationMode.hs, dist/build/Test/Syd/MutationMode.o, dist/build/Test/Syd/MutationMode.dyn_o ) [sydtest] [33 of 33] Compiling Test.Syd ( src/Test/Syd.hs, dist/build/Test/Syd.o, dist/build/Test/Syd.dyn_o ) [sydtest] [ 1 of 33] Compiling Paths_sydtest ( dist/build/autogen/Paths_sydtest.hs, dist/build/Paths_sydtest.p_o ) [sydtest] [ 2 of 33] Compiling Test.Syd.HList ( src/Test/Syd/HList.hs, dist/build/Test/Syd/HList.p_o ) [sydtest] [ 3 of 33] Compiling Test.Syd.Run ( src/Test/Syd/Run.hs, dist/build/Test/Syd/Run.p_o ) [sydtest] [ 4 of 33] Compiling Test.Syd.OptParse ( src/Test/Syd/OptParse.hs, dist/build/Test/Syd/OptParse.p_o ) [sydtest] [ 5 of 33] Compiling Test.Syd.Expectation ( src/Test/Syd/Expectation.hs, dist/build/Test/Syd/Expectation.p_o ) [sydtest] [ 6 of 33] Compiling Test.Syd.Def.Golden ( src/Test/Syd/Def/Golden.hs, dist/build/Test/Syd/Def/Golden.p_o ) [sydtest] [ 7 of 33] Compiling Test.Syd.SpecForest ( src/Test/Syd/SpecForest.hs, dist/build/Test/Syd/SpecForest.p_o ) [sydtest] [ 8 of 33] Compiling Test.Syd.SpecDef ( src/Test/Syd/SpecDef.hs, dist/build/Test/Syd/SpecDef.p_o ) [sydtest] [ 9 of 33] Compiling Test.Syd.Runner.Wrappers ( src/Test/Syd/Runner/Wrappers.hs, dist/build/Test/Syd/Runner/Wrappers.p_o ) [sydtest] [10 of 33] Compiling Test.Syd.Runner.Single ( src/Test/Syd/Runner/Single.hs, dist/build/Test/Syd/Runner/Single.p_o ) [sydtest] [11 of 33] Compiling Test.Syd.Mutation.Forest ( src/Test/Syd/Mutation/Forest.hs, dist/build/Test/Syd/Mutation/Forest.p_o ) [sydtest] [12 of 33] Compiling Test.Syd.Def.TestDefM ( src/Test/Syd/Def/TestDefM.hs, dist/build/Test/Syd/Def/TestDefM.p_o ) [sydtest] [13 of 33] Compiling Test.Syd.Def.Specify ( src/Test/Syd/Def/Specify.hs, dist/build/Test/Syd/Def/Specify.p_o ) [sydtest] [14 of 33] Compiling Test.Syd.Def.Scenario ( src/Test/Syd/Def/Scenario.hs, dist/build/Test/Syd/Def/Scenario.p_o ) [sydtest] [15 of 33] Compiling Test.Syd.Def.AroundAll ( src/Test/Syd/Def/AroundAll.hs, dist/build/Test/Syd/Def/AroundAll.p_o ) [sydtest] [16 of 33] Compiling Test.Syd.Def.Around ( src/Test/Syd/Def/Around.hs, dist/build/Test/Syd/Def/Around.p_o ) [sydtest] [17 of 33] Compiling Test.Syd.Def.SetupFunc ( src/Test/Syd/Def/SetupFunc.hs, dist/build/Test/Syd/Def/SetupFunc.p_o ) [sydtest] [18 of 33] Compiling Test.Syd.Path ( src/Test/Syd/Path.hs, dist/build/Test/Syd/Path.p_o ) [sydtest] [19 of 33] Compiling Test.Syd.Def ( src/Test/Syd/Def.hs, dist/build/Test/Syd/Def.p_o ) [sydtest] [20 of 33] Compiling Test.Syd.Modify ( src/Test/Syd/Modify.hs, dist/build/Test/Syd/Modify.p_o ) [sydtest] [21 of 33] Compiling Test.Syd.SVG ( src/Test/Syd/SVG.hs, dist/build/Test/Syd/SVG.p_o ) [sydtest] [22 of 33] Compiling Test.Syd.Runner.Synchronous.Separate ( src/Test/Syd/Runner/Synchronous/Separate.hs, dist/build/Test/Syd/Runner/Synchronous/Separate.p_o ) [sydtest] [23 of 33] Compiling Test.Syd.ReRun ( src/Test/Syd/ReRun.hs, dist/build/Test/Syd/ReRun.p_o ) [sydtest] [24 of 33] Compiling Test.Syd.Output.Common ( src/Test/Syd/Output/Common.hs, dist/build/Test/Syd/Output/Common.p_o ) [sydtest] [25 of 33] Compiling Test.Syd.Output.Terse ( src/Test/Syd/Output/Terse.hs, dist/build/Test/Syd/Output/Terse.p_o ) [sydtest] [26 of 33] Compiling Test.Syd.Output.Pretty ( src/Test/Syd/Output/Pretty.hs, dist/build/Test/Syd/Output/Pretty.p_o ) [sydtest] [27 of 33] Compiling Test.Syd.Output ( src/Test/Syd/Output.hs, dist/build/Test/Syd/Output.p_o ) [sydtest] [28 of 33] Compiling Test.Syd.Runner.Synchronous.Interleaved ( src/Test/Syd/Runner/Synchronous/Interleaved.hs, dist/build/Test/Syd/Runner/Synchronous/Interleaved.p_o ) [sydtest] [29 of 33] Compiling Test.Syd.Runner.Synchronous ( src/Test/Syd/Runner/Synchronous.hs, dist/build/Test/Syd/Runner/Synchronous.p_o ) [sydtest] [30 of 33] Compiling Test.Syd.Runner.Asynchronous ( src/Test/Syd/Runner/Asynchronous.hs, dist/build/Test/Syd/Runner/Asynchronous.p_o ) [sydtest] [31 of 33] Compiling Test.Syd.Runner ( src/Test/Syd/Runner.hs, dist/build/Test/Syd/Runner.p_o ) [sydtest] [32 of 33] Compiling Test.Syd.MutationMode ( src/Test/Syd/MutationMode.hs, dist/build/Test/Syd/MutationMode.p_o ) [sydtest] [33 of 33] Compiling Test.Syd ( src/Test/Syd.hs, dist/build/Test/Syd.p_o ) [sydtest] buildPhase completed in 47 seconds [sydtest] Phase: checkPhase [sydtest] Package has no test suites. [sydtest] Phase: haddockPhase [sydtest] Preprocessing library for sydtest-0.23.0.2... [sydtest] Running Haddock on library for sydtest-0.23.0.2... [sydtest] Warning: The documentation for the following packages are not installed. No [sydtest] links will be generated to these packages: attoparsec-0.14.4, [sydtest] attoparsec-0.14.4, libyaml-clib-0.2.5, opt-env-conf-0.15.0.1, path-0.9.6, [sydtest] path-0.9.6, vector-0.13.2.0 [sydtest] [ 1 of 33] Compiling Paths_sydtest ( dist/build/autogen/Paths_sydtest.hs, /build/ghc1722_0/ghc_10.o, /build/ghc1722_0/ghc_10.dyn_o ) [sydtest] [ 2 of 33] Compiling Test.Syd.HList ( src/Test/Syd/HList.hs, /build/ghc1722_0/ghc_30.o, /build/ghc1722_0/ghc_30.dyn_o ) [sydtest] [ 3 of 33] Compiling Test.Syd.Run ( src/Test/Syd/Run.hs, /build/ghc1722_0/ghc_44.o, /build/ghc1722_0/ghc_44.dyn_o ) [sydtest] [ 4 of 33] Compiling Test.Syd.OptParse ( src/Test/Syd/OptParse.hs, /build/ghc1722_0/ghc_34.o, /build/ghc1722_0/ghc_34.dyn_o ) [sydtest] [ 5 of 33] Compiling Test.Syd.Expectation ( src/Test/Syd/Expectation.hs, /build/ghc1722_0/ghc_28.o, /build/ghc1722_0/ghc_28.dyn_o ) [sydtest] [ 6 of 33] Compiling Test.Syd.Def.Golden ( src/Test/Syd/Def/Golden.hs, /build/ghc1722_0/ghc_18.o, /build/ghc1722_0/ghc_18.dyn_o ) [sydtest] [ 7 of 33] Compiling Test.Syd.SpecForest ( src/Test/Syd/SpecForest.hs, /build/ghc1722_0/ghc_58.o, /build/ghc1722_0/ghc_58.dyn_o ) [sydtest] [ 8 of 33] Compiling Test.Syd.SpecDef ( src/Test/Syd/SpecDef.hs, /build/ghc1722_0/ghc_56.o, /build/ghc1722_0/ghc_56.dyn_o ) [sydtest] [ 9 of 33] Compiling Test.Syd.Runner.Wrappers ( src/Test/Syd/Runner/Wrappers.hs, /build/ghc1722_0/ghc_54.o, /build/ghc1722_0/ghc_54.dyn_o ) [sydtest] [10 of 33] Compiling Test.Syd.Runner.Single ( src/Test/Syd/Runner/Single.hs, /build/ghc1722_0/ghc_46.o, /build/ghc1722_0/ghc_46.dyn_o ) [sydtest] [11 of 33] Compiling Test.Syd.Mutation.Forest ( src/Test/Syd/Mutation/Forest.hs, /build/ghc1722_0/ghc_32.o, /build/ghc1722_0/ghc_32.dyn_o ) [sydtest] [12 of 33] Compiling Test.Syd.Def.TestDefM ( src/Test/Syd/Def/TestDefM.hs, /build/ghc1722_0/ghc_26.o, /build/ghc1722_0/ghc_26.dyn_o ) [sydtest] [13 of 33] Compiling Test.Syd.Def.Specify ( src/Test/Syd/Def/Specify.hs, /build/ghc1722_0/ghc_24.o, /build/ghc1722_0/ghc_24.dyn_o ) [sydtest] [14 of 33] Compiling Test.Syd.Def.Scenario ( src/Test/Syd/Def/Scenario.hs, /build/ghc1722_0/ghc_20.o, /build/ghc1722_0/ghc_20.dyn_o ) [sydtest] [15 of 33] Compiling Test.Syd.Def.AroundAll ( src/Test/Syd/Def/AroundAll.hs, /build/ghc1722_0/ghc_16.o, /build/ghc1722_0/ghc_16.dyn_o ) [sydtest] [16 of 33] Compiling Test.Syd.Def.Around ( src/Test/Syd/Def/Around.hs, /build/ghc1722_0/ghc_14.o, /build/ghc1722_0/ghc_14.dyn_o ) [sydtest] [17 of 33] Compiling Test.Syd.Def.SetupFunc ( src/Test/Syd/Def/SetupFunc.hs, /build/ghc1722_0/ghc_22.o, /build/ghc1722_0/ghc_22.dyn_o ) [sydtest] [18 of 33] Compiling Test.Syd.Path ( src/Test/Syd/Path.hs, nothing ) [sydtest] [19 of 33] Compiling Test.Syd.Def ( src/Test/Syd/Def.hs, /build/ghc1722_0/ghc_12.o, /build/ghc1722_0/ghc_12.dyn_o ) [sydtest] [20 of 33] Compiling Test.Syd.Modify ( src/Test/Syd/Modify.hs, nothing ) [sydtest] [21 of 33] Compiling Test.Syd.SVG ( src/Test/Syd/SVG.hs, nothing ) [sydtest] [22 of 33] Compiling Test.Syd.Runner.Synchronous.Separate ( src/Test/Syd/Runner/Synchronous/Separate.hs, /build/ghc1722_0/ghc_52.o, /build/ghc1722_0/ghc_52.dyn_o ) [sydtest] [23 of 33] Compiling Test.Syd.ReRun ( src/Test/Syd/ReRun.hs, nothing ) [sydtest] [24 of 33] Compiling Test.Syd.Output.Common ( src/Test/Syd/Output/Common.hs, /build/ghc1722_0/ghc_38.o, /build/ghc1722_0/ghc_38.dyn_o ) [sydtest] [25 of 33] Compiling Test.Syd.Output.Terse ( src/Test/Syd/Output/Terse.hs, /build/ghc1722_0/ghc_42.o, /build/ghc1722_0/ghc_42.dyn_o ) [sydtest] [26 of 33] Compiling Test.Syd.Output.Pretty ( src/Test/Syd/Output/Pretty.hs, /build/ghc1722_0/ghc_40.o, /build/ghc1722_0/ghc_40.dyn_o ) [sydtest] [27 of 33] Compiling Test.Syd.Output ( src/Test/Syd/Output.hs, /build/ghc1722_0/ghc_36.o, /build/ghc1722_0/ghc_36.dyn_o ) [sydtest] [28 of 33] Compiling Test.Syd.Runner.Synchronous.Interleaved ( src/Test/Syd/Runner/Synchronous/Interleaved.hs, /build/ghc1722_0/ghc_50.o, /build/ghc1722_0/ghc_50.dyn_o ) [sydtest] [29 of 33] Compiling Test.Syd.Runner.Synchronous ( src/Test/Syd/Runner/Synchronous.hs, /build/ghc1722_0/ghc_48.o, /build/ghc1722_0/ghc_48.dyn_o ) [sydtest] [30 of 33] Compiling Test.Syd.Runner.Asynchronous ( src/Test/Syd/Runner/Asynchronous.hs, nothing ) [sydtest] [31 of 33] Compiling Test.Syd.Runner ( src/Test/Syd/Runner.hs, nothing ) [sydtest] [32 of 33] Compiling Test.Syd.MutationMode ( src/Test/Syd/MutationMode.hs, nothing ) [sydtest] [33 of 33] Compiling Test.Syd ( src/Test/Syd.hs, nothing ) [sydtest] Haddock coverage: [sydtest]  0% ( 0 / 3) in 'Test.Syd.HList' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  HList (src/Test/Syd/HList.hs:13) [sydtest]  HContains (src/Test/Syd/HList.hs:17) [sydtest] Warning: 'SomeException' is ambiguous. It is defined [sydtest]  * in ‘GHC.Internal.Exception.Type’ [sydtest]  * in ‘GHC.Internal.Exception.Type’ [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined in ‘GHC.Internal.Exception.Type’ [sydtest] Warning: 'shouldBe' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'golden' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'aroundAll' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'around' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'StagedGolden' is ambiguous. It is defined [sydtest]  * at src/Test/Syd/Run.hs:383:5 [sydtest]  * at src/Test/Syd/Run.hs:382:1 [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined at src/Test/Syd/Run.hs:382:1 [sydtest] Warning: 'timeit' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  21% ( 8 / 37) in 'Test.Syd.Run' [sydtest]  Missing documentation for: [sydtest]  IsTest (src/Test/Syd/Run.hs:45) [sydtest]  runPureTestWithArg (src/Test/Syd/Run.hs:81) [sydtest]  applyWrapper2 (src/Test/Syd/Run.hs:106) [sydtest]  runIOTestWithArg (src/Test/Syd/Run.hs:148) [sydtest]  makeQuickCheckArgs (src/Test/Syd/Run.hs:188) [sydtest]  runPropertyTestWithArg (src/Test/Syd/Run.hs:207) [sydtest]  aroundProperty (src/Test/Syd/Run.hs:274) [sydtest]  aroundProp (src/Test/Syd/Run.hs:277) [sydtest]  aroundRose (src/Test/Syd/Run.hs:280) [sydtest]  runGoldenTestWithArg (src/Test/Syd/Run.hs:347) [sydtest]  StagedGolden (src/Test/Syd/Run.hs:382) [sydtest]  runStagedGoldenWithArg (src/Test/Syd/Run.hs:412) [sydtest]  exceptionHandlers (src/Test/Syd/Run.hs:475) [sydtest]  Test (src/Test/Syd/Run.hs:487) [sydtest]  TestRunSettings (src/Test/Syd/Run.hs:489) [sydtest]  defaultTestRunSettings (src/Test/Syd/Run.hs:501) [sydtest]  SeedSetting (src/Test/Syd/Run.hs:519) [sydtest]  TestRunResult (src/Test/Syd/Run.hs:565) [sydtest]  TestStatus (src/Test/Syd/Run.hs:579) [sydtest]  addContextToException (src/Test/Syd/Run.hs:643) [sydtest]  GoldenCase (src/Test/Syd/Run.hs:645) [sydtest]  ProgressReporter (src/Test/Syd/Run.hs:651) [sydtest]  noProgressReporter (src/Test/Syd/Run.hs:654) [sydtest]  reportProgress (src/Test/Syd/Run.hs:657) [sydtest]  Progress (src/Test/Syd/Run.hs:659) [sydtest]  timeItDuration (src/Test/Syd/Run.hs:694) [sydtest]  timeItBeginEnd (src/Test/Syd/Run.hs:699) [sydtest]  Timed (src/Test/Syd/Run.hs:705) [sydtest]  timedTime (src/Test/Syd/Run.hs:716) [sydtest] Warning: 'TestBaselineMap' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'TestCoverageMap' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  21% ( 3 / 14) in 'Test.Syd.OptParse' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  getSettings (src/Test/Syd/OptParse.hs:39) [sydtest]  defaultSettings (src/Test/Syd/OptParse.hs:260) [sydtest]  defaultTimeout (src/Test/Syd/OptParse.hs:300) [sydtest]  defaultRetries (src/Test/Syd/OptParse.hs:303) [sydtest]  detectTerminalCapabilities (src/Test/Syd/OptParse.hs:314) [sydtest]  Flags (src/Test/Syd/OptParse.hs:320) [sydtest]  Timeout (src/Test/Syd/OptParse.hs:646) [sydtest]  Threads (src/Test/Syd/OptParse.hs:679) [sydtest]  Iterations (src/Test/Syd/OptParse.hs:740) [sydtest]  ReportProgress (src/Test/Syd/OptParse.hs:785) [sydtest] Warning: 'String' is ambiguous. It is defined [sydtest]  * in ‘Text.Show.Value’ [sydtest]  * in ‘GHC.Internal.Base’ [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined in ‘GHC.Internal.Base’ [sydtest] Warning: 'a' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: '()' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  82% ( 23 / 28) in 'Test.Syd.Expectation' [sydtest]  Missing documentation for: [sydtest]  anyException (src/Test/Syd/Expectation.hs:175) [sydtest]  anyErrorCall (src/Test/Syd/Expectation.hs:178) [sydtest]  errorCall (src/Test/Syd/Expectation.hs:181) [sydtest]  anyIOException (src/Test/Syd/Expectation.hs:184) [sydtest]  anyArithException (src/Test/Syd/Expectation.hs:187) [sydtest] Warning: Test.Syd.Def.Golden: Could not find documentation for exported module: Test.Syd.Def.Golden [sydtest]  93% ( 14 / 15) in 'Test.Syd.Def.Golden' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  0% ( 0 / 5) in 'Test.Syd.SpecForest' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  SpecForest (src/Test/Syd/SpecForest.hs:10) [sydtest]  SpecTree (src/Test/Syd/SpecForest.hs:12) [sydtest]  flattenSpecForest (src/Test/Syd/SpecForest.hs:34) [sydtest]  flattenSpecTree (src/Test/Syd/SpecForest.hs:37) [sydtest] Warning: 'aroundAll' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'around' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'TestDefM' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: '()' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  7% ( 2 / 28) in 'Test.Syd.SpecDef' [sydtest]  Missing documentation for: [sydtest]  TDef (src/Test/Syd/SpecDef.hs:41) [sydtest]  TestForest (src/Test/Syd/SpecDef.hs:44) [sydtest]  TestTree (src/Test/Syd/SpecDef.hs:46) [sydtest]  SpecDefForest (src/Test/Syd/SpecDef.hs:48) [sydtest]  filterTestForest (src/Test/Syd/SpecDef.hs:221) [sydtest]  randomiseTestForest (src/Test/Syd/SpecDef.hs:260) [sydtest]  markSpecForestAsPending (src/Test/Syd/SpecDef.hs:287) [sydtest]  Parallelism (src/Test/Syd/SpecDef.hs:311) [sydtest]  ExecutionOrderRandomisation (src/Test/Syd/SpecDef.hs:316) [sydtest]  FlakinessMode (src/Test/Syd/SpecDef.hs:321) [sydtest]  ExpectationMode (src/Test/Syd/SpecDef.hs:326) [sydtest]  ResultForest (src/Test/Syd/SpecDef.hs:331) [sydtest]  ResultTree (src/Test/Syd/SpecDef.hs:333) [sydtest]  computeTestSuiteStats (src/Test/Syd/SpecDef.hs:336) [sydtest]  TestSuiteStats (src/Test/Syd/SpecDef.hs:372) [sydtest]  shouldExitFail (src/Test/Syd/SpecDef.hs:406) [sydtest]  anyFailedTests (src/Test/Syd/SpecDef.hs:420) [sydtest]  TestRunReport (src/Test/Syd/SpecDef.hs:423) [sydtest]  testRunReportReportedRun (src/Test/Syd/SpecDef.hs:432) [sydtest]  testRunReportFailed (src/Test/Syd/SpecDef.hs:442) [sydtest]  testRunReportStatus (src/Test/Syd/SpecDef.hs:446) [sydtest]  testStatusMatchesExpectationMode (src/Test/Syd/SpecDef.hs:468) [sydtest]  testRunReportExamples (src/Test/Syd/SpecDef.hs:474) [sydtest]  testRunResultExamples (src/Test/Syd/SpecDef.hs:477) [sydtest]  testRunReportWasFlaky (src/Test/Syd/SpecDef.hs:481) [sydtest]  testRunReportRetries (src/Test/Syd/SpecDef.hs:489) [sydtest]  0% ( 0 / 8) in 'Test.Syd.Runner.Wrappers' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  Next (src/Test/Syd/Runner/Wrappers.hs:15) [sydtest]  extractNext (src/Test/Syd/Runner/Wrappers.hs:19) [sydtest]  failFastNext (src/Test/Syd/Runner/Wrappers.hs:23) [sydtest]  applySimpleWrapper (src/Test/Syd/Runner/Wrappers.hs:33) [sydtest]  applySimpleWrapper' (src/Test/Syd/Runner/Wrappers.hs:48) [sydtest]  applySimpleWrapper'' (src/Test/Syd/Runner/Wrappers.hs:63) [sydtest]  applySimpleWrapper2 (src/Test/Syd/Runner/Wrappers.hs:76) [sydtest] Warning: 'maxRetries' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  50% ( 1 / 2) in 'Test.Syd.Runner.Single' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest] Warning: 'TestId' is ambiguous. It is defined [sydtest]  * in ‘Test.Syd.Mutation.TestId’ [sydtest]  * in ‘Test.Syd.Mutation.TestId’ [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined in ‘Test.Syd.Mutation.TestId’ [sydtest]  100% ( 8 / 8) in 'Test.Syd.Mutation.Forest' [sydtest] Warning: 'aroundAll' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'around' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'TestDefM' is ambiguous. It is defined [sydtest]  * at src/Test/Syd/Def/TestDefM.hs:47:52 [sydtest]  * at src/Test/Syd/Def/TestDefM.hs:47:1 [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined at src/Test/Syd/Def/TestDefM.hs:47:1 [sydtest] Warning: '()' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'describe' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  54% ( 6 / 11) in 'Test.Syd.Def.TestDefM' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  TestDefEnv (src/Test/Syd/Def/TestDefM.hs:59) [sydtest]  execTestDefM (src/Test/Syd/Def/TestDefM.hs:66) [sydtest]  runTestDefM (src/Test/Syd/Def/TestDefM.hs:69) [sydtest]  toTestRunSettings (src/Test/Syd/Def/TestDefM.hs:103) [sydtest]  80% ( 21 / 26) in 'Test.Syd.Def.Specify' [sydtest]  Missing documentation for: [sydtest]  xdescribe (src/Test/Syd/Def/Specify.hs:74) [sydtest]  xit (src/Test/Syd/Def/Specify.hs:195) [sydtest]  xitWithOuter (src/Test/Syd/Def/Specify.hs:295) [sydtest]  xitWithBoth (src/Test/Syd/Def/Specify.hs:396) [sydtest]  xitWithAll (src/Test/Syd/Def/Specify.hs:465) [sydtest]  66% ( 2 / 3) in 'Test.Syd.Def.Scenario' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest] Warning: 'a' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'b' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'around_' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  100% ( 12 / 12) in 'Test.Syd.Def.AroundAll' [sydtest] Warning: 'inner' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'newInner' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'oldInner' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'c' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'd' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  90% ( 10 / 11) in 'Test.Syd.Def.Around' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest] Warning: 'SetupFunc' is ambiguous. It is defined [sydtest]  * at src/Test/Syd/Def/SetupFunc.hs:30:30 [sydtest]  * at src/Test/Syd/Def/SetupFunc.hs:30:1 [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined at src/Test/Syd/Def/SetupFunc.hs:30:1 [sydtest] Warning: 'resource' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  100% ( 12 / 12) in 'Test.Syd.Def.SetupFunc' [sydtest]  50% ( 2 / 4) in 'Test.Syd.Path' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  tempBinaryFileWithContentsSetupFunc (src/Test/Syd/Path.hs:31) [sydtest]  100% ( 9 / 9) in 'Test.Syd.Def' [sydtest]  74% ( 29 / 39) in 'Test.Syd.Modify' [sydtest]  Missing documentation for: [sydtest]  modifyMaxSuccess (src/Test/Syd/Modify.hs:64) [sydtest]  modifyMaxDiscardRatio (src/Test/Syd/Modify.hs:67) [sydtest]  modifyMaxSize (src/Test/Syd/Modify.hs:70) [sydtest]  modifyMaxShrinks (src/Test/Syd/Modify.hs:73) [sydtest]  modifyRunSettings (src/Test/Syd/Modify.hs:61) [sydtest]  TestRunSettings (src/Test/Syd/Run.hs:489) [sydtest]  Parallelism (src/Test/Syd/SpecDef.hs:311) [sydtest]  ExecutionOrderRandomisation (src/Test/Syd/SpecDef.hs:316) [sydtest]  FlakinessMode (src/Test/Syd/SpecDef.hs:321) [sydtest]  ExpectationMode (src/Test/Syd/SpecDef.hs:326) [sydtest]  0% ( 0 / 2) in 'Test.Syd.SVG' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  writeSvgReport (src/Test/Syd/SVG.hs:18) [sydtest]  0% ( 0 / 2) in 'Test.Syd.Runner.Synchronous.Separate' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  runSpecForestSynchronously (src/Test/Syd/Runner/Synchronous/Separate.hs:21) [sydtest]  0% ( 0 / 2) in 'Test.Syd.ReRun' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  withRerunByReport (src/Test/Syd/ReRun.hs:35) [sydtest] Warning: 'Chunk' is ambiguous. It is defined [sydtest]  * in ‘Text.Colour.Chunk’ [sydtest]  * in ‘Text.Colour.Chunk’ [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined in ‘Text.Colour.Chunk’ [sydtest]  4% ( 1 / 22) in 'Test.Syd.Output.Common' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  padding (src/Test/Syd/Output/Common.hs:28) [sydtest]  paddingSize (src/Test/Syd/Output/Common.hs:31) [sydtest]  orange (src/Test/Syd/Output/Common.hs:34) [sydtest]  darkRed (src/Test/Syd/Output/Common.hs:37) [sydtest]  statusColour (src/Test/Syd/Output/Common.hs:40) [sydtest]  statusCheckMark (src/Test/Syd/Output/Common.hs:45) [sydtest]  timeChunkFor (src/Test/Syd/Output/Common.hs:50) [sydtest]  stringChunks (src/Test/Syd/Output/Common.hs:63) [sydtest]  indexed (src/Test/Syd/Output/Common.hs:68) [sydtest]  commaList (src/Test/Syd/Output/Common.hs:71) [sydtest]  mContextChunks (src/Test/Syd/Output/Common.hs:76) [sydtest]  outputSomeException (src/Test/Syd/Output/Common.hs:79) [sydtest]  outputAssertion (src/Test/Syd/Output/Common.hs:93) [sydtest]  outputEqualityAssertionFailed (src/Test/Syd/Output/Common.hs:143) [sydtest]  formatDiff (src/Test/Syd/Output/Common.hs:155) [sydtest]  outputNotEqualAssertionFailed (src/Test/Syd/Output/Common.hs:201) [sydtest]  outputPredicateSuccessAssertionFailed (src/Test/Syd/Output/Common.hs:214) [sydtest]  outputPredicateFailAssertionFailed (src/Test/Syd/Output/Common.hs:223) [sydtest]  resultForestWidth (src/Test/Syd/Output/Common.hs:232) [sydtest]  specForestWidth (src/Test/Syd/Output/Common.hs:244) [sydtest]  80% ( 4 / 5) in 'Test.Syd.Output.Terse' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  0% ( 0 / 25) in 'Test.Syd.Output.Pretty' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  renderPrettyReport (src/Test/Syd/Output/Pretty.hs:28) [sydtest]  outputResultReport (src/Test/Syd/Output/Pretty.hs:35) [sydtest]  outputPrettySummary (src/Test/Syd/Output/Pretty.hs:47) [sydtest]  outputFailuresHeader (src/Test/Syd/Output/Pretty.hs:60) [sydtest]  outputFailuresWithHeading (src/Test/Syd/Output/Pretty.hs:63) [sydtest]  outputStats (src/Test/Syd/Output/Pretty.hs:73) [sydtest]  outputProfilingInfo (src/Test/Syd/Output/Pretty.hs:121) [sydtest]  outputTestsHeader (src/Test/Syd/Output/Pretty.hs:138) [sydtest]  outputHeader (src/Test/Syd/Output/Pretty.hs:141) [sydtest]  outputSpecForest (src/Test/Syd/Output/Pretty.hs:147) [sydtest]  outputSpecTree (src/Test/Syd/Output/Pretty.hs:150) [sydtest]  outputDescribeLine (src/Test/Syd/Output/Pretty.hs:157) [sydtest]  outputSpecifyLines (src/Test/Syd/Output/Pretty.hs:160) [sydtest]  exampleNrChunk (src/Test/Syd/Output/Pretty.hs:194) [sydtest]  retriesChunks (src/Test/Syd/Output/Pretty.hs:201) [sydtest]  labelsChunks (src/Test/Syd/Output/Pretty.hs:218) [sydtest]  classesChunks (src/Test/Syd/Output/Pretty.hs:243) [sydtest]  tablesChunks (src/Test/Syd/Output/Pretty.hs:264) [sydtest]  outputPendingLines (src/Test/Syd/Output/Pretty.hs:287) [sydtest]  outputFailureLabels (src/Test/Syd/Output/Pretty.hs:297) [sydtest]  outputFailureClasses (src/Test/Syd/Output/Pretty.hs:303) [sydtest]  outputGoldenCase (src/Test/Syd/Output/Pretty.hs:309) [sydtest]  spacingChunk (src/Test/Syd/Output/Pretty.hs:318) [sydtest]  outputFailures (src/Test/Syd/Output/Pretty.hs:331) [sydtest]  71% ( 5 / 7) in 'Test.Syd.Output' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  printOutputSpecForest (src/Test/Syd/Output.hs:22) [sydtest]  0% ( 0 / 2) in 'Test.Syd.Runner.Synchronous.Interleaved' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  runSpecForestInterleavedWithOutputSynchronously (src/Test/Syd/Runner/Synchronous/Interleaved.hs:28) [sydtest]  0% ( 0 / 3) in 'Test.Syd.Runner.Synchronous' [sydtest]  Missing documentation for: [sydtest]  Module header [sydtest]  runSpecForestSynchronously (src/Test/Syd/Runner/Synchronous/Separate.hs:21) [sydtest]  runSpecForestInterleavedWithOutputSynchronously (src/Test/Syd/Runner/Synchronous/Interleaved.hs:28) [sydtest]  33% ( 1 / 3) in 'Test.Syd.Runner.Asynchronous' [sydtest]  Missing documentation for: [sydtest]  runSpecForestAsynchronously (src/Test/Syd/Runner/Asynchronous.hs:39) [sydtest]  runSpecForestInterleavedWithOutputAsynchronously (src/Test/Syd/Runner/Asynchronous.hs:48) [sydtest] Warning: Test.Syd.Runner: Could not find documentation for exported module: Test.Syd.Runner [sydtest]  50% ( 4 / 8) in 'Test.Syd.Runner' [sydtest]  Missing documentation for: [sydtest]  sydTestResult (src/Test/Syd/Runner.hs:53) [sydtest]  sydTestOnce (src/Test/Syd/Runner.hs:63) [sydtest]  sydTestIterations (src/Test/Syd/Runner.hs:76) [sydtest]  setPseudorandomness (src/Test/Syd/Runner.hs:113) [sydtest] Warning: 'TestCoverageMap' is ambiguous. It is defined [sydtest]  * in ‘Test.Syd.Mutation.TestCoverageMap’ [sydtest]  * in ‘Test.Syd.Mutation.TestCoverageMap’ [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined in ‘Test.Syd.Mutation.TestCoverageMap’ [sydtest] Warning: 'runIO' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'activeMutation' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'coverageSlot' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'Map' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'Set' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'MutationId' is ambiguous. It is defined [sydtest]  * in ‘Test.Syd.Mutation.Runtime’ [sydtest]  * in ‘Test.Syd.Mutation.Runtime’ [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined in ‘Test.Syd.Mutation.Runtime’ [sydtest] Warning: 'NominalDiffTime' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest]  50% ( 5 / 10) in 'Test.Syd.MutationMode' [sydtest]  Missing documentation for: [sydtest]  renderMutationRunReport (src/Test/Syd/MutationMode.hs:548) [sydtest]  renderMutationProgressEvent (src/Test/Syd/MutationMode.hs:591) [sydtest]  formatMutationLog (src/Test/Syd/MutationMode.hs:598) [sydtest]  renderMutationAddedEvent (src/Test/Syd/MutationMode.hs:620) [sydtest]  renderUnifiedDiff (src/Test/Syd/MutationMode.hs:651) [sydtest] Warning: 'GoldenTest' is ambiguous. It is defined [sydtest]  * at src/Test/Syd/Run.hs:298:21 [sydtest]  * at src/Test/Syd/Run.hs:298:1 [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined at src/Test/Syd/Run.hs:298:1 [sydtest] Warning: '()' is out of scope. [sydtest]  If you qualify the identifier, haddock can try to link it anyway. [sydtest] Warning: 'Settings' is ambiguous. It is defined [sydtest]  * at src/Test/Syd/OptParse.hs:42:17 [sydtest]  * at src/Test/Syd/OptParse.hs:42:1 [sydtest]  You may be able to disambiguate the identifier by qualifying it or [sydtest]  by specifying the type/value namespace explicitly. [sydtest]  Defaulting to the one defined at src/Test/Syd/OptParse.hs:42:1 [sydtest]  83% (154 /184) in 'Test.Syd' [sydtest]  Missing documentation for: [sydtest]  xdescribe (src/Test/Syd/Def/Specify.hs:74) [sydtest]  xit (src/Test/Syd/Def/Specify.hs:195) [sydtest]  xitWithOuter (src/Test/Syd/Def/Specify.hs:295) [sydtest]  xitWithBoth (src/Test/Syd/Def/Specify.hs:396) [sydtest]  xitWithAll (src/Test/Syd/Def/Specify.hs:465) [sydtest]  anyException (src/Test/Syd/Expectation.hs:175) [sydtest]  anyErrorCall (src/Test/Syd/Expectation.hs:178) [sydtest]  errorCall (src/Test/Syd/Expectation.hs:181) [sydtest]  anyIOException (src/Test/Syd/Expectation.hs:184) [sydtest]  anyArithException (src/Test/Syd/Expectation.hs:187) [sydtest]  modifyMaxSuccess (src/Test/Syd/Modify.hs:64) [sydtest]  modifyMaxDiscardRatio (src/Test/Syd/Modify.hs:67) [sydtest]  modifyMaxSize (src/Test/Syd/Modify.hs:70) [sydtest]  modifyMaxShrinks (src/Test/Syd/Modify.hs:73) [sydtest]  modifyRunSettings (src/Test/Syd/Modify.hs:61) [sydtest]  TestRunSettings (src/Test/Syd/Run.hs:489) [sydtest]  Parallelism (src/Test/Syd/SpecDef.hs:311) [sydtest]  ExecutionOrderRandomisation (src/Test/Syd/SpecDef.hs:316) [sydtest]  FlakinessMode (src/Test/Syd/SpecDef.hs:321) [sydtest]  ExpectationMode (src/Test/Syd/SpecDef.hs:326) [sydtest]  execTestDefM (src/Test/Syd/Def/TestDefM.hs:66) [sydtest]  runTestDefM (src/Test/Syd/Def/TestDefM.hs:69) [sydtest]  IsTest (src/Test/Syd/Run.hs:45) [sydtest]  TDef (src/Test/Syd/SpecDef.hs:41) [sydtest]  TestForest (src/Test/Syd/SpecDef.hs:44) [sydtest]  TestTree (src/Test/Syd/SpecDef.hs:46) [sydtest]  SpecDefForest (src/Test/Syd/SpecDef.hs:48) [sydtest]  ResultForest (src/Test/Syd/SpecDef.hs:331) [sydtest]  ResultTree (src/Test/Syd/SpecDef.hs:333) [sydtest]  shouldExitFail (src/Test/Syd/SpecDef.hs:406) [sydtest] Warning: Test.Syd.Run: could not find link destinations for: [sydtest]  - Test.QuickCheck.Property.Result [sydtest]  - Test.QuickCheck.Property.Prop [sydtest]  - Test.QuickCheck.Property.Rose [sydtest]  - OptEnvConf.Parser.HasParser [sydtest]  - OptEnvConf.Parser.settingsParser [sydtest]  - OptEnvConf.Parser.Parser [sydtest]  - Test.Syd.Run.Rep_Timed [sydtest]  - Test.Syd.Run.Rep_Progress [sydtest]  - Test.Syd.Run.Rep_TestRunResult [sydtest]  - Test.Syd.Run.Rep_GoldenCase [sydtest]  - Test.Syd.Run.Rep_Assertion [sydtest]  - Test.Syd.Run.Rep_TestStatus [sydtest]  - Test.Syd.Run.Rep_TestRunSettings [sydtest]  - Test.Syd.Run.Rep_SeedSetting [sydtest] Warning: Test.Syd.OptParse: could not find link destinations for: [sydtest]  - Path.Internal.Posix.Path [sydtest]  - OptEnvConf.Parser.HasParser [sydtest]  - OptEnvConf.Parser.settingsParser [sydtest]  - OptEnvConf.Parser.Parser [sydtest]  - Path.Posix.Abs [sydtest]  - Path.Posix.Dir [sydtest]  - Path.Posix.File [sydtest]  - Test.Syd.OptParse.Rep_Settings [sydtest]  - Test.Syd.OptParse.Rep_Flags [sydtest]  - Test.Syd.OptParse.Rep_ReportProgress [sydtest]  - Test.Syd.OptParse.Rep_Iterations [sydtest]  - Test.Syd.OptParse.Rep_Threads [sydtest]  - Test.Syd.OptParse.Rep_Timeout [sydtest]  - Test.Syd.OptParse.Rep_OutputFormat [sydtest] Warning: Test.Syd.SpecDef: could not find link destinations for: [sydtest]  - Test.Syd.SpecDef.Rep_TestRunReport [sydtest]  - Test.Syd.SpecDef.Rep_ExpectationMode [sydtest]  - Test.Syd.SpecDef.Rep_FlakinessMode [sydtest]  - Test.Syd.SpecDef.Rep_ExecutionOrderRandomisation [sydtest]  - Test.Syd.SpecDef.Rep_Parallelism [sydtest] Warning: Test.Syd.Def.TestDefM: could not find link destinations for: [sydtest]  - Test.Syd.Def.TestDefM.Rep_TestDefEnv [sydtest] Warning: Test.Syd.Path: could not find link destinations for: [sydtest]  - Path.Internal.Posix.Path [sydtest]  - Path.Posix.Abs [sydtest]  - Path.Posix.Dir [sydtest]  - Path.Posix.File [sydtest] Warning: Test.Syd.Modify: could not find link destinations for: [sydtest]  - Test.Syd.Run.Rep_TestRunSettings [sydtest]  - Test.Syd.SpecDef.Rep_ExpectationMode [sydtest]  - Test.Syd.SpecDef.Rep_FlakinessMode [sydtest]  - Test.Syd.SpecDef.Rep_ExecutionOrderRandomisation [sydtest]  - Test.Syd.SpecDef.Rep_Parallelism [sydtest] Warning: Test.Syd.MutationMode: could not find link destinations for: [sydtest]  - Path.Internal.Posix.Path [sydtest]  - Path.Posix.Abs [sydtest]  - Path.Posix.Dir [sydtest] Warning: Test.Syd: could not find link destinations for: [sydtest]  - Test.Syd.Run.Rep_Assertion [sydtest]  - Test.Syd.Run.Rep_TestRunSettings [sydtest]  - Test.Syd.SpecDef.Rep_ExpectationMode [sydtest]  - Test.Syd.SpecDef.Rep_FlakinessMode [sydtest]  - Test.Syd.SpecDef.Rep_ExecutionOrderRandomisation [sydtest]  - Test.Syd.SpecDef.Rep_Parallelism [sydtest] Documentation created: dist/doc/html/sydtest/, [sydtest] dist/doc/html/sydtest/sydtest.txt [sydtest] haddockPhase completed in 36 seconds [sydtest] Phase: installPhase [sydtest] Installing library in /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [sydtest] Phase: fixupPhase [sydtest] shrinking RPATHs of ELF executables and libraries in /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 [sydtest] shrinking /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSsydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7-ghc9.10.3.so [sydtest] checking for references to /build/ in /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2... [sydtest] patching script interpreter paths in /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 [sydtest] stripping (with command strip and flags -S -p) in /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2/lib [sydtest] shrinking RPATHs of ELF executables and libraries in /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc [sydtest] checking for references to /build/ in /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc... [sydtest] patching script interpreter paths in /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc [post-build-hook] Pushing 2 paths (266 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc (7.45 MiB) [post-build-hook] Pushing /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 (21.74 MiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2 /nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 2 paths... [post-build-hook] copying path '/nix/store/z3qk2y2xwx3x23nsq31w9wff6x7mbm2z-sydtest-0.23.0.2-doc' to 'https://cache.staging.nix-ci.com'... [post-build-hook] copying path '/nix/store/np3ri2xkkqk4lw3zd0pg98gm6l5qj5m2-sydtest-0.23.0.2' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/4qn6m4pdrgy0w46h6g8s5jgmj1xj0ynj-sydtest-0.23.0.2.drv' to 'https://cache.staging.nix-ci.com'... Progress: 3 of 9 built Building genvalidity-sydtest-source Building opt-env-conf-test-source [genvalidity-sydtest-source] Phase: setupCompilerEnvironmentPhase [genvalidity-sydtest-source] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [opt-env-conf-test-source] Phase: setupCompilerEnvironmentPhase [opt-env-conf-test-source] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [opt-env-conf-test-source] Phase: unpackPhase [opt-env-conf-test-source] unpacking source archive /nix/store/8sr4z0mday4k62xn3vyb8dvl02qhicbl-opt-env-conf-test [opt-env-conf-test-source] source root is opt-env-conf-test [opt-env-conf-test-source] Phase: patchPhase [opt-env-conf-test-source] Phase: compileBuildDriverPhase [opt-env-conf-test-source] setupCompileFlags: -package-db=/build/tmp.U2nbPb47eM/setup-package.conf.d -threaded [genvalidity-sydtest-source] Phase: unpackPhase [genvalidity-sydtest-source] unpacking source archive /nix/store/dqdpwym3w17fcyylxh144v7wvc1c621z-genvalidity-sydtest [genvalidity-sydtest-source] source root is genvalidity-sydtest [genvalidity-sydtest-source] Phase: patchPhase [genvalidity-sydtest-source] Phase: compileBuildDriverPhase [genvalidity-sydtest-source] setupCompileFlags: -package-db=/build/tmp.gwC4SvVmip/setup-package.conf.d -threaded [opt-env-conf-test-source] [1 of 2] Compiling Main ( /nix/store/4mdp8nhyfddh7bllbi7xszz7k9955n79-Setup.hs, /build/tmp.U2nbPb47eM/Main.o ) [genvalidity-sydtest-source] [1 of 2] Compiling Main ( /nix/store/4mdp8nhyfddh7bllbi7xszz7k9955n79-Setup.hs, /build/tmp.gwC4SvVmip/Main.o ) [opt-env-conf-test-source] [2 of 2] Linking Setup [genvalidity-sydtest-source] [2 of 2] Linking Setup [opt-env-conf-test-source] Phase: updateAutotoolsGnuConfigScriptsPhase [opt-env-conf-test-source] Phase: configurePhase [opt-env-conf-test-source] configureFlags: --verbose --prefix=/nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/share/doc/opt-env-conf-test-0.0.0.4 --with-gcc=gcc --package-db=/build/tmp.U2nbPb47eM/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [opt-env-conf-test-source] Using Parsec parser [opt-env-conf-test-source] Configuring opt-env-conf-test-0.0.0.4... [genvalidity-sydtest-source] Phase: updateAutotoolsGnuConfigScriptsPhase [genvalidity-sydtest-source] Phase: configurePhase [genvalidity-sydtest-source] configureFlags: --verbose --prefix=/nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/share/doc/genvalidity-sydtest-1.0.1.0 --with-gcc=gcc --package-db=/build/tmp.gwC4SvVmip/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --enable-tests --disable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-option=-Wall --ghc-option=-Werror --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [genvalidity-sydtest-source] Using Parsec parser [genvalidity-sydtest-source] Configuring genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest-source] Dependency QuickCheck: using QuickCheck-2.15.0.1 [genvalidity-sydtest-source] Dependency base >=4.7 && <5: using base-4.20.2.0 [genvalidity-sydtest-source] Dependency genvalidity >=1.0: using genvalidity-1.1.1.0 [genvalidity-sydtest-source] Dependency sydtest: using sydtest-0.23.0.2 [genvalidity-sydtest-source] Dependency QuickCheck: using QuickCheck-2.15.0.1 [genvalidity-sydtest-source] Dependency base >=4.7 && <5: using base-4.20.2.0 [genvalidity-sydtest-source] Dependency genvalidity: using genvalidity-1.1.1.0 [genvalidity-sydtest-source] Dependency genvalidity-sydtest: using genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest-source] Dependency sydtest: using sydtest-0.23.0.2 [genvalidity-sydtest-source] Source component graph: [genvalidity-sydtest-source]  component lib [genvalidity-sydtest-source]  component test:genvalidity-sydtest-test dependency lib [genvalidity-sydtest-source] Configured component graph: [genvalidity-sydtest-source]  component genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest-source]  include base-4.20.2.0-64da [genvalidity-sydtest-source]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest-source]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest-source]  component genvalidity-sydtest-1.0.1.0-19nAOlA0K1r7uCV4LDDx2N-genvalidity-sydtest-test [genvalidity-sydtest-source]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest-source]  include base-4.20.2.0-64da [genvalidity-sydtest-source]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest-source]  include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest-source] Linked component graph: [genvalidity-sydtest-source]  unit genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest-source]  include base-4.20.2.0-64da [genvalidity-sydtest-source]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest-source]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest-source]  Test.Syd.Validity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity,Test.Syd.Validity.Applicative=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Applicative,Test.Syd.Validity.Arbitrary=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Arbitrary,Test.Syd.Validity.Eq=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Eq,Test.Syd.Validity.Functions=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions,Test.Syd.Validity.Functions.CanFail=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.CanFail,Test.Syd.Validity.Functions.Equivalence=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Equivalence,Test.Syd.Validity.Functions.Idempotence=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Idempotence,Test.Syd.Validity.Functions.Inverse=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Inverse,Test.Syd.Validity.Functions.Validity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Validity,Test.Syd.Validity.Functor=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functor,Test.Syd.Validity.GenValidity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.GenValidity,Test.Syd.Validity.GenValidity.Property=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.GenValidity.Property,Test.Syd.Validity.Monad=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Monad,Test.Syd.Validity.Monoid=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Monoid,Test.Syd.Validity.Operations=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations,Test.Syd.Validity.Operations.Associativity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations.Associativity,Test.Syd.Validity.Operations.Commutativity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations.Commutativity,Test.Syd.Validity.Operations.Identity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations.Identity,Test.Syd.Validity.Ord=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Ord,Test.Syd.Validity.Property=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Property,Test.Syd.Validity.Property.Utils=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Property.Utils,Test.Syd.Validity.Relations=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations,Test.Syd.Validity.Relations.Antireflexivity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Antireflexivity,Test.Syd.Validity.Relations.Antisymmetry=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Antisymmetry,Test.Syd.Validity.Relations.Reflexivity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Reflexivity,Test.Syd.Validity.Relations.Symmetry=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Symmetry,Test.Syd.Validity.Relations.Transitivity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Transitivity,Test.Syd.Validity.Show=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Show,Test.Syd.Validity.Shrinking=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Shrinking,Test.Syd.Validity.Shrinking.Property=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Shrinking.Property,Test.Syd.Validity.Types=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Types,Test.Syd.Validity.Utils=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Utils [genvalidity-sydtest-source]  unit genvalidity-sydtest-1.0.1.0-19nAOlA0K1r7uCV4LDDx2N-genvalidity-sydtest-test [genvalidity-sydtest-source]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest-source]  include base-4.20.2.0-64da [genvalidity-sydtest-source]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest-source]  include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest-source] Ready component graph: [genvalidity-sydtest-source]  definite genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest-source]  depends base-4.20.2.0-64da [genvalidity-sydtest-source]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest-source]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest-source]  definite genvalidity-sydtest-1.0.1.0-19nAOlA0K1r7uCV4LDDx2N-genvalidity-sydtest-test [genvalidity-sydtest-source]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest-source]  depends base-4.20.2.0-64da [genvalidity-sydtest-source]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest-source]  depends genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest-source] Using Cabal-3.12.1.0 compiled by ghc-9.10 [genvalidity-sydtest-source] Using compiler: ghc-9.10.3 [genvalidity-sydtest-source] Using install prefix: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0 [genvalidity-sydtest-source] Executables installed in: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/bin [genvalidity-sydtest-source] Libraries installed in: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest-source] Dynamic Libraries installed in: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [genvalidity-sydtest-source] Private executables installed in: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/libexec/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest-source] Data files installed in: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/share/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest-source] Documentation installed in: /share/doc/genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest-source] Configuration files installed in: [genvalidity-sydtest-source] /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/etc [genvalidity-sydtest-source] No alex found [genvalidity-sydtest-source] Using ar found on system at: [genvalidity-sydtest-source] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [genvalidity-sydtest-source] No c2hs found [genvalidity-sydtest-source] No cpphs found [genvalidity-sydtest-source] No doctest found [genvalidity-sydtest-source] Using gcc version 14.3.0 given by user at: [genvalidity-sydtest-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [genvalidity-sydtest-source] Using ghc version 9.10.3 found on system at: [genvalidity-sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [genvalidity-sydtest-source] Using ghc-pkg version 9.10.3 found on system at: [genvalidity-sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [genvalidity-sydtest-source] No ghcjs found [genvalidity-sydtest-source] No ghcjs-pkg found [genvalidity-sydtest-source] No greencard found [genvalidity-sydtest-source] Using haddock version 2.31.1 found on system at: [genvalidity-sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [genvalidity-sydtest-source] No happy found [genvalidity-sydtest-source] Using haskell-suite found on system at: haskell-suite-dummy-location [genvalidity-sydtest-source] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [genvalidity-sydtest-source] No hmake found [genvalidity-sydtest-source] Using hpc version 0.69 found on system at: [genvalidity-sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [genvalidity-sydtest-source] Using hsc2hs version 0.68.10 found on system at: [genvalidity-sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [genvalidity-sydtest-source] Using hscolour version 1.25 found on system at: [genvalidity-sydtest-source] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [genvalidity-sydtest-source] No jhc found [genvalidity-sydtest-source] Using ld found on system at: [genvalidity-sydtest-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [genvalidity-sydtest-source] No pkg-config found [genvalidity-sydtest-source] Using runghc version 9.10.3 found on system at: [genvalidity-sydtest-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [genvalidity-sydtest-source] Using strip version 2.44 found on system at: [genvalidity-sydtest-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [genvalidity-sydtest-source] Using tar found on system at: [genvalidity-sydtest-source] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [genvalidity-sydtest-source] No uhc found [opt-env-conf-test-source] Dependency aeson: using aeson-2.2.3.0 [opt-env-conf-test-source] Dependency base <5: using base-4.20.2.0 [opt-env-conf-test-source] Dependency genvalidity: using genvalidity-1.1.1.0 [opt-env-conf-test-source] Dependency genvalidity-containers: using genvalidity-containers-1.0.0.2 [opt-env-conf-test-source] Dependency opt-env-conf >=0.9.0.0: using opt-env-conf-0.15.0.1 [opt-env-conf-test-source] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0 [opt-env-conf-test-source] Dependency sydtest: using sydtest-0.23.0.2 [opt-env-conf-test-source] Dependency text: using text-2.1.3 [opt-env-conf-test-source] Source component graph: component lib [opt-env-conf-test-source] Configured component graph: [opt-env-conf-test-source]  component opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test-source]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test-source]  include base-4.20.2.0-64da [opt-env-conf-test-source]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test-source]  include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test-source]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test-source]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test-source]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test-source]  include text-2.1.3-c691 [opt-env-conf-test-source] Linked component graph: [opt-env-conf-test-source]  unit opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test-source]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test-source]  include base-4.20.2.0-64da [opt-env-conf-test-source]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test-source]  include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test-source]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test-source]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test-source]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test-source]  include text-2.1.3-c691 [opt-env-conf-test-source]  OptEnvConf.Args.Gen=opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm:OptEnvConf.Args.Gen,OptEnvConf.EnvMap.Gen=opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm:OptEnvConf.EnvMap.Gen,OptEnvConf.Test=opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm:OptEnvConf.Test [opt-env-conf-test-source] Ready component graph: [opt-env-conf-test-source]  definite opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test-source]  depends aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test-source]  depends base-4.20.2.0-64da [opt-env-conf-test-source]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test-source]  depends genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test-source]  depends opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test-source]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test-source]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test-source]  depends text-2.1.3-c691 [opt-env-conf-test-source] Using Cabal-3.12.1.0 compiled by ghc-9.10 [opt-env-conf-test-source] Using compiler: ghc-9.10.3 [opt-env-conf-test-source] Using install prefix: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4 [opt-env-conf-test-source] Executables installed in: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/bin [opt-env-conf-test-source] Libraries installed in: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test-source] Dynamic Libraries installed in: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [opt-env-conf-test-source] Private executables installed in: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/libexec/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test-source] Data files installed in: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/share/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test-source] Documentation installed in: /share/doc/opt-env-conf-test-0.0.0.4 [opt-env-conf-test-source] Configuration files installed in: [opt-env-conf-test-source] /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/etc [opt-env-conf-test-source] No alex found [opt-env-conf-test-source] Using ar found on system at: [opt-env-conf-test-source] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [opt-env-conf-test-source] No c2hs found [opt-env-conf-test-source] No cpphs found [opt-env-conf-test-source] No doctest found [opt-env-conf-test-source] Using gcc version 14.3.0 given by user at: [opt-env-conf-test-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [opt-env-conf-test-source] Using ghc version 9.10.3 found on system at: [opt-env-conf-test-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [opt-env-conf-test-source] Using ghc-pkg version 9.10.3 found on system at: [opt-env-conf-test-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [opt-env-conf-test-source] No ghcjs found [opt-env-conf-test-source] No ghcjs-pkg found [opt-env-conf-test-source] No greencard found [opt-env-conf-test-source] Using haddock version 2.31.1 found on system at: [opt-env-conf-test-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [opt-env-conf-test-source] No happy found [opt-env-conf-test-source] Using haskell-suite found on system at: haskell-suite-dummy-location [opt-env-conf-test-source] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [opt-env-conf-test-source] No hmake found [opt-env-conf-test-source] Using hpc version 0.69 found on system at: [opt-env-conf-test-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [opt-env-conf-test-source] Using hsc2hs version 0.68.10 found on system at: [opt-env-conf-test-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [opt-env-conf-test-source] Using hscolour version 1.25 found on system at: [opt-env-conf-test-source] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [opt-env-conf-test-source] No jhc found [opt-env-conf-test-source] Using ld found on system at: [opt-env-conf-test-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [opt-env-conf-test-source] No pkg-config found [opt-env-conf-test-source] Using runghc version 9.10.3 found on system at: [opt-env-conf-test-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [opt-env-conf-test-source] Using strip version 2.44 found on system at: [opt-env-conf-test-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [opt-env-conf-test-source] Using tar found on system at: [opt-env-conf-test-source] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [opt-env-conf-test-source] No uhc found [genvalidity-sydtest-source] Phase: buildPhase [genvalidity-sydtest-source] Distribution quality warnings: [genvalidity-sydtest-source] [no-description] No 'description' field. [genvalidity-sydtest-source] [missing-upper-bounds] On library, these packages miss upper bounds: [genvalidity-sydtest-source] - QuickCheck [genvalidity-sydtest-source] - genvalidity [genvalidity-sydtest-source] - sydtest [genvalidity-sydtest-source] Please add them. There is more information at https://pvp.haskell.org/ [genvalidity-sydtest-source] Building source dist for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest-source] Source tarball created: dist/genvalidity-sydtest-1.0.1.0.tar.gz [genvalidity-sydtest-source] Phase: checkPhase [genvalidity-sydtest-source] Phase: haddockPhase [genvalidity-sydtest-source] Phase: installPhase [genvalidity-sydtest-source] Phase: fixupPhase [opt-env-conf-test-source] Phase: buildPhase [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0 [post-build-hook] Pushing 1 paths (0 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0 (18.12 KiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0 [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/4ac2nkzsx3q53r1c4rij4m12cldki7yb-genvalidity-sydtest-source-1.0.1.0.drv' to 'https://cache.staging.nix-ci.com'... Progress: 4 of 9 built (1 building) Building genvalidity-sydtest [opt-env-conf-test-source] Distribution quality warnings: [opt-env-conf-test-source] [no-category] No 'category' field. [opt-env-conf-test-source] [no-description] No 'description' field. [opt-env-conf-test-source] [missing-upper-bounds] On library, these packages miss upper bounds: [opt-env-conf-test-source] - aeson [opt-env-conf-test-source] - genvalidity [opt-env-conf-test-source] - genvalidity-containers [opt-env-conf-test-source] - opt-env-conf [opt-env-conf-test-source] - safe-coloured-text [opt-env-conf-test-source] - sydtest [opt-env-conf-test-source] - text [opt-env-conf-test-source] Please add them. There is more information at https://pvp.haskell.org/ [opt-env-conf-test-source] Building source dist for opt-env-conf-test-0.0.0.4... [opt-env-conf-test-source] Source tarball created: dist/opt-env-conf-test-0.0.0.4.tar.gz [opt-env-conf-test-source] Phase: haddockPhase [opt-env-conf-test-source] Phase: installPhase [opt-env-conf-test-source] Phase: fixupPhase [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4 [post-build-hook] Pushing 1 paths (0 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4 (57.03 KiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4 [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/iqgi95z14l8s50lyjplr8r27114w5lwr-opt-env-conf-test-source-0.0.0.4.drv' to 'https://cache.staging.nix-ci.com'... Progress: 5 of 9 built (1 building) Building opt-env-conf-test [genvalidity-sydtest] Phase: setupCompilerEnvironmentPhase [genvalidity-sydtest] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [genvalidity-sydtest] Phase: unpackPhase [genvalidity-sydtest] unpacking source archive /nix/store/qwy7a9vm4ksr8hjsgkxrc2zad41558vb-genvalidity-sydtest-source-1.0.1.0/genvalidity-sydtest-1.0.1.0.tar.gz [genvalidity-sydtest] source root is genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] setting SOURCE_DATE_EPOCH to timestamp 1778831704 of file "genvalidity-sydtest-1.0.1.0/test/Test/Syd/Validity/ShrinkingSpec.hs" [genvalidity-sydtest] warning: file "genvalidity-sydtest-1.0.1.0/test/Test/Syd/Validity/ShrinkingSpec.hs" may be generated; SOURCE_DATE_EPOCH may be non-deterministic [genvalidity-sydtest] Phase: patchPhase [genvalidity-sydtest] Phase: compileBuildDriverPhase [genvalidity-sydtest] setupCompileFlags: -package-db=/build/tmp.ppcYHDP00m/setup-package.conf.d -threaded [genvalidity-sydtest] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.ppcYHDP00m/Main.o ) [genvalidity-sydtest] [2 of 2] Linking Setup [opt-env-conf-test] Phase: setupCompilerEnvironmentPhase [opt-env-conf-test] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [opt-env-conf-test] Phase: unpackPhase [opt-env-conf-test] unpacking source archive /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/opt-env-conf-test-0.0.0.4.tar.gz [opt-env-conf-test] source root is opt-env-conf-test-0.0.0.4 [opt-env-conf-test] setting SOURCE_DATE_EPOCH to timestamp 1778831705 of file "opt-env-conf-test-0.0.0.4/test/Spec.hs" [opt-env-conf-test] warning: file "opt-env-conf-test-0.0.0.4/test/Spec.hs" may be generated; SOURCE_DATE_EPOCH may be non-deterministic [opt-env-conf-test] Phase: patchPhase [opt-env-conf-test] Phase: compileBuildDriverPhase [opt-env-conf-test] setupCompileFlags: -package-db=/build/tmp.umz6Zo49PL/setup-package.conf.d -threaded [genvalidity-sydtest] Phase: updateAutotoolsGnuConfigScriptsPhase [genvalidity-sydtest] Phase: configurePhase [genvalidity-sydtest] configureFlags: --verbose --prefix=/nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc/share/doc/genvalidity-sydtest-1.0.1.0 --with-gcc=gcc --package-db=/build/tmp.ppcYHDP00m/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --enable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-option=-Wall --ghc-option=-Werror --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [genvalidity-sydtest] Using Parsec parser [genvalidity-sydtest] Configuring genvalidity-sydtest-1.0.1.0... [opt-env-conf-test] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.umz6Zo49PL/Main.o ) [opt-env-conf-test] [2 of 2] Linking Setup [genvalidity-sydtest] Dependency QuickCheck: using QuickCheck-2.15.0.1 [genvalidity-sydtest] Dependency base >=4.7 && <5: using base-4.20.2.0 [genvalidity-sydtest] Dependency genvalidity >=1.0: using genvalidity-1.1.1.0 [genvalidity-sydtest] Dependency sydtest: using sydtest-0.23.0.2 [genvalidity-sydtest] Dependency QuickCheck: using QuickCheck-2.15.0.1 [genvalidity-sydtest] Dependency base >=4.7 && <5: using base-4.20.2.0 [genvalidity-sydtest] Dependency genvalidity: using genvalidity-1.1.1.0 [genvalidity-sydtest] Dependency genvalidity-sydtest: using genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] Dependency sydtest: using sydtest-0.23.0.2 [genvalidity-sydtest] Source component graph: [genvalidity-sydtest]  component lib [genvalidity-sydtest]  component test:genvalidity-sydtest-test dependency lib [genvalidity-sydtest] Configured component graph: [genvalidity-sydtest]  component genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest]  include base-4.20.2.0-64da [genvalidity-sydtest]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest]  component genvalidity-sydtest-1.0.1.0-19nAOlA0K1r7uCV4LDDx2N-genvalidity-sydtest-test [genvalidity-sydtest]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest]  include base-4.20.2.0-64da [genvalidity-sydtest]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest]  include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest] Linked component graph: [genvalidity-sydtest]  unit genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest]  include base-4.20.2.0-64da [genvalidity-sydtest]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest]  Test.Syd.Validity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity,Test.Syd.Validity.Applicative=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Applicative,Test.Syd.Validity.Arbitrary=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Arbitrary,Test.Syd.Validity.Eq=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Eq,Test.Syd.Validity.Functions=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions,Test.Syd.Validity.Functions.CanFail=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.CanFail,Test.Syd.Validity.Functions.Equivalence=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Equivalence,Test.Syd.Validity.Functions.Idempotence=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Idempotence,Test.Syd.Validity.Functions.Inverse=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Inverse,Test.Syd.Validity.Functions.Validity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functions.Validity,Test.Syd.Validity.Functor=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Functor,Test.Syd.Validity.GenValidity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.GenValidity,Test.Syd.Validity.GenValidity.Property=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.GenValidity.Property,Test.Syd.Validity.Monad=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Monad,Test.Syd.Validity.Monoid=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Monoid,Test.Syd.Validity.Operations=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations,Test.Syd.Validity.Operations.Associativity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations.Associativity,Test.Syd.Validity.Operations.Commutativity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations.Commutativity,Test.Syd.Validity.Operations.Identity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Operations.Identity,Test.Syd.Validity.Ord=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Ord,Test.Syd.Validity.Property=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Property,Test.Syd.Validity.Property.Utils=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Property.Utils,Test.Syd.Validity.Relations=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations,Test.Syd.Validity.Relations.Antireflexivity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Antireflexivity,Test.Syd.Validity.Relations.Antisymmetry=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Antisymmetry,Test.Syd.Validity.Relations.Reflexivity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Reflexivity,Test.Syd.Validity.Relations.Symmetry=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Symmetry,Test.Syd.Validity.Relations.Transitivity=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Relations.Transitivity,Test.Syd.Validity.Show=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Show,Test.Syd.Validity.Shrinking=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Shrinking,Test.Syd.Validity.Shrinking.Property=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Shrinking.Property,Test.Syd.Validity.Types=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Types,Test.Syd.Validity.Utils=genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v:Test.Syd.Validity.Utils [genvalidity-sydtest]  unit genvalidity-sydtest-1.0.1.0-19nAOlA0K1r7uCV4LDDx2N-genvalidity-sydtest-test [genvalidity-sydtest]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest]  include base-4.20.2.0-64da [genvalidity-sydtest]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest]  include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest] Ready component graph: [genvalidity-sydtest]  definite genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest]  depends base-4.20.2.0-64da [genvalidity-sydtest]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest]  definite genvalidity-sydtest-1.0.1.0-19nAOlA0K1r7uCV4LDDx2N-genvalidity-sydtest-test [genvalidity-sydtest]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [genvalidity-sydtest]  depends base-4.20.2.0-64da [genvalidity-sydtest]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [genvalidity-sydtest]  depends genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [genvalidity-sydtest] Using Cabal-3.12.1.0 compiled by ghc-9.10 [genvalidity-sydtest] Using compiler: ghc-9.10.3 [genvalidity-sydtest] Using install prefix: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] Executables installed in: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/bin [genvalidity-sydtest] Libraries installed in: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest] Dynamic Libraries installed in: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [genvalidity-sydtest] Private executables installed in: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/libexec/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] Data files installed in: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/share/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] Documentation installed in: [genvalidity-sydtest] /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc/share/doc/genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] Configuration files installed in: [genvalidity-sydtest] /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/etc [genvalidity-sydtest] No alex found [genvalidity-sydtest] Using ar found on system at: [genvalidity-sydtest] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [genvalidity-sydtest] No c2hs found [genvalidity-sydtest] No cpphs found [genvalidity-sydtest] No doctest found [genvalidity-sydtest] Using gcc version 14.3.0 given by user at: [genvalidity-sydtest] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [genvalidity-sydtest] Using ghc version 9.10.3 found on system at: [genvalidity-sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [genvalidity-sydtest] Using ghc-pkg version 9.10.3 found on system at: [genvalidity-sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [genvalidity-sydtest] No ghcjs found [genvalidity-sydtest] No ghcjs-pkg found [genvalidity-sydtest] No greencard found [genvalidity-sydtest] Using haddock version 2.31.1 found on system at: [genvalidity-sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [genvalidity-sydtest] No happy found [genvalidity-sydtest] Using haskell-suite found on system at: haskell-suite-dummy-location [genvalidity-sydtest] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [genvalidity-sydtest] No hmake found [genvalidity-sydtest] Using hpc version 0.69 found on system at: [genvalidity-sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [genvalidity-sydtest] Using hsc2hs version 0.68.10 found on system at: [genvalidity-sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [genvalidity-sydtest] Using hscolour version 1.25 found on system at: [genvalidity-sydtest] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [genvalidity-sydtest] No jhc found [genvalidity-sydtest] Using ld found on system at: [genvalidity-sydtest] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [genvalidity-sydtest] No pkg-config found [genvalidity-sydtest] Using runghc version 9.10.3 found on system at: [genvalidity-sydtest] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [genvalidity-sydtest] Using strip version 2.44 found on system at: [genvalidity-sydtest] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [genvalidity-sydtest] Using tar found on system at: [genvalidity-sydtest] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [genvalidity-sydtest] No uhc found [genvalidity-sydtest] Phase: buildPhase [genvalidity-sydtest] Preprocessing library for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] Building library for genvalidity-sydtest-1.0.1.0... [opt-env-conf-test] Phase: updateAutotoolsGnuConfigScriptsPhase [opt-env-conf-test] Phase: configurePhase [opt-env-conf-test] configureFlags: --verbose --prefix=/nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --with-gcc=gcc --package-db=/build/tmp.umz6Zo49PL/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --disable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --ghc-options=-fplugin-opt=Test.Syd.Mutation.Plugin:--debug --disable-optimization --ghc-option=-j1 --ghc-option=+RTS --ghc-option=-A32M --ghc-option=-M16g --ghc-option=-RTS --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [genvalidity-sydtest] [ 1 of 34] Compiling Paths_genvalidity_sydtest ( dist/build/autogen/Paths_genvalidity_sydtest.hs, dist/build/Paths_genvalidity_sydtest.o, dist/build/Paths_genvalidity_sydtest.dyn_o ) [opt-env-conf-test] Using Parsec parser [opt-env-conf-test] Configuring opt-env-conf-test-0.0.0.4... [genvalidity-sydtest] [ 2 of 34] Compiling Test.Syd.Validity.Functions.Idempotence ( src/Test/Syd/Validity/Functions/Idempotence.hs, dist/build/Test/Syd/Validity/Functions/Idempotence.o, dist/build/Test/Syd/Validity/Functions/Idempotence.dyn_o ) [genvalidity-sydtest] [ 3 of 34] Compiling Test.Syd.Validity.Operations.Associativity ( src/Test/Syd/Validity/Operations/Associativity.hs, dist/build/Test/Syd/Validity/Operations/Associativity.o, dist/build/Test/Syd/Validity/Operations/Associativity.dyn_o ) [genvalidity-sydtest] [ 4 of 34] Compiling Test.Syd.Validity.Operations.Commutativity ( src/Test/Syd/Validity/Operations/Commutativity.hs, dist/build/Test/Syd/Validity/Operations/Commutativity.o, dist/build/Test/Syd/Validity/Operations/Commutativity.dyn_o ) [genvalidity-sydtest] [ 5 of 34] Compiling Test.Syd.Validity.Operations.Identity ( src/Test/Syd/Validity/Operations/Identity.hs, dist/build/Test/Syd/Validity/Operations/Identity.o, dist/build/Test/Syd/Validity/Operations/Identity.dyn_o ) [genvalidity-sydtest] [ 6 of 34] Compiling Test.Syd.Validity.Operations ( src/Test/Syd/Validity/Operations.hs, dist/build/Test/Syd/Validity/Operations.o, dist/build/Test/Syd/Validity/Operations.dyn_o ) [genvalidity-sydtest] [ 7 of 34] Compiling Test.Syd.Validity.Property.Utils ( src/Test/Syd/Validity/Property/Utils.hs, dist/build/Test/Syd/Validity/Property/Utils.o, dist/build/Test/Syd/Validity/Property/Utils.dyn_o ) [genvalidity-sydtest] [ 8 of 34] Compiling Test.Syd.Validity.GenValidity.Property ( src/Test/Syd/Validity/GenValidity/Property.hs, dist/build/Test/Syd/Validity/GenValidity/Property.o, dist/build/Test/Syd/Validity/GenValidity/Property.dyn_o ) [genvalidity-sydtest] [ 9 of 34] Compiling Test.Syd.Validity.Functions.Validity ( src/Test/Syd/Validity/Functions/Validity.hs, dist/build/Test/Syd/Validity/Functions/Validity.o, dist/build/Test/Syd/Validity/Functions/Validity.dyn_o ) [genvalidity-sydtest] [10 of 34] Compiling Test.Syd.Validity.Relations.Antireflexivity ( src/Test/Syd/Validity/Relations/Antireflexivity.hs, dist/build/Test/Syd/Validity/Relations/Antireflexivity.o, dist/build/Test/Syd/Validity/Relations/Antireflexivity.dyn_o ) [genvalidity-sydtest] [11 of 34] Compiling Test.Syd.Validity.Relations.Antisymmetry ( src/Test/Syd/Validity/Relations/Antisymmetry.hs, dist/build/Test/Syd/Validity/Relations/Antisymmetry.o, dist/build/Test/Syd/Validity/Relations/Antisymmetry.dyn_o ) [genvalidity-sydtest] [12 of 34] Compiling Test.Syd.Validity.Relations.Reflexivity ( src/Test/Syd/Validity/Relations/Reflexivity.hs, dist/build/Test/Syd/Validity/Relations/Reflexivity.o, dist/build/Test/Syd/Validity/Relations/Reflexivity.dyn_o ) [genvalidity-sydtest] [13 of 34] Compiling Test.Syd.Validity.Relations.Symmetry ( src/Test/Syd/Validity/Relations/Symmetry.hs, dist/build/Test/Syd/Validity/Relations/Symmetry.o, dist/build/Test/Syd/Validity/Relations/Symmetry.dyn_o ) [genvalidity-sydtest] [14 of 34] Compiling Test.Syd.Validity.Relations.Transitivity ( src/Test/Syd/Validity/Relations/Transitivity.hs, dist/build/Test/Syd/Validity/Relations/Transitivity.o, dist/build/Test/Syd/Validity/Relations/Transitivity.dyn_o ) [genvalidity-sydtest] [15 of 34] Compiling Test.Syd.Validity.Relations ( src/Test/Syd/Validity/Relations.hs, dist/build/Test/Syd/Validity/Relations.o, dist/build/Test/Syd/Validity/Relations.dyn_o ) [genvalidity-sydtest] [16 of 34] Compiling Test.Syd.Validity.Shrinking.Property ( src/Test/Syd/Validity/Shrinking/Property.hs, dist/build/Test/Syd/Validity/Shrinking/Property.o, dist/build/Test/Syd/Validity/Shrinking/Property.dyn_o ) [genvalidity-sydtest] [17 of 34] Compiling Test.Syd.Validity.Types ( src/Test/Syd/Validity/Types.hs, dist/build/Test/Syd/Validity/Types.o, dist/build/Test/Syd/Validity/Types.dyn_o ) [genvalidity-sydtest] [18 of 34] Compiling Test.Syd.Validity.Functions.Inverse ( src/Test/Syd/Validity/Functions/Inverse.hs, dist/build/Test/Syd/Validity/Functions/Inverse.o, dist/build/Test/Syd/Validity/Functions/Inverse.dyn_o ) [genvalidity-sydtest] [19 of 34] Compiling Test.Syd.Validity.Functions.Equivalence ( src/Test/Syd/Validity/Functions/Equivalence.hs, dist/build/Test/Syd/Validity/Functions/Equivalence.o, dist/build/Test/Syd/Validity/Functions/Equivalence.dyn_o ) [genvalidity-sydtest] [20 of 34] Compiling Test.Syd.Validity.Functions.CanFail ( src/Test/Syd/Validity/Functions/CanFail.hs, dist/build/Test/Syd/Validity/Functions/CanFail.o, dist/build/Test/Syd/Validity/Functions/CanFail.dyn_o ) [genvalidity-sydtest] [21 of 34] Compiling Test.Syd.Validity.Functions ( src/Test/Syd/Validity/Functions.hs, dist/build/Test/Syd/Validity/Functions.o, dist/build/Test/Syd/Validity/Functions.dyn_o ) [genvalidity-sydtest] [22 of 34] Compiling Test.Syd.Validity.Property ( src/Test/Syd/Validity/Property.hs, dist/build/Test/Syd/Validity/Property.o, dist/build/Test/Syd/Validity/Property.dyn_o ) [genvalidity-sydtest] [23 of 34] Compiling Test.Syd.Validity.Utils ( src/Test/Syd/Validity/Utils.hs, dist/build/Test/Syd/Validity/Utils.o, dist/build/Test/Syd/Validity/Utils.dyn_o ) [genvalidity-sydtest] [24 of 34] Compiling Test.Syd.Validity.Shrinking ( src/Test/Syd/Validity/Shrinking.hs, dist/build/Test/Syd/Validity/Shrinking.o, dist/build/Test/Syd/Validity/Shrinking.dyn_o ) [genvalidity-sydtest] [25 of 34] Compiling Test.Syd.Validity.Show ( src/Test/Syd/Validity/Show.hs, dist/build/Test/Syd/Validity/Show.o, dist/build/Test/Syd/Validity/Show.dyn_o ) [genvalidity-sydtest] [26 of 34] Compiling Test.Syd.Validity.Ord ( src/Test/Syd/Validity/Ord.hs, dist/build/Test/Syd/Validity/Ord.o, dist/build/Test/Syd/Validity/Ord.dyn_o ) [genvalidity-sydtest] [27 of 34] Compiling Test.Syd.Validity.Monoid ( src/Test/Syd/Validity/Monoid.hs, dist/build/Test/Syd/Validity/Monoid.o, dist/build/Test/Syd/Validity/Monoid.dyn_o ) [genvalidity-sydtest] [28 of 34] Compiling Test.Syd.Validity.Monad ( src/Test/Syd/Validity/Monad.hs, dist/build/Test/Syd/Validity/Monad.o, dist/build/Test/Syd/Validity/Monad.dyn_o ) [opt-env-conf-test] Dependency aeson: using aeson-2.2.3.0 [opt-env-conf-test] Dependency base <5: using base-4.20.2.0 [opt-env-conf-test] Dependency genvalidity: using genvalidity-1.1.1.0 [opt-env-conf-test] Dependency genvalidity-containers: using genvalidity-containers-1.0.0.2 [opt-env-conf-test] Dependency opt-env-conf >=0.9.0.0: using opt-env-conf-0.15.0.1 [opt-env-conf-test] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0 [opt-env-conf-test] Dependency sydtest: using sydtest-0.23.0.2 [opt-env-conf-test] Dependency text: using text-2.1.3 [opt-env-conf-test] Source component graph: component lib [opt-env-conf-test] Configured component graph: [opt-env-conf-test]  component opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  include base-4.20.2.0-64da [opt-env-conf-test]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test]  include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  include text-2.1.3-c691 [opt-env-conf-test] Linked component graph: [opt-env-conf-test]  unit opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  include base-4.20.2.0-64da [opt-env-conf-test]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test]  include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  include text-2.1.3-c691 [opt-env-conf-test]  OptEnvConf.Args.Gen=opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm:OptEnvConf.Args.Gen,OptEnvConf.EnvMap.Gen=opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm:OptEnvConf.EnvMap.Gen,OptEnvConf.Test=opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm:OptEnvConf.Test [opt-env-conf-test] Ready component graph: [opt-env-conf-test]  definite opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test]  depends aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  depends base-4.20.2.0-64da [opt-env-conf-test]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test]  depends genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test]  depends opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  depends text-2.1.3-c691 [opt-env-conf-test] Using Cabal-3.12.1.0 compiled by ghc-9.10 [opt-env-conf-test] Using compiler: ghc-9.10.3 [opt-env-conf-test] Using install prefix: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Executables installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/bin [opt-env-conf-test] Libraries installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [opt-env-conf-test] Dynamic Libraries installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [opt-env-conf-test] Private executables installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/libexec/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Data files installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/share/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Documentation installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/share/doc/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Configuration files installed in: [opt-env-conf-test] /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/etc [opt-env-conf-test] No alex found [opt-env-conf-test] Using ar found on system at: [opt-env-conf-test] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [opt-env-conf-test] No c2hs found [opt-env-conf-test] No cpphs found [opt-env-conf-test] No doctest found [opt-env-conf-test] Using gcc version 14.3.0 given by user at: [opt-env-conf-test] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [opt-env-conf-test] Using ghc version 9.10.3 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [opt-env-conf-test] Using ghc-pkg version 9.10.3 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [opt-env-conf-test] No ghcjs found [opt-env-conf-test] No ghcjs-pkg found [opt-env-conf-test] No greencard found [opt-env-conf-test] Using haddock version 2.31.1 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [opt-env-conf-test] No happy found [opt-env-conf-test] Using haskell-suite found on system at: haskell-suite-dummy-location [opt-env-conf-test] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [opt-env-conf-test] No hmake found [opt-env-conf-test] Using hpc version 0.69 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [opt-env-conf-test] Using hsc2hs version 0.68.10 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [opt-env-conf-test] Using hscolour version 1.25 found on system at: [opt-env-conf-test] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [opt-env-conf-test] No jhc found [opt-env-conf-test] Using ld found on system at: [opt-env-conf-test] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [opt-env-conf-test] No pkg-config found [opt-env-conf-test] Using runghc version 9.10.3 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [opt-env-conf-test] Using strip version 2.44 found on system at: [opt-env-conf-test] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [opt-env-conf-test] Using tar found on system at: [opt-env-conf-test] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [opt-env-conf-test] No uhc found [genvalidity-sydtest] [29 of 34] Compiling Test.Syd.Validity.GenValidity ( src/Test/Syd/Validity/GenValidity.hs, dist/build/Test/Syd/Validity/GenValidity.o, dist/build/Test/Syd/Validity/GenValidity.dyn_o ) [genvalidity-sydtest] [30 of 34] Compiling Test.Syd.Validity.Functor ( src/Test/Syd/Validity/Functor.hs, dist/build/Test/Syd/Validity/Functor.o, dist/build/Test/Syd/Validity/Functor.dyn_o ) [genvalidity-sydtest] [31 of 34] Compiling Test.Syd.Validity.Eq ( src/Test/Syd/Validity/Eq.hs, dist/build/Test/Syd/Validity/Eq.o, dist/build/Test/Syd/Validity/Eq.dyn_o ) [genvalidity-sydtest] [32 of 34] Compiling Test.Syd.Validity.Arbitrary ( src/Test/Syd/Validity/Arbitrary.hs, dist/build/Test/Syd/Validity/Arbitrary.o, dist/build/Test/Syd/Validity/Arbitrary.dyn_o ) [genvalidity-sydtest] [33 of 34] Compiling Test.Syd.Validity.Applicative ( src/Test/Syd/Validity/Applicative.hs, dist/build/Test/Syd/Validity/Applicative.o, dist/build/Test/Syd/Validity/Applicative.dyn_o ) [genvalidity-sydtest] [34 of 34] Compiling Test.Syd.Validity ( src/Test/Syd/Validity.hs, dist/build/Test/Syd/Validity.o, dist/build/Test/Syd/Validity.dyn_o ) [genvalidity-sydtest] [ 1 of 34] Compiling Paths_genvalidity_sydtest ( dist/build/autogen/Paths_genvalidity_sydtest.hs, dist/build/Paths_genvalidity_sydtest.p_o ) [opt-env-conf-test] Phase: buildPhase [opt-env-conf-test] mutation-nix: setting MUTATION_MANIFEST_DIR=/nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest [opt-env-conf-test] Preprocessing library for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Building library for opt-env-conf-test-0.0.0.4... [genvalidity-sydtest] [ 2 of 34] Compiling Test.Syd.Validity.Functions.Idempotence ( src/Test/Syd/Validity/Functions/Idempotence.hs, dist/build/Test/Syd/Validity/Functions/Idempotence.p_o ) [genvalidity-sydtest] [ 3 of 34] Compiling Test.Syd.Validity.Operations.Associativity ( src/Test/Syd/Validity/Operations/Associativity.hs, dist/build/Test/Syd/Validity/Operations/Associativity.p_o ) [genvalidity-sydtest] [ 4 of 34] Compiling Test.Syd.Validity.Operations.Commutativity ( src/Test/Syd/Validity/Operations/Commutativity.hs, dist/build/Test/Syd/Validity/Operations/Commutativity.p_o ) [genvalidity-sydtest] [ 5 of 34] Compiling Test.Syd.Validity.Operations.Identity ( src/Test/Syd/Validity/Operations/Identity.hs, dist/build/Test/Syd/Validity/Operations/Identity.p_o ) [genvalidity-sydtest] [ 6 of 34] Compiling Test.Syd.Validity.Operations ( src/Test/Syd/Validity/Operations.hs, dist/build/Test/Syd/Validity/Operations.p_o ) [opt-env-conf-test] [1 of 4] Compiling OptEnvConf.Args.Gen ( src/OptEnvConf/Args/Gen.hs, dist/build/OptEnvConf/Args/Gen.o, dist/build/OptEnvConf/Args/Gen.dyn_o ) [genvalidity-sydtest] [ 7 of 34] Compiling Test.Syd.Validity.Property.Utils ( src/Test/Syd/Validity/Property/Utils.hs, dist/build/Test/Syd/Validity/Property/Utils.p_o ) [genvalidity-sydtest] [ 8 of 34] Compiling Test.Syd.Validity.GenValidity.Property ( src/Test/Syd/Validity/GenValidity/Property.hs, dist/build/Test/Syd/Validity/GenValidity/Property.p_o ) [genvalidity-sydtest] [ 9 of 34] Compiling Test.Syd.Validity.Functions.Validity ( src/Test/Syd/Validity/Functions/Validity.hs, dist/build/Test/Syd/Validity/Functions/Validity.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Args.Gen [opt-env-conf-test] added 0 mutations [genvalidity-sydtest] [10 of 34] Compiling Test.Syd.Validity.Relations.Antireflexivity ( src/Test/Syd/Validity/Relations/Antireflexivity.hs, dist/build/Test/Syd/Validity/Relations/Antireflexivity.p_o ) [genvalidity-sydtest] [11 of 34] Compiling Test.Syd.Validity.Relations.Antisymmetry ( src/Test/Syd/Validity/Relations/Antisymmetry.hs, dist/build/Test/Syd/Validity/Relations/Antisymmetry.p_o ) [genvalidity-sydtest] [12 of 34] Compiling Test.Syd.Validity.Relations.Reflexivity ( src/Test/Syd/Validity/Relations/Reflexivity.hs, dist/build/Test/Syd/Validity/Relations/Reflexivity.p_o ) [genvalidity-sydtest] [13 of 34] Compiling Test.Syd.Validity.Relations.Symmetry ( src/Test/Syd/Validity/Relations/Symmetry.hs, dist/build/Test/Syd/Validity/Relations/Symmetry.p_o ) [genvalidity-sydtest] [14 of 34] Compiling Test.Syd.Validity.Relations.Transitivity ( src/Test/Syd/Validity/Relations/Transitivity.hs, dist/build/Test/Syd/Validity/Relations/Transitivity.p_o ) [genvalidity-sydtest] [15 of 34] Compiling Test.Syd.Validity.Relations ( src/Test/Syd/Validity/Relations.hs, dist/build/Test/Syd/Validity/Relations.p_o ) [genvalidity-sydtest] [16 of 34] Compiling Test.Syd.Validity.Shrinking.Property ( src/Test/Syd/Validity/Shrinking/Property.hs, dist/build/Test/Syd/Validity/Shrinking/Property.p_o ) [genvalidity-sydtest] [17 of 34] Compiling Test.Syd.Validity.Types ( src/Test/Syd/Validity/Types.hs, dist/build/Test/Syd/Validity/Types.p_o ) [genvalidity-sydtest] [18 of 34] Compiling Test.Syd.Validity.Functions.Inverse ( src/Test/Syd/Validity/Functions/Inverse.hs, dist/build/Test/Syd/Validity/Functions/Inverse.p_o ) [genvalidity-sydtest] [19 of 34] Compiling Test.Syd.Validity.Functions.Equivalence ( src/Test/Syd/Validity/Functions/Equivalence.hs, dist/build/Test/Syd/Validity/Functions/Equivalence.p_o ) [genvalidity-sydtest] [20 of 34] Compiling Test.Syd.Validity.Functions.CanFail ( src/Test/Syd/Validity/Functions/CanFail.hs, dist/build/Test/Syd/Validity/Functions/CanFail.p_o ) [genvalidity-sydtest] [21 of 34] Compiling Test.Syd.Validity.Functions ( src/Test/Syd/Validity/Functions.hs, dist/build/Test/Syd/Validity/Functions.p_o ) [genvalidity-sydtest] [22 of 34] Compiling Test.Syd.Validity.Property ( src/Test/Syd/Validity/Property.hs, dist/build/Test/Syd/Validity/Property.p_o ) [genvalidity-sydtest] [23 of 34] Compiling Test.Syd.Validity.Utils ( src/Test/Syd/Validity/Utils.hs, dist/build/Test/Syd/Validity/Utils.p_o ) [genvalidity-sydtest] [24 of 34] Compiling Test.Syd.Validity.Shrinking ( src/Test/Syd/Validity/Shrinking.hs, dist/build/Test/Syd/Validity/Shrinking.p_o ) [genvalidity-sydtest] [25 of 34] Compiling Test.Syd.Validity.Show ( src/Test/Syd/Validity/Show.hs, dist/build/Test/Syd/Validity/Show.p_o ) [genvalidity-sydtest] [26 of 34] Compiling Test.Syd.Validity.Ord ( src/Test/Syd/Validity/Ord.hs, dist/build/Test/Syd/Validity/Ord.p_o ) [genvalidity-sydtest] [27 of 34] Compiling Test.Syd.Validity.Monoid ( src/Test/Syd/Validity/Monoid.hs, dist/build/Test/Syd/Validity/Monoid.p_o ) [genvalidity-sydtest] [28 of 34] Compiling Test.Syd.Validity.Monad ( src/Test/Syd/Validity/Monad.hs, dist/build/Test/Syd/Validity/Monad.p_o ) [genvalidity-sydtest] [29 of 34] Compiling Test.Syd.Validity.GenValidity ( src/Test/Syd/Validity/GenValidity.hs, dist/build/Test/Syd/Validity/GenValidity.p_o ) [genvalidity-sydtest] [30 of 34] Compiling Test.Syd.Validity.Functor ( src/Test/Syd/Validity/Functor.hs, dist/build/Test/Syd/Validity/Functor.p_o ) [genvalidity-sydtest] [31 of 34] Compiling Test.Syd.Validity.Eq ( src/Test/Syd/Validity/Eq.hs, dist/build/Test/Syd/Validity/Eq.p_o ) [genvalidity-sydtest] [32 of 34] Compiling Test.Syd.Validity.Arbitrary ( src/Test/Syd/Validity/Arbitrary.hs, dist/build/Test/Syd/Validity/Arbitrary.p_o ) [genvalidity-sydtest] [33 of 34] Compiling Test.Syd.Validity.Applicative ( src/Test/Syd/Validity/Applicative.hs, dist/build/Test/Syd/Validity/Applicative.p_o ) [genvalidity-sydtest] [34 of 34] Compiling Test.Syd.Validity ( src/Test/Syd/Validity.hs, dist/build/Test/Syd/Validity.p_o ) [opt-env-conf-test] [2 of 4] Compiling OptEnvConf.EnvMap.Gen ( src/OptEnvConf/EnvMap/Gen.hs, dist/build/OptEnvConf/EnvMap/Gen.o, dist/build/OptEnvConf/EnvMap/Gen.dyn_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.EnvMap.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [3 of 4] Compiling OptEnvConf.Test ( src/OptEnvConf/Test.hs, dist/build/OptEnvConf/Test.o, dist/build/OptEnvConf/Test.dyn_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Test [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation MaybeOp at src/OptEnvConf/Test.hs:88:54-62 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added 53 mutations [opt-env-conf-test] [4 of 4] Compiling Paths_opt_env_conf_test ( dist/build/autogen/Paths_opt_env_conf_test.hs, dist/build/Paths_opt_env_conf_test.o, dist/build/Paths_opt_env_conf_test.dyn_o ) [opt-env-conf-test] [1 of 4] Compiling OptEnvConf.Args.Gen ( src/OptEnvConf/Args/Gen.hs, dist/build/OptEnvConf/Args/Gen.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Args.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [2 of 4] Compiling OptEnvConf.EnvMap.Gen ( src/OptEnvConf/EnvMap/Gen.hs, dist/build/OptEnvConf/EnvMap/Gen.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.EnvMap.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [3 of 4] Compiling OptEnvConf.Test ( src/OptEnvConf/Test.hs, dist/build/OptEnvConf/Test.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Test [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation MaybeOp at src/OptEnvConf/Test.hs:88:54-62 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added 53 mutations [genvalidity-sydtest] Preprocessing test suite 'genvalidity-sydtest-test' for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] Building test suite 'genvalidity-sydtest-test' for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] [ 1 of 15] Compiling Paths_genvalidity_sydtest ( dist/build/genvalidity-sydtest-test/autogen/Paths_genvalidity_sydtest.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Paths_genvalidity_sydtest.o ) [genvalidity-sydtest] [ 2 of 15] Compiling Test.Syd.Validity.ApplicativeSpec ( test/Test/Syd/Validity/ApplicativeSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/ApplicativeSpec.o ) [opt-env-conf-test] [4 of 4] Compiling Paths_opt_env_conf_test ( dist/build/autogen/Paths_opt_env_conf_test.hs, dist/build/Paths_opt_env_conf_test.p_o ) [genvalidity-sydtest] [ 3 of 15] Compiling Test.Syd.Validity.ArbitrarySpec ( test/Test/Syd/Validity/ArbitrarySpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/ArbitrarySpec.o ) [genvalidity-sydtest] [ 4 of 15] Compiling Test.Syd.Validity.EqSpec ( test/Test/Syd/Validity/EqSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/EqSpec.o ) [genvalidity-sydtest] [ 5 of 15] Compiling Test.Syd.Validity.FunctorSpec ( test/Test/Syd/Validity/FunctorSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/FunctorSpec.o ) [genvalidity-sydtest] [ 6 of 15] Compiling Test.Syd.Validity.GenRelativeValiditySpec ( test/Test/Syd/Validity/GenRelativeValiditySpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/GenRelativeValiditySpec.o ) [genvalidity-sydtest] [ 7 of 15] Compiling Test.Syd.Validity.GenValiditySpec ( test/Test/Syd/Validity/GenValiditySpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/GenValiditySpec.o ) [genvalidity-sydtest] [ 8 of 15] Compiling Test.Syd.Validity.MonadSpec ( test/Test/Syd/Validity/MonadSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/MonadSpec.o ) [genvalidity-sydtest] [ 9 of 15] Compiling Test.Syd.Validity.MonoidSpec ( test/Test/Syd/Validity/MonoidSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/MonoidSpec.o ) [genvalidity-sydtest] [10 of 15] Compiling Test.Syd.Validity.Operations.CommutativitySpec ( test/Test/Syd/Validity/Operations/CommutativitySpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/Operations/CommutativitySpec.o ) [genvalidity-sydtest] [11 of 15] Compiling Test.Syd.Validity.OrdSpec ( test/Test/Syd/Validity/OrdSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/OrdSpec.o ) [genvalidity-sydtest] [12 of 15] Compiling Test.Syd.Validity.RelativeValiditySpec ( test/Test/Syd/Validity/RelativeValiditySpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/RelativeValiditySpec.o ) [genvalidity-sydtest] [13 of 15] Compiling Test.Syd.Validity.ShowSpec ( test/Test/Syd/Validity/ShowSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/ShowSpec.o ) [genvalidity-sydtest] [14 of 15] Compiling Test.Syd.Validity.ShrinkingSpec ( test/Test/Syd/Validity/ShrinkingSpec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Test/Syd/Validity/ShrinkingSpec.o ) [genvalidity-sydtest] [15 of 15] Compiling Main ( test/Spec.hs, dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test-tmp/Main.o ) [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Args/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/EnvMap/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Test.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/Paths_opt_env_conf_test.dyn_o' [genvalidity-sydtest] [16 of 16] Linking dist/build/genvalidity-sydtest-test/genvalidity-sydtest-test [opt-env-conf-test] mutation-nix: manifest output at /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest: [opt-env-conf-test] total 84 [opt-env-conf-test] drwxr-xr-x 2 nixbld nixbld 4096 May 15 07:55 . [opt-env-conf-test] drwxrwxr-t 311 nobody nixbld 32768 May 15 07:55 .. [opt-env-conf-test] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:55 OptEnvConf.Args.Gen.json [opt-env-conf-test] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:55 OptEnvConf.EnvMap.Gen.json [opt-env-conf-test] -rw-r--r-- 1 nixbld nixbld 33663 May 15 07:55 OptEnvConf.Test.json [opt-env-conf-test] mutation-nix: building remaining components with plugin silenced [opt-env-conf-test] Preprocessing library for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Building library for opt-env-conf-test-0.0.0.4... [genvalidity-sydtest] Phase: checkPhase [genvalidity-sydtest] Running 1 test suites... [genvalidity-sydtest] Test suite genvalidity-sydtest-test: RUNNING... [genvalidity-sydtest] Tests: [genvalidity-sydtest]  [genvalidity-sydtest] Test.Syd.Validity.MonoidSpec [genvalidity-sydtest]  Monoid [Int] [genvalidity-sydtest]  mappend :: [Int] -> [Int] -> [Int] [genvalidity-sydtest]  ✓ is an associative operation for "valid :: ([Int],[Int],[Int])"  20.04 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mempty :: [Int] [genvalidity-sydtest]  ✓ is the identity for mappend :: [Int] -> [Int] -> [Int] for "valid :: [Int]"  10.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mconcat :: [[Int]] -> [Int] [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "valid :: [[Int]]"  37.96 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monoid [Int] [genvalidity-sydtest]  mconcat :: [[Int]] -> [Int] [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "arbitrary :: [[Int]]"  22.56 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mempty :: [Int] [genvalidity-sydtest]  ✓ is the identity for mappend :: [Int] -> [Int] -> [Int] for "arbitrary :: [Int]"  24.42 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mappend :: [Int] -> [Int] -> [Int] [genvalidity-sydtest]  ✓ is an associative operation for "arbitrary :: ([Int],[Int],[Int])"  24.38 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monoid ([Ratio Integer]) [genvalidity-sydtest]  mappend :: ([Ratio Integer]) -> ([Ratio Integer]) -> ([Ratio Integer]) [genvalidity-sydtest]  ✓ is an associative operation for "valid :: (([Ratio Integer],[Ratio Integer],[Ratio Integer]))"  65.03 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mempty :: ([Ratio Integer]) [genvalidity-sydtest]  ✓ is the identity for mappend :: ([Ratio Integer]) -> ([Ratio Integer]) -> ([Ratio Integer]) for "valid :: ([Ratio Integer])"  53.83 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mconcat :: [([Ratio Integer])] -> ([Ratio Integer]) [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "valid :: ([[Ratio Integer]])"  52.18 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monoid [Char] [genvalidity-sydtest]  mappend :: [Char] -> [Char] -> [Char] [genvalidity-sydtest]  ✓ is an associative operation for "singleton list of 'a' :: ([Char],[Char],[Char])"  0.61 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mempty :: [Char] [genvalidity-sydtest]  ✓ is the identity for mappend :: [Char] -> [Char] -> [Char] for "singleton list of 'a' :: [Char]"  1.15 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  mconcat :: [[Char]] -> [Char] [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "singleton list of 'a' :: [[Char]]"  16.05 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.OrdSpec [genvalidity-sydtest]  Ord (Ratio Integer) [genvalidity-sydtest]  "max :: (Ratio Integer -> Ratio Integer -> Ratio Integer)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a >= b then a else b) for "valid (Ratio Integer)"'s  22.40 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>=) :: (Ratio Integer) -> (Ratio Integer) -> Bool [genvalidity-sydtest]  ✓ is transitive for "valid (Ratio Integer)"'s  10.54 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antisymmetric for "valid (Ratio Integer)"'s  23.88 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "valid (Ratio Integer)"'s  9.93 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= LT) for "valid (Ratio Integer)"'s  21.64 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "min :: (Ratio Integer -> Ratio Integer -> Ratio Integer)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a <= b then a else b) for "valid (Ratio Integer)"'s  23.05 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<=) :: (Ratio Integer) -> (Ratio Integer) -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= GT) for "valid (Ratio Integer)"'s  7.69 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "valid (Ratio Integer)"'s  13.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid (Ratio Integer)"'s  34.77 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antisymmetric for "valid (Ratio Integer)"'s  4.18 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>) :: (Ratio Integer) -> (Ratio Integer) -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == GT) for "valid (Ratio Integer)"'s  34.79 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid (Ratio Integer)"'s  23.41 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antireflexive for "valid (Ratio Integer)"'s  15.42 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<) :: (Ratio Integer) -> (Ratio Integer) -> Bool [genvalidity-sydtest]  ✓ is antireflexive for "valid (Ratio Integer)"'s  3.67 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == LT) for "valid (Ratio Integer)"'s  13.03 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid (Ratio Integer)"'s  19.65 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Ord Int [genvalidity-sydtest]  (<=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= GT) for "arbitrary Int"'s  2.46 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "arbitrary Int"'s  0.95 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "arbitrary Int"'s  1.17 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antisymmetric for "arbitrary Int"'s  0.33 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "min :: (Int -> Int -> Int)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a <= b then a else b) for "arbitrary Int"'s  0.93 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antireflexive for "arbitrary Int"'s  0.85 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "arbitrary Int"'s  1.16 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == GT) for "arbitrary Int"'s  11.50 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "max :: (Int -> Int -> Int)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a >= b then a else b) for "arbitrary Int"'s  0.33 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is transitive for "arbitrary Int"'s  0.17 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == LT) for "arbitrary Int"'s  8.90 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antireflexive for "arbitrary Int"'s  0.18 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is transitive for "arbitrary Int"'s  8.43 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= LT) for "arbitrary Int"'s  9.56 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "arbitrary Int"'s  0.17 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antisymmetric for "arbitrary Int"'s  4.91 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Ord Int [genvalidity-sydtest]  (>=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antisymmetric for "valid Int"'s  18.32 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= LT) for "valid Int"'s  12.06 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid Int"'s  7.04 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "valid Int"'s  6.46 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "max :: (Int -> Int -> Int)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a >= b then a else b) for "valid Int"'s  5.96 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "min :: (Int -> Int -> Int)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a <= b then a else b) for "valid Int"'s  12.21 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antireflexive for "valid Int"'s  20.11 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == GT) for "valid Int"'s  19.38 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid Int"'s  19.29 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antireflexive for "valid Int"'s  19.08 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid Int"'s  18.22 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == LT) for "valid Int"'s  20.00 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antisymmetric for "valid Int"'s  19.72 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= GT) for "valid Int"'s  19.92 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid Int"'s  19.81 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "valid Int"'s  20.63 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Ord Int [genvalidity-sydtest]  (>=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is transitive for "even Int"'s  21.14 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= LT) for "even Int"'s  21.61 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antisymmetric for "even Int"'s  22.63 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "even Int"'s  21.26 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == LT) for "even Int"'s  21.03 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antireflexive for "even Int"'s  21.88 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "even Int"'s  21.89 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is transitive for "even Int"'s  23.86 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b == GT) for "even Int"'s  22.72 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antireflexive for "even Int"'s  19.25 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "max :: (Int -> Int -> Int)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a >= b then a else b) for "even Int"'s  21.40 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  "min :: (Int -> Int -> Int)" [genvalidity-sydtest]  ✓ is equivalent to (\a b -> if a <= b then a else b) for "even Int"'s  17.98 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is transitive for "even Int"'s  15.94 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "even Int"'s  15.84 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> compare a b /= GT) for "even Int"'s  15.87 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antisymmetric for "even Int"'s  15.20 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.MonadSpec [genvalidity-sydtest]  Monad [] [genvalidity-sydtest]  relation with Applicative [] [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "[] of ints :: [Int]"  15.20 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "[] of ints :: [Int]" and "[] of ints :: [Int]"  50.89 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "[] of additions :: ([Int -> Int])" and "[] of ints :: [Int]"  16.13 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Functor [] [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "increments :: (Int -> Int)" and "[] of ints :: [Int]"  16.10 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>>=) :: [] a -> (b -> [] a) -> [] b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "[] of ints :: [Int]" "perturbations using the int :: (Int -> [Int])" and "perturbations using the double the int :: (Int -> [Int])"  731.62 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  return :: a -> [] a and (>>=) :: [] a -> (b -> [] a) -> [] b [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "int :: Int" and "perturbations using the int :: (Int -> [Int])"  14.06 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "[] of ints :: [Int]"  14.01 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monad Maybe [genvalidity-sydtest]  (>>=) :: Maybe a -> (b -> Maybe a) -> Maybe b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "Maybe of ints :: (Maybe Int)" "perturbations using the int :: (Int -> Maybe Int)" and "perturbations using the double the int :: (Int -> Maybe Int)"  13.45 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  return :: a -> Maybe a and (>>=) :: Maybe a -> (b -> Maybe a) -> Maybe b [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "Maybe of ints :: (Maybe Int)"  13.05 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "int :: Int" and "perturbations using the int :: (Int -> Maybe Int)"  13.47 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Functor Maybe [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "increments :: (Int -> Int)" and "Maybe of ints :: (Maybe Int)"  12.52 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Applicative Maybe [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "Maybe of additions :: (Maybe (Int -> Int))" and "Maybe of ints :: (Maybe Int)"  11.47 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "Maybe of ints :: (Maybe Int)"  10.99 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "Maybe of ints :: (Maybe Int)" and "Maybe of ints :: (Maybe Int)"  12.90 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monad Maybe [genvalidity-sydtest]  (>>=) :: Maybe a -> (b -> Maybe a) -> Maybe b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "Maybe of ints :: (Maybe Int)" "perturbations using the int :: (Int -> Maybe Int)" and "perturbations using the double the int :: (Int -> Maybe Int)"  10.51 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Applicative Maybe [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "Maybe of ints :: (Maybe Int)"  10.46 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "Maybe of ints :: (Maybe Int)" and "Maybe of ints :: (Maybe Int)"  8.91 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "Maybe of additions :: (Maybe (Int -> Int))" and "Maybe of ints :: (Maybe Int)"  8.53 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  return :: a -> Maybe a and (>>=) :: Maybe a -> (b -> Maybe a) -> Maybe b [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "Maybe of ints :: (Maybe Int)"  10.01 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "int :: Int" and "perturbations using the int :: (Int -> Maybe Int)"  12.26 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Functor Maybe [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "increments :: (Int -> Int)" and "Maybe of ints :: (Maybe Int)"  12.82 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monad (Either Int) [genvalidity-sydtest]  return :: a -> (Either Int) a and (>>=) :: (Either Int) a -> (b -> (Either Int) a) -> (Either Int) b [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "(Either Int) of ints :: (Either Int Int)"  10.15 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "int :: Int" and "perturbations using the int :: (Int -> Either Int Int)"  4.45 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Applicative (Either Int) [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "(Either Int) of additions :: (Either Int (Int -> Int))" and "(Either Int) of ints :: (Either Int Int)"  8.57 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "(Either Int) of ints :: (Either Int Int)"  10.58 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "(Either Int) of ints :: (Either Int Int)" and "(Either Int) of ints :: (Either Int Int)"  8.54 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>>=) :: (Either Int) a -> (b -> (Either Int) a) -> (Either Int) b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "(Either Int) of ints :: (Either Int Int)" "perturbations using the int :: (Int -> Either Int Int)" and "perturbations using the double the int :: (Int -> Either Int Int)"  9.31 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Functor (Either Int) [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "increments :: (Int -> Int)" and "(Either Int) of ints :: (Either Int Int)"  9.34 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monad Maybe [genvalidity-sydtest]  relation with Functor Maybe [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "appends :: ([Char] -> [Char])" and "Just an ABC :: (Maybe [Char])"  10.76 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Applicative Maybe [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "Just an ABC :: (Maybe [Char])"  9.46 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "Just an ABC :: (Maybe [Char])" and "Just an ABC :: (Maybe [Char])"  10.57 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "append 'a' in Just :: (Maybe ([Char] -> [Char]))" and "Just an ABC :: (Maybe [Char])"  10.20 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>>=) :: Maybe a -> (b -> Maybe a) -> Maybe b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "Just an ABC :: (Maybe [Char])" "justisation :: ([Char] -> Maybe [Char])" and "justisation :: ([Char] -> Maybe [Char])"  10.16 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  return :: a -> Maybe a and (>>=) :: Maybe a -> (b -> Maybe a) -> Maybe b [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "Just an ABC :: (Maybe [Char])"  10.16 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "ABC :: [Char]" and "justisation :: ([Char] -> Maybe [Char])"  10.16 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monad [] [genvalidity-sydtest]  (>>=) :: [] a -> (b -> [] a) -> [] b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "list of fives :: [Int]" "singletonisation :: (Int -> [Int])" and "singletonisation :: (Int -> [Int])"  9.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  return :: a -> [] a and (>>=) :: [] a -> (b -> [] a) -> [] b [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "list of fives :: [Int]"  29.24 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "four :: Int" and "singletonisation :: (Int -> [Int])"  9.76 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Applicative [] [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "list of fives :: [Int]"  22.94 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "list of fives :: [Int]" and "list of sixes :: [Int]"  39.42 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "increment in list :: ([Int -> Int])" and "list of fives :: [Int]"  33.13 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Functor [] [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "factorisations :: (Int -> Int)" and "list of fives :: [Int]"  31.16 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Monad [] [genvalidity-sydtest]  relation with Functor [] [genvalidity-sydtest]  ✓ satisfies 'fmap f xs = xs >>= return . f' for "increments :: (Int -> Int)" and "[] of ints :: [Int]"  38.02 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (>>=) :: [] a -> (b -> [] a) -> [] b [genvalidity-sydtest]  ✓ satisfies the third Monad law: 'm >>= (x -> k x >>= h) = (m >>= k) >>= h' for "[] of ints :: [Int]" "perturbations using the int :: (Int -> [Int])" and "perturbations using the double the int :: (Int -> [Int])"  560.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  relation with Applicative [] [genvalidity-sydtest]  ✓ satisfies '(>>) = (*>)' for "[] of ints :: [Int]" and "[] of ints :: [Int]"  45.01 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies 'pure = return' for "[] of ints :: [Int]"  25.85 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies '(<*>) = ap' for "[] of additions :: ([Int -> Int])" and "[] of ints :: [Int]"  28.15 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  return :: a -> [] a and (>>=) :: [] a -> (b -> [] a) -> [] b [genvalidity-sydtest]  ✓ satisfy the first Monad law: 'return a >>= k = k a' for "int :: Int" and "perturbations using the int :: (Int -> [Int])"  27.76 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the second Monad law: 'm >>= return = m' for "[] of ints :: [Int]"  24.41 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.EqSpec [genvalidity-sydtest]  Eq (Ratio Integer) [genvalidity-sydtest]  (==) :: (Ratio Integer) -> (Ratio Integer) -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a /= b) for "valid (Ratio Integer)"s  26.32 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid (Ratio Integer)"s  26.40 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "valid (Ratio Integer)"s  31.64 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is symmetric for "valid (Ratio Integer)"s  32.61 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (/=) :: (Ratio Integer) -> (Ratio Integer) -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a == b) for "valid (Ratio Integer)"s  33.31 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antireflexive for "valid (Ratio Integer)"s  31.33 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Eq Int [genvalidity-sydtest]  (==) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a /= b) for "valid Int"s  30.05 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "valid Int"s  30.47 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "valid Int"s  30.54 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is symmetric for "valid Int"s  30.56 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (/=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a == b) for "valid Int"s  31.89 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is antireflexive for "valid Int"s  30.59 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Eq Int [genvalidity-sydtest]  (==) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is transitive for "arbitrary Int"s  30.62 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is symmetric for "arbitrary Int"s  30.70 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "arbitrary Int"s  18.59 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a /= b) for "arbitrary Int"s  15.76 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (/=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antireflexive for "arbitrary Int"s  14.99 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a == b) for "arbitrary Int"s  14.96 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Eq Int [genvalidity-sydtest]  (/=) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is antireflexive for "even Int"s  14.96 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a == b) for "even Int"s  16.20 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (==) :: Int -> Int -> Bool [genvalidity-sydtest]  ✓ is equivalent to (\a b -> not $ a /= b) for "even Int"s  13.18 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is symmetric for "even Int"s  13.07 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is reflexive for "even Int"s  16.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ is transitive for "even Int"s  16.88 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.ArbitrarySpec [genvalidity-sydtest]  Arbitrary Int [genvalidity-sydtest]  arbitrary :: Gen Int [genvalidity-sydtest]  ✓ only generates valid values  22.81 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.Operations.CommutativitySpec [genvalidity-sydtest]  commutative [genvalidity-sydtest]  ✓ cross product is not commutative  36.70 ms [genvalidity-sydtest]  passed for all of 1 inputs. [genvalidity-sydtest]  ✓ + is commutative  12.48 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ * is commutative  11.94 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ - is not commutative  200.46 ms [genvalidity-sydtest]  passed for all of 1 inputs. [genvalidity-sydtest]  ✓ dot product is commutative  12.28 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.GenValiditySpec [genvalidity-sydtest]  GenValid (Ratio Integer) [genvalidity-sydtest]  genValid :: Gen (Ratio Integer) [genvalidity-sydtest]  ✓ only generates valid '(Ratio Integer)'s  29.71 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  GenValid (Ratio Integer) [genvalidity-sydtest]  genValid :: Gen (Ratio Integer) [genvalidity-sydtest]  ✓ only generates valid '(Ratio Integer)'s  36.96 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.ShrinkingSpec [genvalidity-sydtest]  shrinkValid :: (Int -> [Int]) [genvalidity-sydtest]  ✓ preserves validity  31.56 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ never shrinks to itself for valid values  30.57 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  shrinkValidPreservesValidOnGenValid [genvalidity-sydtest]  ✓ [Ordering]  121.89 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ Ordering  15.71 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  shrinkValid :: (Ratio Int8 -> [Ratio Int8]) [genvalidity-sydtest]  ✓ never shrinks to itself for valid values  38.02 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ preserves validity  65.53 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  shrinkValidDoesNotShrinkToItself [genvalidity-sydtest]  ✓ [Int]  425.23 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ Int  29.31 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  shrinkValidDoesNotShrinkToItself [genvalidity-sydtest]  ✓ [Ordering]  74.15 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ Ordering  24.47 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  shrinkValidPreservesValidOnGenValid [genvalidity-sydtest]  ✓ Ordering  25.00 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ [Ordering]  104.94 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.FunctorSpec [genvalidity-sydtest]  Functor Maybe [genvalidity-sydtest]  fmap :: (a -> b) -> Maybe a -> Maybe b [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "Just an ABC :: (Maybe [Char])" 's given to "prepends :: ([Char] -> [Char])" and "appends :: ([Char] -> [Char])"  31.82 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "Just an ABC :: (Maybe [Char])"  24.97 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<$) :: a -> Maybe b -> Maybe a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "ABC :: [Char]" and "Just an ABC :: (Maybe [Char])"  28.70 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor [] [genvalidity-sydtest]  fmap :: (a -> b) -> [] a -> [] b [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "list of fives :: [Int]"  28.68 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "list of fives :: [Int]" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  59.73 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<$) :: a -> [] b -> [] a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "four :: Int" and "list of fives :: [Int]"  56.62 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor [] [genvalidity-sydtest]  (<$) :: a -> [] b -> [] a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "int :: Int" and "[] of ints :: [Int]"  54.64 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  fmap :: (a -> b) -> [] a -> [] b [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "[] of ints :: [Int]" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  55.07 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "[] of ints :: [Int]"  54.21 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor (Either Int) [genvalidity-sydtest]  fmap :: (a -> b) -> (Either Int) a -> (Either Int) b [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "(Either Int) of ints :: (Either Int Int)"  22.33 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "(Either Int) of ints :: (Either Int Int)" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  49.49 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<$) :: a -> (Either Int) b -> (Either Int) a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "int :: Int" and "(Either Int) of ints :: (Either Int Int)"  40.30 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor [] [genvalidity-sydtest]  (<$) :: a -> [] b -> [] a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "int :: Int" and "[] of ints :: [Int]"  45.87 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  fmap :: (a -> b) -> [] a -> [] b [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "[] of ints :: [Int]"  45.01 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "[] of ints :: [Int]" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  48.50 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor Maybe [genvalidity-sydtest]  (<$) :: a -> Maybe b -> Maybe a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "int :: Int" and "Maybe of ints :: (Maybe Int)"  40.57 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  fmap :: (a -> b) -> Maybe a -> Maybe b [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "Maybe of ints :: (Maybe Int)" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  43.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "Maybe of ints :: (Maybe Int)"  41.27 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor ((,) Int) [genvalidity-sydtest]  fmap :: (a -> b) -> ((,) Int) a -> ((,) Int) b [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "((,) Int) of ints :: (Int,Int)" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  44.27 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "((,) Int) of ints :: (Int,Int)"  43.51 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<$) :: a -> ((,) Int) b -> ((,) Int) a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "int :: Int" and "((,) Int) of ints :: (Int,Int)"  64.61 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Functor Maybe [genvalidity-sydtest]  (<$) :: a -> Maybe b -> Maybe a [genvalidity-sydtest]  ✓ is equivalent to its default implementation for "int :: Int" and "Maybe of ints :: (Maybe Int)"  63.48 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  fmap :: (a -> b) -> Maybe a -> Maybe b [genvalidity-sydtest]  ✓ satisfieds the second Functor law: 'fmap (f . g) == fmap f . fmap g' for "Maybe of ints :: (Maybe Int)" 's given to "increments :: (Int -> Int)" and "scalings :: (Int -> Int)"  63.52 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfies the first Fuctor law: 'fmap id == id' for "Maybe of ints :: (Maybe Int)"  63.63 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.ShowSpec [genvalidity-sydtest]  Show (Ratio Integer) and Read (Ratio Integer) [genvalidity-sydtest]  ✓ are implemented such that read . show == id for arbitrary values  73.81 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Show Int and Read Int [genvalidity-sydtest]  ✓ are implemented such that read . show == id for valid values  56.14 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Show (Ratio Integer) and Read (Ratio Integer) [genvalidity-sydtest]  ✓ are implemented such that read . show == id for valid values  56.36 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Show Int and Read Int [genvalidity-sydtest]  ✓ are implemented such that read . show == id for even values  45.31 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest] Test.Syd.Validity.ApplicativeSpec [genvalidity-sydtest]  Applicative [] [genvalidity-sydtest]  (*>) :: [] a -> [] b -> [] b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "[] of ints :: [Int]" in front of "[] of ints :: Int"  69.66 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  pure :: a -> [] a and (<*>) :: [] (a -> b) -> [] a -> [] b [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "[] of increments :: ([Int -> Int])" sequenced with "int :: Int"  43.93 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "increments :: (Int -> Int)" mapped over "[] of ints :: [Int]"  48.39 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "[] of ints :: [Int]"  53.29 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "[] of scalings :: ([Int -> Int])" composed with "[] of increments :: ([Int -> Int])" and applied to "[] of ints :: [Int]"  53.46 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "increments :: (Int -> Int)" sequenced with "int :: Int"  47.48 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<*) :: [] a -> [] b -> [] a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "[] of ints :: Int" behind "[] of ints :: [Int]"  93.26 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Applicative (Either Int) [genvalidity-sydtest]  (*>) :: (Either Int) a -> (Either Int) b -> (Either Int) b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "(Either Int) of ints :: (Either Int Int)" in front of "(Either Int) of ints :: Int"  46.72 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<*) :: (Either Int) a -> (Either Int) b -> (Either Int) a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "(Either Int) of ints :: Int" behind "(Either Int) of ints :: (Either Int Int)"  46.93 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  pure :: a -> (Either Int) a and (<*>) :: (Either Int) (a -> b) -> (Either Int) a -> (Either Int) b [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "(Either Int) of ints :: (Either Int Int)"  44.91 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "increments :: (Int -> Int)" mapped over "(Either Int) of ints :: (Either Int Int)"  45.30 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "(Either Int) of scalings :: (Either Int (Int -> Int))" composed with "(Either Int) of increments :: (Either Int (Int -> Int))" and applied to "(Either Int) of ints :: (Either Int Int)"  44.51 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "increments :: (Int -> Int)" sequenced with "int :: Int"  44.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "(Either Int) of increments :: (Either Int (Int -> Int))" sequenced with "int :: Int"  44.45 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Applicative Maybe [genvalidity-sydtest]  pure :: a -> Maybe a and (<*>) :: Maybe (a -> b) -> Maybe a -> Maybe b [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "increments :: (Int -> Int)" sequenced with "int :: Int"  27.37 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "Maybe of increments :: (Maybe (Int -> Int))" sequenced with "int :: Int"  29.21 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "increments :: (Int -> Int)" mapped over "Maybe of ints :: (Maybe Int)"  27.40 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "Maybe of scalings :: (Maybe (Int -> Int))" composed with "Maybe of increments :: (Maybe (Int -> Int))" and applied to "Maybe of ints :: (Maybe Int)"  27.13 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "Maybe of ints :: (Maybe Int)"  20.67 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<*) :: Maybe a -> Maybe b -> Maybe a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "Maybe of ints :: Int" behind "Maybe of ints :: (Maybe Int)"  27.56 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (*>) :: Maybe a -> Maybe b -> Maybe b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "Maybe of ints :: (Maybe Int)" in front of "Maybe of ints :: Int"  26.46 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Applicative Maybe [genvalidity-sydtest]  (<*) :: Maybe a -> Maybe b -> Maybe a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "purely Nothing :: [Char]" behind "Just an ABC :: (Maybe [Char])"  27.13 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (*>) :: Maybe a -> Maybe b -> Maybe b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "Just an ABC :: (Maybe [Char])" in front of "purely Nothing :: [Char]"  42.28 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  pure :: a -> Maybe a and (<*>) :: Maybe (a -> b) -> Maybe a -> Maybe b [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "Just an ABC :: (Maybe [Char])"  15.96 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "prepends :: ([Char] -> [Char])" mapped over "Just an ABC :: (Maybe [Char])"  17.47 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "prepends :: ([Char] -> [Char])" sequenced with "ABC :: [Char]"  17.94 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "appends in a Just :: (Maybe ([Char] -> [Char]))" composed with "prepends in a Just :: (Maybe ([Char] -> [Char]))" and applied to "Just an ABC :: (Maybe [Char])"  35.29 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "prepends in a Just :: (Maybe ([Char] -> [Char]))" sequenced with "ABC :: [Char]"  36.15 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Applicative [] [genvalidity-sydtest]  (*>) :: [] a -> [] b -> [] b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "[] of ints :: [Int]" in front of "[] of ints :: Int"  83.38 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  pure :: a -> [] a and (<*>) :: [] (a -> b) -> [] a -> [] b [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "increments :: (Int -> Int)" sequenced with "int :: Int"  34.33 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "[] of scalings :: ([Int -> Int])" composed with "[] of increments :: ([Int -> Int])" and applied to "[] of ints :: [Int]"  34.22 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "increments :: (Int -> Int)" mapped over "[] of ints :: [Int]"  33.94 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "[] of ints :: [Int]"  33.86 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "[] of increments :: ([Int -> Int])" sequenced with "int :: Int"  15.80 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<*) :: [] a -> [] b -> [] a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "[] of ints :: Int" behind "[] of ints :: [Int]"  83.49 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Applicative [] [genvalidity-sydtest]  pure :: a -> [] a and (<*>) :: [] (a -> b) -> [] a -> [] b [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "increments :: (Int -> Int)" sequenced with "four :: Int"  34.04 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "increments in a list :: ([Int -> Int])" sequenced with "four :: Int"  29.33 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "scalings in a list :: ([Int -> Int])" composed with "increments in a list :: ([Int -> Int])" and applied to "list of fives :: [Int]"  40.86 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "list of fives :: [Int]"  30.12 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "increments :: (Int -> Int)" mapped over "list of fives :: [Int]"  28.89 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<*) :: [] a -> [] b -> [] a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "purely empty list :: Int" behind "list of fives :: [Int]"  50.43 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (*>) :: [] a -> [] b -> [] b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "list of fives :: [Int]" in front of "purely empty list :: Int"  34.82 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  Applicative Maybe [genvalidity-sydtest]  (*>) :: Maybe a -> Maybe b -> Maybe b [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u Type> v = pure (const id) <*> u <*> v' for "Maybe of ints :: (Maybe Int)" in front of "Maybe of ints :: Int"  33.24 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  (<*) :: Maybe a -> Maybe b -> Maybe a [genvalidity-sydtest]  ✓ is equivalent to its default implementation 'u <* v = pure const <*> u <*> v' for "Maybe of ints :: Int" behind "Maybe of ints :: (Maybe Int)"  33.19 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  pure :: a -> Maybe a and (<*>) :: Maybe (a -> b) -> Maybe a -> Maybe b [genvalidity-sydtest]  ✓ satisfy the composition law: 'pure (.) <*> u <*> v <*> w = u <*> (v <*> w)' for "Maybe of scalings :: (Maybe (Int -> Int))" composed with "Maybe of increments :: (Maybe (Int -> Int))" and applied to "Maybe of ints :: (Maybe Int)"  32.84 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the identity law: 'pure id <*> v = v' for "Maybe of ints :: (Maybe Int)"  32.30 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the law about the functor instance: fmap f x = pure f <*> x for "increments :: (Int -> Int)" mapped over "Maybe of ints :: (Maybe Int)"  32.14 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the homomorphism law: 'pure f <*> pure x = pure (f x)' for "increments :: (Int -> Int)" sequenced with "int :: Int"  39.91 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  ✓ satisfy the interchange law: 'u <*> pure y = pure ($ y) <*> u' for "Maybe of increments :: (Maybe (Int -> Int))" sequenced with "int :: Int"  39.18 ms [genvalidity-sydtest]  passed for all of 100 inputs. [genvalidity-sydtest]  [genvalidity-sydtest]  Examples: 24402 [genvalidity-sydtest]  Passed: 246 [genvalidity-sydtest]  Failed: 0 [genvalidity-sydtest]  Sum of test runtimes: 8.51 seconds [genvalidity-sydtest]  Test suite took:  0.81 seconds [genvalidity-sydtest]  [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Args/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/EnvMap/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Test.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/Paths_opt_env_conf_test.dyn_o' [genvalidity-sydtest] Test suite genvalidity-sydtest-test: PASS [genvalidity-sydtest] Test suite logged to: [genvalidity-sydtest] dist/test/genvalidity-sydtest-1.0.1.0-genvalidity-sydtest-test.log [genvalidity-sydtest] 1 of 1 test suites (1 of 1 test cases) passed. [genvalidity-sydtest] Phase: haddockPhase [genvalidity-sydtest] Preprocessing library for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] Running Haddock on library for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] Warning: The documentation for the following packages are not installed. No [genvalidity-sydtest] links will be generated to these packages: attoparsec-0.14.4, [genvalidity-sydtest] attoparsec-0.14.4, libyaml-clib-0.2.5, opt-env-conf-0.15.0.1, path-0.9.6, [genvalidity-sydtest] path-0.9.6, vector-0.13.2.0 [genvalidity-sydtest] [ 1 of 34] Compiling Paths_genvalidity_sydtest ( dist/build/autogen/Paths_genvalidity_sydtest.hs, nothing ) [genvalidity-sydtest] [ 2 of 34] Compiling Test.Syd.Validity.Functions.Idempotence ( src/Test/Syd/Validity/Functions/Idempotence.hs, nothing ) [genvalidity-sydtest] [ 3 of 34] Compiling Test.Syd.Validity.Operations.Associativity ( src/Test/Syd/Validity/Operations/Associativity.hs, nothing ) [genvalidity-sydtest] [ 4 of 34] Compiling Test.Syd.Validity.Operations.Commutativity ( src/Test/Syd/Validity/Operations/Commutativity.hs, nothing ) [genvalidity-sydtest] [ 5 of 34] Compiling Test.Syd.Validity.Operations.Identity ( src/Test/Syd/Validity/Operations/Identity.hs, nothing ) [genvalidity-sydtest] [ 6 of 34] Compiling Test.Syd.Validity.Operations ( src/Test/Syd/Validity/Operations.hs, nothing ) [genvalidity-sydtest] [ 7 of 34] Compiling Test.Syd.Validity.Property.Utils ( src/Test/Syd/Validity/Property/Utils.hs, nothing ) [genvalidity-sydtest] [ 8 of 34] Compiling Test.Syd.Validity.GenValidity.Property ( src/Test/Syd/Validity/GenValidity/Property.hs, nothing ) [genvalidity-sydtest] [ 9 of 34] Compiling Test.Syd.Validity.Functions.Validity ( src/Test/Syd/Validity/Functions/Validity.hs, nothing ) [genvalidity-sydtest] [10 of 34] Compiling Test.Syd.Validity.Relations.Antireflexivity ( src/Test/Syd/Validity/Relations/Antireflexivity.hs, nothing ) [genvalidity-sydtest] [11 of 34] Compiling Test.Syd.Validity.Relations.Antisymmetry ( src/Test/Syd/Validity/Relations/Antisymmetry.hs, nothing ) [genvalidity-sydtest] [12 of 34] Compiling Test.Syd.Validity.Relations.Reflexivity ( src/Test/Syd/Validity/Relations/Reflexivity.hs, nothing ) [genvalidity-sydtest] [13 of 34] Compiling Test.Syd.Validity.Relations.Symmetry ( src/Test/Syd/Validity/Relations/Symmetry.hs, nothing ) [genvalidity-sydtest] [14 of 34] Compiling Test.Syd.Validity.Relations.Transitivity ( src/Test/Syd/Validity/Relations/Transitivity.hs, nothing ) [genvalidity-sydtest] [15 of 34] Compiling Test.Syd.Validity.Relations ( src/Test/Syd/Validity/Relations.hs, nothing ) [genvalidity-sydtest] [16 of 34] Compiling Test.Syd.Validity.Shrinking.Property ( src/Test/Syd/Validity/Shrinking/Property.hs, nothing ) [opt-env-conf-test] Phase: haddockPhase [genvalidity-sydtest] [17 of 34] Compiling Test.Syd.Validity.Types ( src/Test/Syd/Validity/Types.hs, nothing ) [opt-env-conf-test] Phase: installPhase [genvalidity-sydtest] [18 of 34] Compiling Test.Syd.Validity.Functions.Inverse ( src/Test/Syd/Validity/Functions/Inverse.hs, nothing ) [genvalidity-sydtest] [19 of 34] Compiling Test.Syd.Validity.Functions.Equivalence ( src/Test/Syd/Validity/Functions/Equivalence.hs, nothing ) [genvalidity-sydtest] [20 of 34] Compiling Test.Syd.Validity.Functions.CanFail ( src/Test/Syd/Validity/Functions/CanFail.hs, nothing ) [opt-env-conf-test] Installing library in /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm [genvalidity-sydtest] [21 of 34] Compiling Test.Syd.Validity.Functions ( src/Test/Syd/Validity/Functions.hs, nothing ) [genvalidity-sydtest] [22 of 34] Compiling Test.Syd.Validity.Property ( src/Test/Syd/Validity/Property.hs, nothing ) [genvalidity-sydtest] [23 of 34] Compiling Test.Syd.Validity.Utils ( src/Test/Syd/Validity/Utils.hs, nothing ) [genvalidity-sydtest] [24 of 34] Compiling Test.Syd.Validity.Shrinking ( src/Test/Syd/Validity/Shrinking.hs, nothing ) [genvalidity-sydtest] [25 of 34] Compiling Test.Syd.Validity.Show ( src/Test/Syd/Validity/Show.hs, nothing ) [genvalidity-sydtest] [26 of 34] Compiling Test.Syd.Validity.Ord ( src/Test/Syd/Validity/Ord.hs, nothing ) [genvalidity-sydtest] [27 of 34] Compiling Test.Syd.Validity.Monoid ( src/Test/Syd/Validity/Monoid.hs, nothing ) [opt-env-conf-test] Phase: fixupPhase [genvalidity-sydtest] [28 of 34] Compiling Test.Syd.Validity.Monad ( src/Test/Syd/Validity/Monad.hs, nothing ) [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 [opt-env-conf-test] shrinking /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSopt-env-conf-test-0.0.0.4-3Xab4AE6B8G4Fzm7nyYnJm-ghc9.10.3.so [opt-env-conf-test] checking for references to /build/ in /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4... [opt-env-conf-test] patching script interpreter paths in /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 [opt-env-conf-test] stripping (with command strip and flags -S -p) in /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/lib /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4/bin [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest [opt-env-conf-test] checking for references to /build/ in /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest... [opt-env-conf-test] patching script interpreter paths in /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 [post-build-hook] Pushing 2 paths (268 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest (33.58 KiB) [post-build-hook] Pushing /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 (2.26 MiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest /nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4 [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 2 paths... [post-build-hook] copying path '/nix/store/b7m7ssypy0i3g083p92y7qm34qiyzspz-opt-env-conf-test-0.0.0.4-manifest' to 'https://cache.staging.nix-ci.com'... [post-build-hook] copying path '/nix/store/zpl3s9nkmh8w786f0ikwxm2w3xzz8wv8-opt-env-conf-test-0.0.0.4' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/mj3d04ly3lsq8ka1yf9w457bbmf869hx-opt-env-conf-test-0.0.0.4.drv' to 'https://cache.staging.nix-ci.com'... Progress: 6 of 9 built (1 building) [genvalidity-sydtest] [29 of 34] Compiling Test.Syd.Validity.GenValidity ( src/Test/Syd/Validity/GenValidity.hs, nothing ) [genvalidity-sydtest] [30 of 34] Compiling Test.Syd.Validity.Functor ( src/Test/Syd/Validity/Functor.hs, nothing ) [genvalidity-sydtest] [31 of 34] Compiling Test.Syd.Validity.Eq ( src/Test/Syd/Validity/Eq.hs, nothing ) [genvalidity-sydtest] [32 of 34] Compiling Test.Syd.Validity.Arbitrary ( src/Test/Syd/Validity/Arbitrary.hs, nothing ) [genvalidity-sydtest] [33 of 34] Compiling Test.Syd.Validity.Applicative ( src/Test/Syd/Validity/Applicative.hs, nothing ) [genvalidity-sydtest] [34 of 34] Compiling Test.Syd.Validity ( src/Test/Syd/Validity.hs, nothing ) [genvalidity-sydtest] Haddock coverage: [genvalidity-sydtest]  50% ( 2 / 4) in 'Test.Syd.Validity.Functions.Idempotence' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  idempotentOnGen (src/Test/Syd/Validity/Functions/Idempotence.hs:17) [genvalidity-sydtest]  idempotent (src/Test/Syd/Validity/Functions/Idempotence.hs:20) [genvalidity-sydtest]  75% ( 3 / 4) in 'Test.Syd.Validity.Operations.Associativity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  75% ( 3 / 4) in 'Test.Syd.Validity.Operations.Commutativity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  64% ( 9 / 14) in 'Test.Syd.Validity.Operations.Identity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  leftIdentityOnGenWithEquality (src/Test/Syd/Validity/Operations/Identity.hs:54) [genvalidity-sydtest]  leftIdentityOnGen (src/Test/Syd/Validity/Operations/Identity.hs:66) [genvalidity-sydtest]  rightIdentityOnGenWithEquality (src/Test/Syd/Validity/Operations/Identity.hs:111) [genvalidity-sydtest]  rightIdentityOnGen (src/Test/Syd/Validity/Operations/Identity.hs:123) [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Operations' [genvalidity-sydtest]  0% ( 0 / 6) in 'Test.Syd.Validity.Property.Utils' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  forAllValid (src/Test/Syd/Validity/Property/Utils.hs:15) [genvalidity-sydtest]  shouldBeValid (src/Test/Syd/Validity/Property/Utils.hs:24) [genvalidity-sydtest]  shouldBeInvalid (src/Test/Syd/Validity/Property/Utils.hs:40) [genvalidity-sydtest]  <==> (src/Test/Syd/Validity/Property/Utils.hs:21) [genvalidity-sydtest]  ===> (src/Test/Syd/Validity/Property/Utils.hs:18) [genvalidity-sydtest]  100% ( 3 / 3) in 'Test.Syd.Validity.GenValidity.Property' [genvalidity-sydtest]  40% ( 4 / 10) in 'Test.Syd.Validity.Functions.Validity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  producesValidsOnGens2 (src/Test/Syd/Validity/Functions/Validity.hs:51) [genvalidity-sydtest]  producesValid2 (src/Test/Syd/Validity/Functions/Validity.hs:58) [genvalidity-sydtest]  producesValidsOnArbitrary2 (src/Test/Syd/Validity/Functions/Validity.hs:64) [genvalidity-sydtest]  producesValidsOnGens3 (src/Test/Syd/Validity/Functions/Validity.hs:72) [genvalidity-sydtest]  producesValid3 (src/Test/Syd/Validity/Functions/Validity.hs:87) [genvalidity-sydtest]  producesValidsOnArbitrary3 (src/Test/Syd/Validity/Functions/Validity.hs:101) [genvalidity-sydtest]  60% ( 3 / 5) in 'Test.Syd.Validity.Relations.Antireflexivity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  antireflexivityOnGen (src/Test/Syd/Validity/Relations/Antireflexivity.hs:32) [genvalidity-sydtest]  50% ( 3 / 6) in 'Test.Syd.Validity.Relations.Antisymmetry' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  antisymmetryOnGensWithEquality (src/Test/Syd/Validity/Relations/Antisymmetry.hs:43) [genvalidity-sydtest]  antisymmetryOnGens (src/Test/Syd/Validity/Relations/Antisymmetry.hs:54) [genvalidity-sydtest]  60% ( 3 / 5) in 'Test.Syd.Validity.Relations.Reflexivity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  reflexivityOnGen (src/Test/Syd/Validity/Relations/Reflexivity.hs:32) [genvalidity-sydtest]  60% ( 3 / 5) in 'Test.Syd.Validity.Relations.Symmetry' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  symmetryOnGens (src/Test/Syd/Validity/Relations/Symmetry.hs:34) [genvalidity-sydtest]  60% ( 3 / 5) in 'Test.Syd.Validity.Relations.Transitivity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  transitivityOnGens (src/Test/Syd/Validity/Relations/Transitivity.hs:35) [genvalidity-sydtest]  100% ( 6 / 6) in 'Test.Syd.Validity.Relations' [genvalidity-sydtest]  100% ( 13 / 13) in 'Test.Syd.Validity.Shrinking.Property' [genvalidity-sydtest]  50% ( 1 / 2) in 'Test.Syd.Validity.Types' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  15% ( 2 / 13) in 'Test.Syd.Validity.Functions.Inverse' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  inverseFunctionsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:28) [genvalidity-sydtest]  inverseFunctions (src/Test/Syd/Validity/Functions/Inverse.hs:33) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceedsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:49) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceeds (src/Test/Syd/Validity/Functions/Inverse.hs:60) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:68) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceedsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:78) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceeds (src/Test/Syd/Validity/Functions/Inverse.hs:89) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:97) [genvalidity-sydtest]  inverseFunctionsIfSucceedOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:107) [genvalidity-sydtest]  inverseFunctionsIfSucceed (src/Test/Syd/Validity/Functions/Inverse.hs:120) [genvalidity-sydtest]  inverseFunctionsIfSucceedOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:128) [genvalidity-sydtest]  7% ( 2 / 28) in 'Test.Syd.Validity.Functions.Equivalence' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  equivalentOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:47) [genvalidity-sydtest]  equivalent (src/Test/Syd/Validity/Functions/Equivalence.hs:54) [genvalidity-sydtest]  equivalentOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:73) [genvalidity-sydtest]  equivalent2 (src/Test/Syd/Validity/Functions/Equivalence.hs:81) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:100) [genvalidity-sydtest]  equivalentWhenFirstSucceeds (src/Test/Syd/Validity/Functions/Equivalence.hs:119) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:111) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:129) [genvalidity-sydtest]  equivalentWhenFirstSucceeds2 (src/Test/Syd/Validity/Functions/Equivalence.hs:162) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:147) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:172) [genvalidity-sydtest]  equivalentWhenSecondSucceeds (src/Test/Syd/Validity/Functions/Equivalence.hs:191) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:183) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:201) [genvalidity-sydtest]  equivalentWhenSecondSucceeds2 (src/Test/Syd/Validity/Functions/Equivalence.hs:234) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:219) [genvalidity-sydtest]  equivalentWhenSucceedOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:244) [genvalidity-sydtest]  equivalentWhenSucceed (src/Test/Syd/Validity/Functions/Equivalence.hs:258) [genvalidity-sydtest]  equivalentWhenSucceedOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:266) [genvalidity-sydtest]  equivalentWhenSucceedOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:276) [genvalidity-sydtest]  equivalentWhenSucceed2 (src/Test/Syd/Validity/Functions/Equivalence.hs:312) [genvalidity-sydtest]  equivalentWhenSucceedOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:297) [genvalidity-sydtest]  equivalentOnGens3 (src/Test/Syd/Validity/Functions/Equivalence.hs:322) [genvalidity-sydtest]  equivalent3 (src/Test/Syd/Validity/Functions/Equivalence.hs:338) [genvalidity-sydtest]  equivalentOnArbitrary3 (src/Test/Syd/Validity/Functions/Equivalence.hs:353) [genvalidity-sydtest]  38% ( 7 / 18) in 'Test.Syd.Validity.Functions.CanFail' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  succeedsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:77) [genvalidity-sydtest]  succeeds2 (src/Test/Syd/Validity/Functions/CanFail.hs:84) [genvalidity-sydtest]  succeedsOnArbitrary2 (src/Test/Syd/Validity/Functions/CanFail.hs:90) [genvalidity-sydtest]  failsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:100) [genvalidity-sydtest]  validIfSucceedsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:109) [genvalidity-sydtest]  validIfSucceeds2 (src/Test/Syd/Validity/Functions/CanFail.hs:119) [genvalidity-sydtest]  validIfSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/CanFail.hs:125) [genvalidity-sydtest]  validIfSucceedsOnGens3 (src/Test/Syd/Validity/Functions/CanFail.hs:133) [genvalidity-sydtest]  validIfSucceeds3 (src/Test/Syd/Validity/Functions/CanFail.hs:152) [genvalidity-sydtest]  validIfSucceedsOnArbitrary3 (src/Test/Syd/Validity/Functions/CanFail.hs:158) [genvalidity-sydtest]  100% ( 6 / 6) in 'Test.Syd.Validity.Functions' [genvalidity-sydtest]  54% ( 80 /146) in 'Test.Syd.Validity.Property' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  Module header [genvalidity-sydtest]  forAllValid (src/Test/Syd/Validity/Property/Utils.hs:15) [genvalidity-sydtest]  producesValidsOnGens2 (src/Test/Syd/Validity/Functions/Validity.hs:51) [genvalidity-sydtest]  producesValid2 (src/Test/Syd/Validity/Functions/Validity.hs:58) [genvalidity-sydtest]  producesValidsOnArbitrary2 (src/Test/Syd/Validity/Functions/Validity.hs:64) [genvalidity-sydtest]  producesValidsOnGens3 (src/Test/Syd/Validity/Functions/Validity.hs:72) [genvalidity-sydtest]  producesValid3 (src/Test/Syd/Validity/Functions/Validity.hs:87) [genvalidity-sydtest]  producesValidsOnArbitrary3 (src/Test/Syd/Validity/Functions/Validity.hs:101) [genvalidity-sydtest]  succeedsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:77) [genvalidity-sydtest]  succeeds2 (src/Test/Syd/Validity/Functions/CanFail.hs:84) [genvalidity-sydtest]  succeedsOnArbitrary2 (src/Test/Syd/Validity/Functions/CanFail.hs:90) [genvalidity-sydtest]  failsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:100) [genvalidity-sydtest]  validIfSucceedsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:109) [genvalidity-sydtest]  validIfSucceeds2 (src/Test/Syd/Validity/Functions/CanFail.hs:119) [genvalidity-sydtest]  validIfSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/CanFail.hs:125) [genvalidity-sydtest]  validIfSucceedsOnGens3 (src/Test/Syd/Validity/Functions/CanFail.hs:133) [genvalidity-sydtest]  validIfSucceeds3 (src/Test/Syd/Validity/Functions/CanFail.hs:152) [genvalidity-sydtest]  validIfSucceedsOnArbitrary3 (src/Test/Syd/Validity/Functions/CanFail.hs:158) [genvalidity-sydtest]  equivalentOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:47) [genvalidity-sydtest]  equivalent (src/Test/Syd/Validity/Functions/Equivalence.hs:54) [genvalidity-sydtest]  equivalentOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:73) [genvalidity-sydtest]  equivalent2 (src/Test/Syd/Validity/Functions/Equivalence.hs:81) [genvalidity-sydtest]  equivalentOnGens3 (src/Test/Syd/Validity/Functions/Equivalence.hs:322) [genvalidity-sydtest]  equivalent3 (src/Test/Syd/Validity/Functions/Equivalence.hs:338) [genvalidity-sydtest]  equivalentOnArbitrary3 (src/Test/Syd/Validity/Functions/Equivalence.hs:353) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:100) [genvalidity-sydtest]  equivalentWhenFirstSucceeds (src/Test/Syd/Validity/Functions/Equivalence.hs:119) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:111) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:129) [genvalidity-sydtest]  equivalentWhenFirstSucceeds2 (src/Test/Syd/Validity/Functions/Equivalence.hs:162) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:147) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:172) [genvalidity-sydtest]  equivalentWhenSecondSucceeds (src/Test/Syd/Validity/Functions/Equivalence.hs:191) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:183) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:201) [genvalidity-sydtest]  equivalentWhenSecondSucceeds2 (src/Test/Syd/Validity/Functions/Equivalence.hs:234) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:219) [genvalidity-sydtest]  equivalentWhenSucceedOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:244) [genvalidity-sydtest]  equivalentWhenSucceed (src/Test/Syd/Validity/Functions/Equivalence.hs:258) [genvalidity-sydtest]  equivalentWhenSucceedOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:266) [genvalidity-sydtest]  equivalentWhenSucceedOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:276) [genvalidity-sydtest]  equivalentWhenSucceed2 (src/Test/Syd/Validity/Functions/Equivalence.hs:312) [genvalidity-sydtest]  equivalentWhenSucceedOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:297) [genvalidity-sydtest]  inverseFunctionsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:28) [genvalidity-sydtest]  inverseFunctions (src/Test/Syd/Validity/Functions/Inverse.hs:33) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceedsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:49) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceeds (src/Test/Syd/Validity/Functions/Inverse.hs:60) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:68) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceedsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:78) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceeds (src/Test/Syd/Validity/Functions/Inverse.hs:89) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:97) [genvalidity-sydtest]  inverseFunctionsIfSucceedOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:107) [genvalidity-sydtest]  inverseFunctionsIfSucceed (src/Test/Syd/Validity/Functions/Inverse.hs:120) [genvalidity-sydtest]  inverseFunctionsIfSucceedOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:128) [genvalidity-sydtest]  idempotentOnGen (src/Test/Syd/Validity/Functions/Idempotence.hs:17) [genvalidity-sydtest]  idempotent (src/Test/Syd/Validity/Functions/Idempotence.hs:20) [genvalidity-sydtest]  reflexivityOnGen (src/Test/Syd/Validity/Relations/Reflexivity.hs:32) [genvalidity-sydtest]  transitivityOnGens (src/Test/Syd/Validity/Relations/Transitivity.hs:35) [genvalidity-sydtest]  antisymmetryOnGensWithEquality (src/Test/Syd/Validity/Relations/Antisymmetry.hs:43) [genvalidity-sydtest]  antisymmetryOnGens (src/Test/Syd/Validity/Relations/Antisymmetry.hs:54) [genvalidity-sydtest]  antireflexivityOnGen (src/Test/Syd/Validity/Relations/Antireflexivity.hs:32) [genvalidity-sydtest]  symmetryOnGens (src/Test/Syd/Validity/Relations/Symmetry.hs:34) [genvalidity-sydtest]  leftIdentityOnGenWithEquality (src/Test/Syd/Validity/Operations/Identity.hs:54) [genvalidity-sydtest]  leftIdentityOnGen (src/Test/Syd/Validity/Operations/Identity.hs:66) [genvalidity-sydtest]  rightIdentityOnGenWithEquality (src/Test/Syd/Validity/Operations/Identity.hs:111) [genvalidity-sydtest]  rightIdentityOnGen (src/Test/Syd/Validity/Operations/Identity.hs:123) [genvalidity-sydtest] Warning: 'Spec' is out of scope. [genvalidity-sydtest]  If you qualify the identifier, haddock can try to link it anyway. [genvalidity-sydtest]  14% ( 1 / 7) in 'Test.Syd.Validity.Utils' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  nameOf (src/Test/Syd/Validity/Utils.hs:27) [genvalidity-sydtest]  genDescr (src/Test/Syd/Validity/Utils.hs:38) [genvalidity-sydtest]  binRelStr (src/Test/Syd/Validity/Utils.hs:45) [genvalidity-sydtest]  shouldBeValid (src/Test/Syd/Validity/Property/Utils.hs:24) [genvalidity-sydtest]  shouldBeInvalid (src/Test/Syd/Validity/Property/Utils.hs:40) [genvalidity-sydtest]  Anon (src/Test/Syd/Validity/Utils.hs:49) [genvalidity-sydtest]  45% ( 5 / 11) in 'Test.Syd.Validity.Shrinking' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  shrinkValidSpec (src/Test/Syd/Validity/Shrinking.hs:35) [genvalidity-sydtest]  shrinkValidSpecWithLimit (src/Test/Syd/Validity/Shrinking.hs:48) [genvalidity-sydtest]  shrinkValidPreservesValidOnGenValid (src/Test/Syd/Validity/Shrinking.hs:66) [genvalidity-sydtest]  shrinkValidPreservesValidOnGenValidWithLimit (src/Test/Syd/Validity/Shrinking.hs:74) [genvalidity-sydtest]  shrinkValidDoesNotShrinkToItself (src/Test/Syd/Validity/Shrinking.hs:81) [genvalidity-sydtest]  shrinkValidDoesNotShrinkToItselfWithLimit (src/Test/Syd/Validity/Shrinking.hs:89) [genvalidity-sydtest]  100% ( 7 / 7) in 'Test.Syd.Validity.Show' [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Ord' [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Monoid' [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Monad' [genvalidity-sydtest]  100% ( 5 / 5) in 'Test.Syd.Validity.GenValidity' [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Functor' [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Eq' [genvalidity-sydtest]  100% ( 3 / 3) in 'Test.Syd.Validity.Arbitrary' [genvalidity-sydtest]  100% ( 4 / 4) in 'Test.Syd.Validity.Applicative' [genvalidity-sydtest] Warning: 'Spec' is out of scope. [genvalidity-sydtest]  If you qualify the identifier, haddock can try to link it anyway. [genvalidity-sydtest]  63% (122 /192) in 'Test.Syd.Validity' [genvalidity-sydtest]  Missing documentation for: [genvalidity-sydtest]  forAllValid (src/Test/Syd/Validity/Property/Utils.hs:15) [genvalidity-sydtest]  shouldBeValid (src/Test/Syd/Validity/Property/Utils.hs:24) [genvalidity-sydtest]  shouldBeInvalid (src/Test/Syd/Validity/Property/Utils.hs:40) [genvalidity-sydtest]  shrinkValidSpec (src/Test/Syd/Validity/Shrinking.hs:35) [genvalidity-sydtest]  shrinkValidSpecWithLimit (src/Test/Syd/Validity/Shrinking.hs:48) [genvalidity-sydtest]  shrinkValidPreservesValidOnGenValid (src/Test/Syd/Validity/Shrinking.hs:66) [genvalidity-sydtest]  producesValidsOnGens2 (src/Test/Syd/Validity/Functions/Validity.hs:51) [genvalidity-sydtest]  producesValid2 (src/Test/Syd/Validity/Functions/Validity.hs:58) [genvalidity-sydtest]  producesValidsOnArbitrary2 (src/Test/Syd/Validity/Functions/Validity.hs:64) [genvalidity-sydtest]  producesValidsOnGens3 (src/Test/Syd/Validity/Functions/Validity.hs:72) [genvalidity-sydtest]  producesValid3 (src/Test/Syd/Validity/Functions/Validity.hs:87) [genvalidity-sydtest]  producesValidsOnArbitrary3 (src/Test/Syd/Validity/Functions/Validity.hs:101) [genvalidity-sydtest]  succeedsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:77) [genvalidity-sydtest]  succeeds2 (src/Test/Syd/Validity/Functions/CanFail.hs:84) [genvalidity-sydtest]  succeedsOnArbitrary2 (src/Test/Syd/Validity/Functions/CanFail.hs:90) [genvalidity-sydtest]  failsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:100) [genvalidity-sydtest]  validIfSucceedsOnGens2 (src/Test/Syd/Validity/Functions/CanFail.hs:109) [genvalidity-sydtest]  validIfSucceeds2 (src/Test/Syd/Validity/Functions/CanFail.hs:119) [genvalidity-sydtest]  validIfSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/CanFail.hs:125) [genvalidity-sydtest]  validIfSucceedsOnGens3 (src/Test/Syd/Validity/Functions/CanFail.hs:133) [genvalidity-sydtest]  validIfSucceeds3 (src/Test/Syd/Validity/Functions/CanFail.hs:152) [genvalidity-sydtest]  validIfSucceedsOnArbitrary3 (src/Test/Syd/Validity/Functions/CanFail.hs:158) [genvalidity-sydtest]  equivalentOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:47) [genvalidity-sydtest]  equivalent (src/Test/Syd/Validity/Functions/Equivalence.hs:54) [genvalidity-sydtest]  equivalentOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:73) [genvalidity-sydtest]  equivalent2 (src/Test/Syd/Validity/Functions/Equivalence.hs:81) [genvalidity-sydtest]  equivalentOnGens3 (src/Test/Syd/Validity/Functions/Equivalence.hs:322) [genvalidity-sydtest]  equivalent3 (src/Test/Syd/Validity/Functions/Equivalence.hs:338) [genvalidity-sydtest]  equivalentOnArbitrary3 (src/Test/Syd/Validity/Functions/Equivalence.hs:353) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:100) [genvalidity-sydtest]  equivalentWhenFirstSucceeds (src/Test/Syd/Validity/Functions/Equivalence.hs:119) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:111) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:129) [genvalidity-sydtest]  equivalentWhenFirstSucceeds2 (src/Test/Syd/Validity/Functions/Equivalence.hs:162) [genvalidity-sydtest]  equivalentWhenFirstSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:147) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:172) [genvalidity-sydtest]  equivalentWhenSecondSucceeds (src/Test/Syd/Validity/Functions/Equivalence.hs:191) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:183) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:201) [genvalidity-sydtest]  equivalentWhenSecondSucceeds2 (src/Test/Syd/Validity/Functions/Equivalence.hs:234) [genvalidity-sydtest]  equivalentWhenSecondSucceedsOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:219) [genvalidity-sydtest]  equivalentWhenSucceedOnGen (src/Test/Syd/Validity/Functions/Equivalence.hs:244) [genvalidity-sydtest]  equivalentWhenSucceed (src/Test/Syd/Validity/Functions/Equivalence.hs:258) [genvalidity-sydtest]  equivalentWhenSucceedOnArbitrary (src/Test/Syd/Validity/Functions/Equivalence.hs:266) [genvalidity-sydtest]  equivalentWhenSucceedOnGens2 (src/Test/Syd/Validity/Functions/Equivalence.hs:276) [genvalidity-sydtest]  equivalentWhenSucceed2 (src/Test/Syd/Validity/Functions/Equivalence.hs:312) [genvalidity-sydtest]  equivalentWhenSucceedOnArbitrary2 (src/Test/Syd/Validity/Functions/Equivalence.hs:297) [genvalidity-sydtest]  inverseFunctionsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:28) [genvalidity-sydtest]  inverseFunctions (src/Test/Syd/Validity/Functions/Inverse.hs:33) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceedsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:49) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceeds (src/Test/Syd/Validity/Functions/Inverse.hs:60) [genvalidity-sydtest]  inverseFunctionsIfFirstSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:68) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceedsOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:78) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceeds (src/Test/Syd/Validity/Functions/Inverse.hs:89) [genvalidity-sydtest]  inverseFunctionsIfSecondSucceedsOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:97) [genvalidity-sydtest]  inverseFunctionsIfSucceedOnGen (src/Test/Syd/Validity/Functions/Inverse.hs:107) [genvalidity-sydtest]  inverseFunctionsIfSucceed (src/Test/Syd/Validity/Functions/Inverse.hs:120) [genvalidity-sydtest]  inverseFunctionsIfSucceedOnArbitrary (src/Test/Syd/Validity/Functions/Inverse.hs:128) [genvalidity-sydtest]  idempotentOnGen (src/Test/Syd/Validity/Functions/Idempotence.hs:17) [genvalidity-sydtest]  idempotent (src/Test/Syd/Validity/Functions/Idempotence.hs:20) [genvalidity-sydtest]  reflexivityOnGen (src/Test/Syd/Validity/Relations/Reflexivity.hs:32) [genvalidity-sydtest]  transitivityOnGens (src/Test/Syd/Validity/Relations/Transitivity.hs:35) [genvalidity-sydtest]  antisymmetryOnGensWithEquality (src/Test/Syd/Validity/Relations/Antisymmetry.hs:43) [genvalidity-sydtest]  antisymmetryOnGens (src/Test/Syd/Validity/Relations/Antisymmetry.hs:54) [genvalidity-sydtest]  antireflexivityOnGen (src/Test/Syd/Validity/Relations/Antireflexivity.hs:32) [genvalidity-sydtest]  symmetryOnGens (src/Test/Syd/Validity/Relations/Symmetry.hs:34) [genvalidity-sydtest]  leftIdentityOnGenWithEquality (src/Test/Syd/Validity/Operations/Identity.hs:54) [genvalidity-sydtest]  leftIdentityOnGen (src/Test/Syd/Validity/Operations/Identity.hs:66) [genvalidity-sydtest]  rightIdentityOnGenWithEquality (src/Test/Syd/Validity/Operations/Identity.hs:111) [genvalidity-sydtest]  rightIdentityOnGen (src/Test/Syd/Validity/Operations/Identity.hs:123) [genvalidity-sydtest] Documentation created: dist/doc/html/genvalidity-sydtest/, [genvalidity-sydtest] dist/doc/html/genvalidity-sydtest/genvalidity-sydtest.txt [genvalidity-sydtest] Preprocessing test suite 'genvalidity-sydtest-test' for genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] Phase: installPhase [genvalidity-sydtest] Installing library in /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [genvalidity-sydtest] Phase: fixupPhase [genvalidity-sydtest] shrinking RPATHs of ELF executables and libraries in /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] shrinking /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSgenvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v-ghc9.10.3.so [genvalidity-sydtest] checking for references to /build/ in /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0... [genvalidity-sydtest] patching script interpreter paths in /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 [genvalidity-sydtest] stripping (with command strip and flags -S -p) in /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0/lib [genvalidity-sydtest] shrinking RPATHs of ELF executables and libraries in /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc [genvalidity-sydtest] checking for references to /build/ in /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc... [genvalidity-sydtest] patching script interpreter paths in /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc [post-build-hook] Pushing 2 paths (268 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 (6.60 MiB) [post-build-hook] Pushing /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc (3.78 MiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0 /nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 2 paths... [post-build-hook] copying path '/nix/store/qf9ngm6qhp2jxswzi41zjiv3wsnv935q-genvalidity-sydtest-1.0.1.0-doc' to 'https://cache.staging.nix-ci.com'... [post-build-hook] copying path '/nix/store/q22wzrrxqfyhdz0v7isxmacan19nqi8q-genvalidity-sydtest-1.0.1.0' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/kqlh9n8d6dyszdp9i1xhphd6z1zcw6sk-genvalidity-sydtest-1.0.1.0.drv' to 'https://cache.staging.nix-ci.com'... Progress: 7 of 9 built Building opt-env-conf-test [opt-env-conf-test] Phase: setupCompilerEnvironmentPhase [opt-env-conf-test] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3. [opt-env-conf-test] Phase: unpackPhase [opt-env-conf-test] unpacking source archive /nix/store/90x6ss8nlk9bp173nc1i6wmzlgqhmdni-opt-env-conf-test-source-0.0.0.4/opt-env-conf-test-0.0.0.4.tar.gz [opt-env-conf-test] source root is opt-env-conf-test-0.0.0.4 [opt-env-conf-test] setting SOURCE_DATE_EPOCH to timestamp 1778831705 of file "opt-env-conf-test-0.0.0.4/test/Spec.hs" [opt-env-conf-test] Phase: patchPhase [opt-env-conf-test] Phase: compileBuildDriverPhase [opt-env-conf-test] setupCompileFlags: -package-db=/build/tmp.WAkfTkUWcA/setup-package.conf.d -threaded [opt-env-conf-test] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.WAkfTkUWcA/Main.o ) [opt-env-conf-test] [2 of 2] Linking Setup [opt-env-conf-test] Phase: updateAutotoolsGnuConfigScriptsPhase [opt-env-conf-test] Phase: configurePhase [opt-env-conf-test] configureFlags: --verbose --prefix=/nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --with-gcc=gcc --package-db=/build/tmp.WAkfTkUWcA/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --disable-static --disable-executable-dynamic --enable-tests --disable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --ghc-options=-fplugin-opt=Test.Syd.Mutation.Plugin:--debug --disable-optimization --ghc-option=-j1 --ghc-option=+RTS --ghc-option=-A32M --ghc-option=-M16g --ghc-option=-RTS --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib [opt-env-conf-test] Using Parsec parser [opt-env-conf-test] Configuring opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Dependency aeson: using aeson-2.2.3.0 [opt-env-conf-test] Dependency base <5: using base-4.20.2.0 [opt-env-conf-test] Dependency genvalidity: using genvalidity-1.1.1.0 [opt-env-conf-test] Dependency genvalidity-containers: using genvalidity-containers-1.0.0.2 [opt-env-conf-test] Dependency opt-env-conf >=0.9.0.0: using opt-env-conf-0.15.0.1 [opt-env-conf-test] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0 [opt-env-conf-test] Dependency sydtest: using sydtest-0.23.0.2 [opt-env-conf-test] Dependency text: using text-2.1.3 [opt-env-conf-test] Dependency QuickCheck: using QuickCheck-2.15.0.1 [opt-env-conf-test] Dependency aeson: using aeson-2.2.3.0 [opt-env-conf-test] Dependency autodocodec: using autodocodec-0.5.0.0 [opt-env-conf-test] Dependency base <5: using base-4.20.2.0 [opt-env-conf-test] Dependency containers: using containers-0.7 [opt-env-conf-test] Dependency genvalidity-aeson: using genvalidity-aeson-1.1.0.0 [opt-env-conf-test] Dependency genvalidity-sydtest: using genvalidity-sydtest-1.0.1.0 [opt-env-conf-test] Dependency genvalidity-text: using genvalidity-text-1.0.0.1 [opt-env-conf-test] Dependency mtl: using mtl-2.3.1 [opt-env-conf-test] Dependency opt-env-conf: using opt-env-conf-0.15.0.1 [opt-env-conf-test] Dependency opt-env-conf-test: using opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Dependency path: using path-0.9.6 [opt-env-conf-test] Dependency path-io: using path-io-1.8.2 [opt-env-conf-test] Dependency pretty-show: using pretty-show-1.10 [opt-env-conf-test] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0 [opt-env-conf-test] Dependency sydtest: using sydtest-0.23.0.2 [opt-env-conf-test] Dependency text: using text-2.1.3 [opt-env-conf-test] Source component graph: [opt-env-conf-test]  component lib [opt-env-conf-test]  component test:opt-env-conf-test dependency lib [opt-env-conf-test] Configured component graph: [opt-env-conf-test]  component opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  include base-4.20.2.0-64da [opt-env-conf-test]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test]  include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  include text-2.1.3-c691 [opt-env-conf-test]  component opt-env-conf-test-0.0.0.4-EG5SEEw4GiKDsx6YIRgwlV-opt-env-conf-test [opt-env-conf-test]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [opt-env-conf-test]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [opt-env-conf-test]  include base-4.20.2.0-64da [opt-env-conf-test]  include containers-0.7-504a [opt-env-conf-test]  include genvalidity-aeson-1.1.0.0-9PPko3LuC4hJdadeXInnhB [opt-env-conf-test]  include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [opt-env-conf-test]  include genvalidity-text-1.0.0.1-3o9b8WY3tDp4YbgmJHHJUk [opt-env-conf-test]  include mtl-2.3.1-b4af [opt-env-conf-test]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  include opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [opt-env-conf-test]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [opt-env-conf-test]  include pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [opt-env-conf-test]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  include text-2.1.3-c691 [opt-env-conf-test] Linked component graph: [opt-env-conf-test]  unit opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  include base-4.20.2.0-64da [opt-env-conf-test]  include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test]  include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  include text-2.1.3-c691 [opt-env-conf-test]  OptEnvConf.Args.Gen=opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5:OptEnvConf.Args.Gen,OptEnvConf.EnvMap.Gen=opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5:OptEnvConf.EnvMap.Gen,OptEnvConf.Test=opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5:OptEnvConf.Test [opt-env-conf-test]  unit opt-env-conf-test-0.0.0.4-EG5SEEw4GiKDsx6YIRgwlV-opt-env-conf-test [opt-env-conf-test]  include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [opt-env-conf-test]  include aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [opt-env-conf-test]  include base-4.20.2.0-64da [opt-env-conf-test]  include containers-0.7-504a [opt-env-conf-test]  include genvalidity-aeson-1.1.0.0-9PPko3LuC4hJdadeXInnhB [opt-env-conf-test]  include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [opt-env-conf-test]  include genvalidity-text-1.0.0.1-3o9b8WY3tDp4YbgmJHHJUk [opt-env-conf-test]  include mtl-2.3.1-b4af [opt-env-conf-test]  include opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  include opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test]  include path-0.9.6-JuNdYVciddTDWUiQr3NuVx [opt-env-conf-test]  include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [opt-env-conf-test]  include pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [opt-env-conf-test]  include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  include text-2.1.3-c691 [opt-env-conf-test] Ready component graph: [opt-env-conf-test]  definite opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test]  depends aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  depends base-4.20.2.0-64da [opt-env-conf-test]  depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L [opt-env-conf-test]  depends genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1 [opt-env-conf-test]  depends opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  depends text-2.1.3-c691 [opt-env-conf-test]  definite opt-env-conf-test-0.0.0.4-EG5SEEw4GiKDsx6YIRgwlV-opt-env-conf-test [opt-env-conf-test]  depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU [opt-env-conf-test]  depends aeson-2.2.3.0-7E4AsQHgFKfArDQma5twwk [opt-env-conf-test]  depends autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y [opt-env-conf-test]  depends base-4.20.2.0-64da [opt-env-conf-test]  depends containers-0.7-504a [opt-env-conf-test]  depends genvalidity-aeson-1.1.0.0-9PPko3LuC4hJdadeXInnhB [opt-env-conf-test]  depends genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v [opt-env-conf-test]  depends genvalidity-text-1.0.0.1-3o9b8WY3tDp4YbgmJHHJUk [opt-env-conf-test]  depends mtl-2.3.1-b4af [opt-env-conf-test]  depends opt-env-conf-0.15.0.1-JvaGg7XfaOeFjxfZDQZnJI [opt-env-conf-test]  depends opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test]  depends path-0.9.6-JuNdYVciddTDWUiQr3NuVx [opt-env-conf-test]  depends path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL [opt-env-conf-test]  depends pretty-show-1.10-CuGoXeUvzjB9II93JT7lKs [opt-env-conf-test]  depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf [opt-env-conf-test]  depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7 [opt-env-conf-test]  depends text-2.1.3-c691 [opt-env-conf-test] Using Cabal-3.12.1.0 compiled by ghc-9.10 [opt-env-conf-test] Using compiler: ghc-9.10.3 [opt-env-conf-test] Using install prefix: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Executables installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/bin [opt-env-conf-test] Libraries installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test] Dynamic Libraries installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6 [opt-env-conf-test] Private executables installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/libexec/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Data files installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/share/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Documentation installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/share/doc/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4 [opt-env-conf-test] Configuration files installed in: [opt-env-conf-test] /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/etc [opt-env-conf-test] No alex found [opt-env-conf-test] Using ar found on system at: [opt-env-conf-test] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar [opt-env-conf-test] No c2hs found [opt-env-conf-test] No cpphs found [opt-env-conf-test] No doctest found [opt-env-conf-test] Using gcc version 14.3.0 given by user at: [opt-env-conf-test] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc [opt-env-conf-test] Using ghc version 9.10.3 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc [opt-env-conf-test] Using ghc-pkg version 9.10.3 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3 [opt-env-conf-test] No ghcjs found [opt-env-conf-test] No ghcjs-pkg found [opt-env-conf-test] No greencard found [opt-env-conf-test] Using haddock version 2.31.1 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3 [opt-env-conf-test] No happy found [opt-env-conf-test] Using haskell-suite found on system at: haskell-suite-dummy-location [opt-env-conf-test] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location [opt-env-conf-test] No hmake found [opt-env-conf-test] Using hpc version 0.69 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3 [opt-env-conf-test] Using hsc2hs version 0.68.10 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3 [opt-env-conf-test] Using hscolour version 1.25 found on system at: [opt-env-conf-test] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour [opt-env-conf-test] No jhc found [opt-env-conf-test] Using ld found on system at: [opt-env-conf-test] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld [opt-env-conf-test] No pkg-config found [opt-env-conf-test] Using runghc version 9.10.3 found on system at: [opt-env-conf-test] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3 [opt-env-conf-test] Using strip version 2.44 found on system at: [opt-env-conf-test] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip [opt-env-conf-test] Using tar found on system at: [opt-env-conf-test] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar [opt-env-conf-test] No uhc found [opt-env-conf-test] Phase: buildPhase [opt-env-conf-test] mutation-nix: setting MUTATION_MANIFEST_DIR=/nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest [opt-env-conf-test] Preprocessing library for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Building library for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] [1 of 4] Compiling OptEnvConf.Args.Gen ( src/OptEnvConf/Args/Gen.hs, dist/build/OptEnvConf/Args/Gen.o, dist/build/OptEnvConf/Args/Gen.dyn_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Args.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [2 of 4] Compiling OptEnvConf.EnvMap.Gen ( src/OptEnvConf/EnvMap/Gen.hs, dist/build/OptEnvConf/EnvMap/Gen.o, dist/build/OptEnvConf/EnvMap/Gen.dyn_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.EnvMap.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [3 of 4] Compiling OptEnvConf.Test ( src/OptEnvConf/Test.hs, dist/build/OptEnvConf/Test.o, dist/build/OptEnvConf/Test.dyn_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Test [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation MaybeOp at src/OptEnvConf/Test.hs:88:54-62 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added 53 mutations [opt-env-conf-test] [4 of 4] Compiling Paths_opt_env_conf_test ( dist/build/autogen/Paths_opt_env_conf_test.hs, dist/build/Paths_opt_env_conf_test.o, dist/build/Paths_opt_env_conf_test.dyn_o ) [opt-env-conf-test] [1 of 4] Compiling OptEnvConf.Args.Gen ( src/OptEnvConf/Args/Gen.hs, dist/build/OptEnvConf/Args/Gen.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Args.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [2 of 4] Compiling OptEnvConf.EnvMap.Gen ( src/OptEnvConf/EnvMap/Gen.hs, dist/build/OptEnvConf/EnvMap/Gen.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.EnvMap.Gen [opt-env-conf-test] added 0 mutations [opt-env-conf-test] [3 of 4] Compiling OptEnvConf.Test ( src/OptEnvConf/Test.hs, dist/build/OptEnvConf/Test.p_o ) [opt-env-conf-test] mutation: instrumenting OptEnvConf.Test [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation LogicOp at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation Negate at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] added mutation MaybeOp at src/OptEnvConf/Test.hs:88:54-62 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] added 53 mutations [opt-env-conf-test] [4 of 4] Compiling Paths_opt_env_conf_test ( dist/build/autogen/Paths_opt_env_conf_test.hs, dist/build/Paths_opt_env_conf_test.p_o ) [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Args/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/EnvMap/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Test.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/Paths_opt_env_conf_test.dyn_o' [opt-env-conf-test] mutation-nix: manifest output at /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest: [opt-env-conf-test] total 88 [opt-env-conf-test] drwxr-xr-x 2 nixbld nixbld 4096 May 15 07:56 . [opt-env-conf-test] drwxrwxr-t 325 nobody nixbld 36864 May 15 07:56 .. [opt-env-conf-test] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:56 OptEnvConf.Args.Gen.json [opt-env-conf-test] -rw-r--r-- 1 nixbld nixbld 2 May 15 07:56 OptEnvConf.EnvMap.Gen.json [opt-env-conf-test] -rw-r--r-- 1 nixbld nixbld 33663 May 15 07:56 OptEnvConf.Test.json [opt-env-conf-test] mutation-nix: building remaining components with plugin silenced [opt-env-conf-test] Preprocessing library for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Building library for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Args/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/EnvMap/Gen.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/OptEnvConf/Test.dyn_o' [opt-env-conf-test] Warning: ignoring unrecognised input `dist/build/Paths_opt_env_conf_test.dyn_o' [opt-env-conf-test] Preprocessing test suite 'opt-env-conf-test' for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] Building test suite 'opt-env-conf-test' for opt-env-conf-test-0.0.0.4... [opt-env-conf-test] [ 1 of 16] Compiling OptEnvConf.ArgsSpec ( test/OptEnvConf/ArgsSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/ArgsSpec.o ) [opt-env-conf-test] [ 2 of 16] Compiling OptEnvConf.CheckSpec ( test/OptEnvConf/CheckSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/CheckSpec.o ) [opt-env-conf-test] [ 3 of 16] Compiling OptEnvConf.CompleterSpec ( test/OptEnvConf/CompleterSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/CompleterSpec.o ) [opt-env-conf-test] [ 4 of 16] Compiling OptEnvConf.CompletionSpec ( test/OptEnvConf/CompletionSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/CompletionSpec.o ) [opt-env-conf-test] [ 5 of 16] Compiling OptEnvConf.EnvMapSpec ( test/OptEnvConf/EnvMapSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/EnvMapSpec.o ) [opt-env-conf-test] [ 6 of 16] Compiling OptEnvConf.ErrorSpec ( test/OptEnvConf/ErrorSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/ErrorSpec.o ) [opt-env-conf-test] [ 7 of 16] Compiling OptEnvConf.LintSpec ( test/OptEnvConf/LintSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/LintSpec.o ) [opt-env-conf-test] [ 8 of 16] Compiling OptEnvConf.NonDetSpec ( test/OptEnvConf/NonDetSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/NonDetSpec.o ) [opt-env-conf-test] [ 9 of 16] Compiling OptEnvConf.ReaderSpec ( test/OptEnvConf/ReaderSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/ReaderSpec.o ) [opt-env-conf-test] [10 of 16] Compiling OptEnvConf.RunSpec ( test/OptEnvConf/RunSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/RunSpec.o ) [opt-env-conf-test] [11 of 16] Compiling OptEnvConf.TestUtils ( test/OptEnvConf/TestUtils.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/TestUtils.o ) [opt-env-conf-test] [12 of 16] Compiling OptEnvConf.HelpSpec ( test/OptEnvConf/HelpSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/HelpSpec.o ) [opt-env-conf-test] [13 of 16] Compiling OptEnvConf.APISpec ( test/OptEnvConf/APISpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/APISpec.o ) [opt-env-conf-test] [14 of 16] Compiling OptEnvConf.ToplevelSpec ( test/OptEnvConf/ToplevelSpec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/OptEnvConf/ToplevelSpec.o ) [opt-env-conf-test] [15 of 16] Compiling Main ( test/Spec.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/Main.o ) [opt-env-conf-test] [16 of 16] Compiling Paths_opt_env_conf_test ( dist/build/opt-env-conf-test/autogen/Paths_opt_env_conf_test.hs, dist/build/opt-env-conf-test/opt-env-conf-test-tmp/Paths_opt_env_conf_test.o ) [opt-env-conf-test] [17 of 17] Linking dist/build/opt-env-conf-test/opt-env-conf-test [opt-env-conf-test] buildPhase completed in 1 minutes 4 seconds [opt-env-conf-test] Phase: checkPhase [opt-env-conf-test] mutation-nix: collecting coverage for suite opt-env-conf-test [opt-env-conf-test] coverage (19/799): OptEnvConf\.APISpec.secret.documents the help page in the same way (194 mutations) [opt-env-conf-test] Many: without srcLoc [opt-env-conf-test]  Setting: test/OptEnvConf/ToplevelSpec.hs:49:19 in opt-env-conf-test:OptEnvConf.ToplevelSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "more",Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "args"),Live (ArgPlain "here")]}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "more"),Live (ArgPlain "args"),Live (ArgPlain "here")]}) [opt-env-conf-test]  Considering this posibility: (Just "more",Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "args"),Live (ArgPlain "here")]}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "more"),Live (ArgPlain "args"),Live (ArgPlain "here")]}) [opt-env-conf-test]  set based on argument: "more" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  Many: without srcLoc [opt-env-conf-test]  Setting: test/OptEnvConf/ToplevelSpec.hs:49:19 in opt-env-conf-test:OptEnvConf.ToplevelSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "args",Args {argsBefore = [Dead,Dead], argsAfter = [Live (ArgPlain "here")]}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "args"),Live (ArgPlain "here")]}) [opt-env-conf-test]  Considering this posibility: (Just "args",Args {argsBefore = [Dead,Dead], argsAfter = [Live (ArgPlain "here")]}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "args"),Live (ArgPlain "here")]}) [opt-env-conf-test]  set based on argument: "args" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  Many: without srcLoc [opt-env-conf-test]  Setting: test/OptEnvConf/ToplevelSpec.hs:49:19 in opt-env-conf-test:OptEnvConf.ToplevelSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "here",Args {argsBefore = [Dead,Dead,Dead], argsAfter = []}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [Dead,Dead], argsAfter = [Live (ArgPlain "here")]}) [opt-env-conf-test]  Considering this posibility: (Just "here",Args {argsBefore = [Dead,Dead,Dead], argsAfter = []}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [Dead,Dead], argsAfter = [Live (ArgPlain "here")]}) [opt-env-conf-test]  set based on argument: "here" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  Many: without srcLoc [opt-env-conf-test]  Setting: test/OptEnvConf/ToplevelSpec.hs:49:19 in opt-env-conf-test:OptEnvConf.ToplevelSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Nothing,Args {argsBefore = [Dead,Dead,Dead], argsAfter = []}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [Dead,Dead,Dead], argsAfter = []}) [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test] Settings parsed successfully.coverage (6/799): OptEnvConf\.ToplevelSpec.--run-settings-check.can run a settings check with --run-settings-check even when there are more args (144 mutations) [opt-env-conf-test] coverage (20/799): OptEnvConf\.APISpec.secret.produces the same opt docs structure as before (75 mutations) [opt-env-conf-test] Unrecognised args: -option1 option --option2 option --option3 option --option4 option [opt-env-conf-test] coverage (7/799): OptEnvConf\.ToplevelSpec.can fail fast when too many unrecognsied arguments are given (204 mutations) [opt-env-conf-test] coverage (27/799): OptEnvConf\.APISpec.secret.passes the linter (127 mutations) [opt-env-conf-test] coverage (14/799): OptEnvConf\.APISpec.secret.produces the same env docs structure as before (72 mutations) [opt-env-conf-test] coverage (22/799): OptEnvConf\.APISpec.secret.documents the long opt parser in the same way (94 mutations) [opt-env-conf-test] pure value [opt-env-conf-test] coverage (9/799): OptEnvConf\.CheckSpec.runSettingsCheckOn.is succesful on the trivial parser (10 mutations) [opt-env-conf-test] coverage (18/799): OptEnvConf\.APISpec.secret.documents the env parser in the same way (85 mutations) [opt-env-conf-test] Setting: test/OptEnvConf/CheckSpec.hs:35:17 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Nothing,Args {argsBefore = [], argsAfter = []}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [], argsAfter = []}) [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test] coverage (10/799): OptEnvConf\.CheckSpec.runSettingsCheckOn.fails when a required setting is missing (74 mutations) [opt-env-conf-test] coverage (28/799): OptEnvConf\.APISpec.secret.renders the Nix options the same way (119 mutations) [opt-env-conf-test] coverage (24/799): OptEnvConf\.APISpec.secret.documents the man page in the same way (280 mutations) [opt-env-conf-test] coverage (25/799): OptEnvConf\.APISpec.secret.produces the same conf docs structure as before (72 mutations) [opt-env-conf-test] coverage (23/799): OptEnvConf\.APISpec.secret.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (21/799): OptEnvConf\.APISpec.secret.produces the same docs structure as before (72 mutations) [opt-env-conf-test] coverage (17/799): OptEnvConf\.APISpec.secret.documents the short opt parser in the same way (108 mutations) [opt-env-conf-test] Usage: opt-env-conf-test [opt-env-conf-test]  [opt-env-conf-test] dummy [opt-env-conf-test]  [opt-env-conf-test] Available settings: [opt-env-conf-test]  Show this help text [opt-env-conf-test]  switch: -h|--help [opt-env-conf-test]  [opt-env-conf-test]  Output version information: 0.0.0 [opt-env-conf-test]  switch: --version [opt-env-conf-test]  [opt-env-conf-test] coverage (3/799): OptEnvConf\.ToplevelSpec.--help.can show help text with --help even when there are more args:1 (104 mutations) [opt-env-conf-test] Usage: opt-env-conf-test [opt-env-conf-test]  [opt-env-conf-test] dummy [opt-env-conf-test]  [opt-env-conf-test] Available settings: [opt-env-conf-test]  Show this help text [opt-env-conf-test]  switch: -h|--help [opt-env-conf-test]  [opt-env-conf-test]  Output version information: 0.0.0 [opt-env-conf-test]  switch: --version [opt-env-conf-test]  [opt-env-conf-test] coverage (4/799): OptEnvConf\.ToplevelSpec.--help.can show help text with --help (104 mutations) [opt-env-conf-test] coverage (16/799): OptEnvConf\.APISpec.secret.renders the reference documentation in the same way (261 mutations) [opt-env-conf-test] opt-env-conf-test 0.0.0 [opt-env-conf-test] Parser with check: test/OptEnvConf/CheckSpec.hs:55:68 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test] Requires capabilities: read-secret [opt-env-conf-test]  parser [opt-env-conf-test]  Setting: test/OptEnvConf/CheckSpec.hs:55:109 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "arg",Args {argsBefore = [Dead], argsAfter = []}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg")]}) [opt-env-conf-test]  Considering this posibility: (Just "arg",Args {argsBefore = [Dead], argsAfter = []}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg")]}) [opt-env-conf-test]  set based on argument: "arg" [opt-env-conf-test]  could not set based on argument: no coverage (8/799): OptEnvConf\.ToplevelSpec.--version.can show version info with --version (117 mutations) [opt-env-conf-test] argument [opt-env-conf-test]  not found [opt-env-conf-test]  check [opt-env-conf-test]  check [opt-env-conf-test]  failed, forgivable: False [opt-env-conf-test] coverage (12/799): OptEnvConf\.CheckSpec.runSettingsCheckOn.says failed when a required capability is available (110 mutations) [opt-env-conf-test] Usage: opt-env-conf-test [opt-env-conf-test]  [opt-env-conf-test] dummy [opt-env-conf-test]  [opt-env-conf-test] Available settings: [opt-env-conf-test]  Show this help text [opt-env-conf-test]  switch: -h|--help [opt-env-conf-test]  [opt-env-conf-test]  Output version information: 0.0.0 [opt-env-conf-test]  switch: --version [opt-env-conf-test]  [opt-env-conf-test] coverage (26/799): OptEnvConf\.APISpec.secret.documents the conf parser in the same way (85 mutations) [opt-env-conf-test] coverage (2/799): OptEnvConf\.ToplevelSpec.--help.can show help text with --help even when there are more args (103 mutations) [opt-env-conf-test] coverage (15/799): OptEnvConf\.APISpec.secret.shows the parser in the same way (191 mutations) [opt-env-conf-test] Parser with check: test/OptEnvConf/CheckSpec.hs:45:68 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test] Requires capabilities: read-secret [opt-env-conf-test]  parser [opt-env-conf-test]  Setting: test/OptEnvConf/CheckSpec.hs:45:109 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "arg",Args {argsBefore = [Dead], argsAfter = []}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg")]}) [opt-env-conf-test]  Considering this posibility: (Just "arg",Args {argsBefore = [Dead], argsAfter = []}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg")]}) [opt-env-conf-test]  set based on argument: "arg" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  check [opt-env-conf-test]  check [opt-env-conf-test] Ap [opt-env-conf-test]  Parser with check: test/OptEnvConf/CheckSpec.hs:68:71 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  Requires capabilities: read-secret [opt-env-conf-test]  parser [opt-env-conf-test]  Setting: test/OptEnvConf/CheckSpec.hs:68:112 in opt-env-conf-test:OptEnvConf.Ch Missing capabilities: read-secret [opt-env-conf-test] eckSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "arg1",Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "arg2")]}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg1"),Live (ArgPlain "arg2")]}) [opt-env-conf-test]  Considering this posibility: (Just "arg1",Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "arg2")]}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg1"),Live (ArgPlain "arg2")]}) [opt-env-conf-test]  set based on argument: "arg1" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  check [opt-env-conf-test]  check [opt-env-conf-test]  Missing capabilities: read-secret [opt-env-conf-test]  Parser with check: test/OptEnvConf/CheckSpec.hs:69:21 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  parser [opt-env-conf-test]  Setting: test/OptEnvConf/CheckSpec.hs:69:61 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "arg2",Args {argsBefore = [Dead,Dead], argsAfter = []}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "arg2")]}) [opt-env-conf-test]  Considering this posibility: (Just "arg2",Args {argsBefore = [Dead,Dead], argsAfter = []}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "arg2")]}) [opt-env-conf-test]  set based on argument: "arg2" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  check [opt-env-conf-test]  check [opt-env-conf-test]  failed, forgivable: False [opt-env-conf-test]  Parser with check: test/OptEnvConf/CheckSpec.hs:69:21 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  parser [opt-env-conf-test]  Setting: test/OptEnvConf/CheckSpec.hs:69:61 in opt-env-conf-test:OptEnvConf.CheckSpec [opt-env-conf-test]  Trying to consume an argument [opt-env-conf-test]  Found these possibilities to consume an argument: [opt-env-conf-test]  (Just "arg1",Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "arg2")]}) [opt-env-conf-test]  (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg1"),Live (ArgPlain "arg2")]}) [opt-env-conf-test]  Considering this posibility: (Just "arg1",Args {argsBefore = [Dead], argsAfter = [Live (ArgPlain "arg2")]}) [opt-env-conf-test]  Considering this posibility: (Nothing,Args {argsBefore = [], argsAfter = [Live (ArgPlain "arg1"),Live (ArgPlain "arg2")]}) [opt-env-conf-test]  set based on argument: "arg1" [opt-env-conf-test]  could not set based on argument: no argument [opt-env-conf-test]  not found [opt-env-conf-test]  check [opt-env-conf-test]  check [opt-env-conf-test]  failed, forgivablecoverage (11/799): OptEnvConf\.CheckSpec.runSettingsCheckOn.says incapable when a required capability is missing (102 mutations) [opt-env-conf-test] : False [opt-env-conf-test] Usage: opt-env-conf-test [opt-env-conf-test]  [opt-env-conf-test] dummy [opt-env-conf-test]  [opt-env-conf-test] Available settings: [opt-env-conf-test]  Show this help text [opt-env-conf-test]  switch: -h|--help [opt-env-conf-test]  [opt-env-conf-test]  Output version information: 0.0.0 [opt-env-conf-test]  switch: --version [opt-env-conf-test]  [opt-env-conf-test] coverage (1/799): OptEnvConf\.ToplevelSpec.--help.can show help text with -h (103 mutations) [opt-env-conf-test] pure value [opt-env-conf-test] Settings parsed successfully.coverage (13/799): OptEnvConf\.CheckSpec.runSettingsCheckOn.says failed when a required capability is missing but another setting failed (118 mutations) [opt-env-conf-test] coverage (5/799): OptEnvConf\.ToplevelSpec.--run-settings-check.can run a settings check with --run-settings-check (33 mutations) [opt-env-conf-test] coverage (29/799): OptEnvConf\.APISpec.greet.produces the same docs structure as before (61 mutations) [opt-env-conf-test] coverage (30/799): OptEnvConf\.APISpec.greet.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (33/799): OptEnvConf\.APISpec.greet.documents the short opt parser in the same way (94 mutations) [opt-env-conf-test] coverage (40/799): OptEnvConf\.APISpec.greet.passes the linter (107 mutations) [opt-env-conf-test] coverage (32/799): OptEnvConf\.APISpec.greet.documents the help page in the same way (193 mutations) [opt-env-conf-test] coverage (31/799): OptEnvConf\.APISpec.greet.produces the same env docs structure as before (55 mutations) [opt-env-conf-test] coverage (34/799): OptEnvConf\.APISpec.greet.documents the long opt parser in the same way (86 mutations) [opt-env-conf-test] coverage (52/799): OptEnvConf\.APISpec.hidden.passes the linter (38 mutations) [opt-env-conf-test] coverage (42/799): OptEnvConf\.APISpec.greet.documents the man page in the same way (279 mutations) [opt-env-conf-test] coverage (44/799): OptEnvConf\.APISpec.hidden.documents the help page in the same way (97 mutations) [opt-env-conf-test] coverage (48/799): OptEnvConf\.APISpec.hidden.produces the same conf docs structure as before (20 mutations) [opt-env-conf-test] coverage (45/799): OptEnvConf\.APISpec.hidden.produces the same docs structure as before (18 mutations) [opt-env-conf-test] coverage (35/799): OptEnvConf\.APISpec.greet.produces the same opt docs structure as before (58 mutations) [opt-env-conf-test] coverage (47/799): OptEnvConf\.APISpec.hidden.shows the parser in the same way (75 mutations) [opt-env-conf-test] coverage (38/799): OptEnvConf\.APISpec.greet.shows the parser in the same way (180 mutations) [opt-env-conf-test] coverage (54/799): OptEnvConf\.APISpec.hidden.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (53/799): OptEnvConf\.APISpec.hidden.produces the same env docs structure as before (20 mutations) [opt-env-conf-test] coverage (36/799): OptEnvConf\.APISpec.greet.produces the same conf docs structure as before (61 mutations) [opt-env-conf-test] coverage (49/799): OptEnvConf\.APISpec.hidden.renders the Nix options the same way (67 mutations) [opt-env-conf-test] coverage (37/799): OptEnvConf\.APISpec.greet.renders the reference documentation in the same way (260 mutations) [opt-env-conf-test] coverage (39/799): OptEnvConf\.APISpec.greet.documents the conf parser in the same way (75 mutations) [opt-env-conf-test] coverage (41/799): OptEnvConf\.APISpec.greet.documents the env parser in the same way (81 mutations) [opt-env-conf-test] coverage (58/799): OptEnvConf\.APISpec.hidden.documents the long opt parser in the same way (22 mutations) [opt-env-conf-test] coverage (59/799): OptEnvConf\.APISpec.yes-no.renders the reference documentation in the same way (225 mutations) [opt-env-conf-test] coverage (56/799): OptEnvConf\.APISpec.hidden.produces the same opt docs structure as before (20 mutations) [opt-env-conf-test] coverage (57/799): OptEnvConf\.APISpec.hidden.documents the env parser in the same way (20 mutations) [opt-env-conf-test] coverage (55/799): OptEnvConf\.APISpec.hidden.documents the short opt parser in the same way (25 mutations) [opt-env-conf-test] coverage (43/799): OptEnvConf\.APISpec.greet.renders the Nix options the same way (95 mutations) [opt-env-conf-test] coverage (61/799): OptEnvConf\.APISpec.yes-no.renders the Nix options the same way (91 mutations) [opt-env-conf-test] coverage (46/799): OptEnvConf\.APISpec.hidden.renders the reference documentation in the same way (138 mutations) [opt-env-conf-test] coverage (63/799): OptEnvConf\.APISpec.yes-no.produces the same env docs structure as before (49 mutations) [opt-env-conf-test] coverage (50/799): OptEnvConf\.APISpec.hidden.documents the conf parser in the same way (20 mutations) [opt-env-conf-test] coverage (62/799): OptEnvConf\.APISpec.yes-no.documents the man page in the same way (244 mutations) [opt-env-conf-test] coverage (60/799): OptEnvConf\.APISpec.yes-no.documents the short opt parser in the same way (76 mutations) [opt-env-conf-test] coverage (66/799): OptEnvConf\.APISpec.yes-no.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (64/799): OptEnvConf\.APISpec.yes-no.shows the parser in the same way (152 mutations) [opt-env-conf-test] coverage (67/799): OptEnvConf\.APISpec.yes-no.produces the same docs structure as before (49 mutations) [opt-env-conf-test] coverage (68/799): OptEnvConf\.APISpec.yes-no.documents the conf parser in the same way (62 mutations) [opt-env-conf-test] coverage (71/799): OptEnvConf\.APISpec.yes-no.produces the same opt docs structure as before (52 mutations) [opt-env-conf-test] coverage (75/799): OptEnvConf\.APISpec.yes-no-optional.documents the long opt parser in the same way (70 mutations) [opt-env-conf-test] coverage (65/799): OptEnvConf\.APISpec.yes-no.produces the same conf docs structure as before (49 mutations) [opt-env-conf-test] coverage (74/799): OptEnvConf\.APISpec.yes-no-optional.renders the Nix options the same way (90 mutations) [opt-env-conf-test] coverage (72/799): OptEnvConf\.APISpec.yes-no.passes the linter (93 mutations) [opt-env-conf-test] coverage (83/799): OptEnvConf\.APISpec.yes-no-optional.documents the short opt parser in the same way (75 mutations) [opt-env-conf-test] coverage (73/799): OptEnvConf\.APISpec.yes-no.documents the long opt parser in the same way (71 mutations) [opt-env-conf-test] coverage (70/799): OptEnvConf\.APISpec.yes-no.documents the env parser in the same way (62 mutations) [opt-env-conf-test] coverage (78/799): OptEnvConf\.APISpec.yes-no-optional.renders the reference documentation in the same way (224 mutations) [opt-env-conf-test] coverage (85/799): OptEnvConf\.APISpec.yes-no-optional.documents the env parser in the same way (61 mutations) [opt-env-conf-test] coverage (51/799): OptEnvConf\.APISpec.hidden.documents the man page in the same way (153 mutations) [opt-env-conf-test] coverage (79/799): OptEnvConf\.APISpec.yes-no-optional.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (69/799): OptEnvConf\.APISpec.yes-no.documents the help page in the same way (158 mutations) [opt-env-conf-test] coverage (84/799): OptEnvConf\.APISpec.yes-no-optional.produces the same opt docs structure as before (51 mutations) [opt-env-conf-test] coverage (82/799): OptEnvConf\.APISpec.yes-no-optional.documents the help page in the same way (157 mutations) [opt-env-conf-test] coverage (80/799): OptEnvConf\.APISpec.yes-no-optional.shows the parser in the same way (151 mutations) [opt-env-conf-test] coverage (76/799): OptEnvConf\.APISpec.yes-no-optional.documents the conf parser in the same way (61 mutations) [opt-env-conf-test] coverage (81/799): OptEnvConf\.APISpec.yes-no-optional.produces the same docs structure as before (48 mutations) [opt-env-conf-test] coverage (88/799): OptEnvConf\.APISpec.yes-no-optional.documents the man page in the same way (243 mutations) [opt-env-conf-test] coverage (90/799): OptEnvConf\.APISpec.sum-type.documents the long opt parser in the same way (65 mutations) [opt-env-conf-test] coverage (86/799): OptEnvConf\.APISpec.yes-no-optional.produces the same conf docs structure as before (48 mutations) [opt-env-conf-test] coverage (93/799): OptEnvConf\.APISpec.sum-type.produces the same opt docs structure as before (44 mutations) [opt-env-conf-test] coverage (92/799): OptEnvConf\.APISpec.sum-type.shows the parser in the same way (120 mutations) [opt-env-conf-test] coverage (91/799): OptEnvConf\.APISpec.sum-type.documents the short opt parser in the same way (68 mutations) [opt-env-conf-test] coverage (94/799): OptEnvConf\.APISpec.sum-type.produces the same conf docs structure as before (41 mutations) [opt-env-conf-test] coverage (95/799): OptEnvConf\.APISpec.sum-type.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (100/799): OptEnvConf\.APISpec.sum-type.renders the Nix options the same way (83 mutations) [opt-env-conf-test] coverage (77/799): OptEnvConf\.APISpec.yes-no-optional.produces the same env docs structure as before (48 mutations) [opt-env-conf-test] coverage (106/799): OptEnvConf\.APISpec.verbose.shows the parser in the same way (86 mutations) [opt-env-conf-test] coverage (97/799): OptEnvConf\.APISpec.sum-type.produces the same env docs structure as before (41 mutations) [opt-env-conf-test] coverage (101/799): OptEnvConf\.APISpec.sum-type.produces the same docs structure as before (41 mutations) [opt-env-conf-test] coverage (96/799): OptEnvConf\.APISpec.sum-type.documents the man page in the same way (236 mutations) [opt-env-conf-test] coverage (104/799): OptEnvConf\.APISpec.verbose.documents the env parser in the same way (22 mutations) [opt-env-conf-test] coverage (110/799): OptEnvConf\.APISpec.verbose.renders the Nix options the same way (66 mutations) [opt-env-conf-test] coverage (99/799): OptEnvConf\.APISpec.sum-type.renders the reference documentation in the same way (217 mutations) [opt-env-conf-test] coverage (87/799): OptEnvConf\.APISpec.yes-no-optional.passes the linter (92 mutations) [opt-env-conf-test] coverage (98/799): OptEnvConf\.APISpec.sum-type.documents the help page in the same way (150 mutations) [opt-env-conf-test] coverage (89/799): OptEnvConf\.APISpec.sum-type.documents the env parser in the same way (54 mutations) [opt-env-conf-test] coverage (102/799): OptEnvConf\.APISpec.sum-type.passes the linter (85 mutations) [opt-env-conf-test] coverage (107/799): OptEnvConf\.APISpec.verbose.documents the long opt parser in the same way (46 mutations) [opt-env-conf-test] coverage (109/799): OptEnvConf\.APISpec.verbose.produces the same conf docs structure as before (22 mutations) [opt-env-conf-test] coverage (111/799): OptEnvConf\.APISpec.verbose.documents the man page in the same way (173 mutations) [opt-env-conf-test] coverage (103/799): OptEnvConf\.APISpec.sum-type.documents the conf parser in the same way (54 mutations) [opt-env-conf-test] coverage (108/799): OptEnvConf\.APISpec.verbose.documents the short opt parser in the same way (50 mutations) [opt-env-conf-test] coverage (112/799): OptEnvConf\.APISpec.verbose.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (114/799): OptEnvConf\.APISpec.verbose.documents the help page in the same way (120 mutations) [opt-env-conf-test] coverage (113/799): OptEnvConf\.APISpec.verbose.renders the reference documentation in the same way (158 mutations) [opt-env-conf-test] coverage (119/799): OptEnvConf\.APISpec.empty.passes the linter (2 mutations) [opt-env-conf-test] coverage (115/799): OptEnvConf\.APISpec.verbose.passes the linter (47 mutations) [opt-env-conf-test] coverage (117/799): OptEnvConf\.APISpec.verbose.produces the same opt docs structure as before (25 mutations) [opt-env-conf-test] coverage (118/799): OptEnvConf\.APISpec.verbose.documents the conf parser in the same way (22 mutations) [opt-env-conf-test] coverage (105/799): OptEnvConf\.APISpec.verbose.produces the same env docs structure as before (22 mutations) [opt-env-conf-test] coverage (124/799): OptEnvConf\.APISpec.empty.documents the man page in the same way (135 mutations) [opt-env-conf-test] coverage (121/799): OptEnvConf\.APISpec.empty.shows the parser in the same way (13 mutations) [opt-env-conf-test] coverage (135/799): OptEnvConf\.APISpec.enable-disable.passes the linter (93 mutations) [opt-env-conf-test] coverage (126/799): OptEnvConf\.APISpec.empty.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (131/799): OptEnvConf\.APISpec.empty.renders the reference documentation in the same way (120 mutations) [opt-env-conf-test] coverage (123/799): OptEnvConf\.APISpec.empty.produces the same opt docs structure as before (3 mutations) [opt-env-conf-test] coverage (138/799): OptEnvConf\.APISpec.enable-disable.renders the reference documentation in the same way (225 mutations) [opt-env-conf-test] coverage (116/799): OptEnvConf\.APISpec.verbose.produces the same docs structure as before (22 mutations) [opt-env-conf-test] coverage (130/799): OptEnvConf\.APISpec.empty.produces the same docs structure as before (1 mutations) [opt-env-conf-test] coverage (132/799): OptEnvConf\.APISpec.empty.documents the help page in the same way (79 mutations) [opt-env-conf-test] coverage (127/799): OptEnvConf\.APISpec.empty.documents the env parser in the same way (2 mutations) [opt-env-conf-test] coverage (133/799): OptEnvConf\.APISpec.empty.documents the conf parser in the same way (2 mutations) [opt-env-conf-test] coverage (134/799): OptEnvConf\.APISpec.enable-disable.produces the same conf docs structure as before (49 mutations) [opt-env-conf-test] coverage (140/799): OptEnvConf\.APISpec.enable-disable.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (128/799): OptEnvConf\.APISpec.empty.renders the Nix options the same way (49 mutations) [opt-env-conf-test] coverage (139/799): OptEnvConf\.APISpec.enable-disable.documents the help page in the same way (158 mutations) [opt-env-conf-test] coverage (125/799): OptEnvConf\.APISpec.empty.documents the long opt parser in the same way (4 mutations) [opt-env-conf-test] coverage (137/799): OptEnvConf\.APISpec.enable-disable.produces the same docs structure as before (49 mutations) [opt-env-conf-test] coverage (129/799): OptEnvConf\.APISpec.empty.produces the same conf docs structure as before (3 mutations) [opt-env-conf-test] coverage (136/799): OptEnvConf\.APISpec.enable-disable.renders the Nix options the same way (91 mutations) [opt-env-conf-test] coverage (120/799): OptEnvConf\.APISpec.empty.documents the short opt parser in the same way (7 mutations) [opt-env-conf-test] coverage (122/799): OptEnvConf\.APISpec.empty.produces the same env docs structure as before (3 mutations) [opt-env-conf-test] coverage (143/799): OptEnvConf\.APISpec.enable-disable.produces the same opt docs structure as before (52 mutations) [opt-env-conf-test] coverage (153/799): OptEnvConf\.APISpec.sub-commands.passes the linter (109 mutations) [opt-env-conf-test] coverage (146/799): OptEnvConf\.APISpec.enable-disable.shows the parser in the same way (152 mutations) [opt-env-conf-test] coverage (145/799): OptEnvConf\.APISpec.enable-disable.documents the long opt parser in the same way (71 mutations) [opt-env-conf-test] coverage (141/799): OptEnvConf\.APISpec.enable-disable.documents the conf parser in the same way (62 mutations) [opt-env-conf-test] coverage (148/799): OptEnvConf\.APISpec.enable-disable.produces the same env docs structure as before (49 mutations) [opt-env-conf-test] coverage (158/799): OptEnvConf\.APISpec.sub-commands.produces the same conf docs structure as before (55 mutations) [opt-env-conf-test] coverage (157/799): OptEnvConf\.APISpec.sub-commands.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (165/799): OptEnvConf\.APISpec.many-args.renders the Nix options the same way (66 mutations) [opt-env-conf-test] coverage (154/799): OptEnvConf\.APISpec.sub-commands.produces the same env docs structure as before (55 mutations) [opt-env-conf-test] coverage (144/799): OptEnvConf\.APISpec.enable-disable.documents the env parser in the same way (62 mutations) [opt-env-conf-test] coverage (152/799): OptEnvConf\.APISpec.sub-commands.renders the reference documentation in the same way (306 mutations) [opt-env-conf-test] coverage (156/799): OptEnvConf\.APISpec.sub-commands.documents the long opt parser in the same way (95 mutations) [opt-env-conf-test] coverage (160/799): OptEnvConf\.APISpec.sub-commands.documents the man page in the same way (327 mutations) [opt-env-conf-test] coverage (155/799): OptEnvConf\.APISpec.sub-commands.produces the same opt docs structure as before (58 mutations) [opt-env-conf-test] coverage (169/799): OptEnvConf\.APISpec.many-args.documents the long opt parser in the same way (44 mutations) [opt-env-conf-test] coverage (147/799): OptEnvConf\.APISpec.enable-disable.documents the short opt parser in the same way (76 mutations) [opt-env-conf-test] coverage (161/799): OptEnvConf\.APISpec.sub-commands.shows the parser in the same way (192 mutations) [opt-env-conf-test] coverage (159/799): OptEnvConf\.APISpec.sub-commands.documents the short opt parser in the same way (91 mutations) [opt-env-conf-test] coverage (168/799): OptEnvConf\.APISpec.many-args.renders the reference documentation in the same way (160 mutations) [opt-env-conf-test] coverage (162/799): OptEnvConf\.APISpec.sub-commands.documents the env parser in the same way (73 mutations) [opt-env-conf-test] coverage (167/799): OptEnvConf\.APISpec.many-args.documents the env parser in the same way (22 mutations) [opt-env-conf-test] coverage (163/799): OptEnvConf\.APISpec.sub-commands.documents the conf parser in the same way (73 mutations) [opt-env-conf-test] coverage (166/799): OptEnvConf\.APISpec.many-args.produces the same docs structure as before (22 mutations) [opt-env-conf-test] coverage (164/799): OptEnvConf\.APISpec.many-args.documents the conf parser in the same way (22 mutations) [opt-env-conf-test] coverage (150/799): OptEnvConf\.APISpec.sub-commands.documents the help page in the same way (184 mutations) [opt-env-conf-test] coverage (151/799): OptEnvConf\.APISpec.sub-commands.produces the same docs structure as before (55 mutations) [opt-env-conf-test] coverage (142/799): OptEnvConf\.APISpec.enable-disable.documents the man page in the same way (244 mutations) [opt-env-conf-test] coverage (170/799): OptEnvConf\.APISpec.many-args.shows the parser in the same way (64 mutations) [opt-env-conf-test] coverage (176/799): OptEnvConf\.APISpec.many-args.produces the same opt docs structure as before (25 mutations) [opt-env-conf-test] coverage (149/799): OptEnvConf\.APISpec.sub-commands.renders the Nix options the same way (95 mutations) [opt-env-conf-test] coverage (173/799): OptEnvConf\.APISpec.many-args.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (174/799): OptEnvConf\.APISpec.many-args.documents the help page in the same way (122 mutations) [opt-env-conf-test] coverage (172/799): OptEnvConf\.APISpec.many-args.produces the same conf docs structure as before (22 mutations) [opt-env-conf-test] coverage (179/799): OptEnvConf\.APISpec.with-default.produces the same opt docs structure as before (53 mutations) [opt-env-conf-test] coverage (182/799): OptEnvConf\.APISpec.with-default.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (195/799): OptEnvConf\.APISpec.three-commands.passes the linter (124 mutations) [opt-env-conf-test] coverage (175/799): OptEnvConf\.APISpec.many-args.documents the man page in the same way (175 mutations) [opt-env-conf-test] coverage (198/799): OptEnvConf\.APISpec.three-commands.renders the reference documentation in the same way (282 mutations) [opt-env-conf-test] coverage (183/799): OptEnvConf\.APISpec.with-default.shows the parser in the same way (93 mutations) [opt-env-conf-test] coverage (171/799): OptEnvConf\.APISpec.many-args.passes the linter (37 mutations) [opt-env-conf-test] coverage (177/799): OptEnvConf\.APISpec.many-args.documents the short opt parser in the same way (48 mutations) [opt-env-conf-test] coverage (189/799): OptEnvConf\.APISpec.with-default.produces the same env docs structure as before (50 mutations) [opt-env-conf-test] coverage (196/799): OptEnvConf\.APISpec.three-commands.documents the conf parser in the same way (77 mutations) [opt-env-conf-test] coverage (185/799): OptEnvConf\.APISpec.with-default.renders the reference documentation in the same way (186 mutations) [opt-env-conf-test] coverage (192/799): OptEnvConf\.APISpec.with-default.documents the env parser in the same way (50 mutations) [opt-env-conf-test] coverage (194/799): OptEnvConf\.APISpec.three-commands.produces the same conf docs structure as before (59 mutations) [opt-env-conf-test] coverage (188/799): OptEnvConf\.APISpec.with-default.documents the conf parser in the same way (50 mutations) [opt-env-conf-test] coverage (186/799): OptEnvConf\.APISpec.with-default.documents the short opt parser in the same way (76 mutations) [opt-env-conf-test] coverage (187/799): OptEnvConf\.APISpec.with-default.passes the linter (88 mutations) [opt-env-conf-test] coverage (178/799): OptEnvConf\.APISpec.many-args.produces the same env docs structure as before (22 mutations) [opt-env-conf-test] coverage (184/799): OptEnvConf\.APISpec.with-default.produces the same docs structure as before (50 mutations) [opt-env-conf-test] coverage (201/799): OptEnvConf\.APISpec.three-commands.documents the help page in the same way (142 mutations) [opt-env-conf-test] coverage (199/799): OptEnvConf\.APISpec.three-commands.produces the same docs structure as before (59 mutations) [opt-env-conf-test] coverage (181/799): OptEnvConf\.APISpec.with-default.documents the long opt parser in the same way (76 mutations) [opt-env-conf-test] coverage (180/799): OptEnvConf\.APISpec.with-default.documents the man page in the same way (201 mutations) [opt-env-conf-test] coverage (210/799): OptEnvConf\.APISpec.same-help.documents the help page in the same way (186 mutations) [opt-env-conf-test] coverage (209/799): OptEnvConf\.APISpec.same-help.documents the conf parser in the same way (75 mutations) [opt-env-conf-test] coverage (231/799): OptEnvConf\.APISpec.some-args.documents the man page in the same way (193 mutations) [opt-env-conf-test] coverage (218/799): OptEnvConf\.APISpec.same-help.renders the reference documentation in the same way (253 mutations) [opt-env-conf-test] coverage (219/799): OptEnvConf\.APISpec.same-help.produces the same docs structure as before (62 mutations) [opt-env-conf-test] coverage (224/799): OptEnvConf\.APISpec.some-args.produces the same docs structure as before (26 mutations) [opt-env-conf-test] coverage (223/799): OptEnvConf\.APISpec.same-help.shows the parser in the same way (181 mutations) [opt-env-conf-test] coverage (221/799): OptEnvConf\.APISpec.same-help.documents the long opt parser in the same way (84 mutations) [opt-env-conf-test] coverage (220/799): OptEnvConf\.APISpec.same-help.produces the same env docs structure as before (62 mutations) [opt-env-conf-test] coverage (222/799): OptEnvConf\.APISpec.same-help.documents the env parser in the same way (75 mutations) [opt-env-conf-test] coverage (230/799): OptEnvConf\.APISpec.some-args.renders the reference documentation in the same way (174 mutations) [opt-env-conf-test] coverage (229/799): OptEnvConf\.APISpec.some-args.documents the long opt parser in the same way (48 mutations) [opt-env-conf-test] coverage (235/799): OptEnvConf\.APISpec.some-args.documents the help page in the same way (133 mutations) [opt-env-conf-test] coverage (234/799): OptEnvConf\.APISpec.some-args.produces the same env docs structure as before (26 mutations) [opt-env-conf-test] coverage (228/799): OptEnvConf\.APISpec.some-args.passes the linter (37 mutations) [opt-env-conf-test] coverage (233/799): OptEnvConf\.APISpec.some-args.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (232/799): OptEnvConf\.APISpec.some-args.documents the short opt parser in the same way (59 mutations) [opt-env-conf-test] coverage (197/799): OptEnvConf\.APISpec.three-commands.documents the short opt parser in the same way (57 mutations) [opt-env-conf-test] coverage (236/799): OptEnvConf\.APISpec.some-args.shows the parser in the same way (88 mutations) [opt-env-conf-test] coverage (190/799): OptEnvConf\.APISpec.with-default.produces the same conf docs structure as before (50 mutations) [opt-env-conf-test] coverage (193/799): OptEnvConf\.APISpec.with-default.renders the Nix options the same way (94 mutations) [opt-env-conf-test] coverage (202/799): OptEnvConf\.APISpec.three-commands.documents the env parser in the same way (77 mutations) [opt-env-conf-test] coverage (215/799): OptEnvConf\.APISpec.same-help.documents the man page in the same way (272 mutations) [opt-env-conf-test] coverage (206/799): OptEnvConf\.APISpec.three-commands.shows the parser in the same way (196 mutations) [opt-env-conf-test] coverage (225/799): OptEnvConf\.APISpec.some-args.produces the same opt docs structure as before (29 mutations) [opt-env-conf-test] coverage (204/799): OptEnvConf\.APISpec.three-commands.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (217/799): OptEnvConf\.APISpec.same-help.renders the Nix options the same way (102 mutations) [opt-env-conf-test] coverage (200/799): OptEnvConf\.APISpec.three-commands.renders the Nix options the same way (99 mutations) [opt-env-conf-test] coverage (203/799): OptEnvConf\.APISpec.three-commands.produces the same opt docs structure as before (62 mutations) [opt-env-conf-test] coverage (211/799): OptEnvConf\.APISpec.same-help.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (240/799): OptEnvConf\.APISpec.enable-disable-optional.produces the same docs structure as before (48 mutations) [opt-env-conf-test] coverage (208/799): OptEnvConf\.APISpec.three-commands.documents the man page in the same way (303 mutations) [opt-env-conf-test] coverage (242/799): OptEnvConf\.APISpec.enable-disable-optional.documents the short opt parser in the same way (75 mutations) [opt-env-conf-test] coverage (226/799): OptEnvConf\.APISpec.some-args.documents the env parser in the same way (26 mutations) [opt-env-conf-test] coverage (227/799): OptEnvConf\.APISpec.some-args.renders the Nix options the same way (66 mutations) [opt-env-conf-test] coverage (216/799): OptEnvConf\.APISpec.same-help.produces the same conf docs structure as before (62 mutations) [opt-env-conf-test] coverage (214/799): OptEnvConf\.APISpec.same-help.passes the linter (117 mutations) [opt-env-conf-test] coverage (260/799): OptEnvConf\.APISpec.sub-settings.renders the reference documentation in the same way (248 mutations) [opt-env-conf-test] coverage (239/799): OptEnvConf\.APISpec.enable-disable-optional.documents the long opt parser in the same way (70 mutations) [opt-env-conf-test] coverage (258/799): OptEnvConf\.APISpec.sub-settings.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (238/799): OptEnvConf\.APISpec.some-args.documents the conf parser in the same way (26 mutations) [opt-env-conf-test] coverage (191/799): OptEnvConf\.APISpec.with-default.documents the help page in the same way (148 mutations) [opt-env-conf-test] coverage (205/799): OptEnvConf\.APISpec.three-commands.produces the same env docs structure as before (59 mutations) [opt-env-conf-test] coverage (248/799): OptEnvConf\.APISpec.enable-disable-optional.documents the conf parser in the same way (61 mutations) [opt-env-conf-test] coverage (213/799): OptEnvConf\.APISpec.same-help.produces the same opt docs structure as before (65 mutations) [opt-env-conf-test] coverage (212/799): OptEnvConf\.APISpec.same-help.documents the short opt parser in the same way (100 mutations) [opt-env-conf-test] coverage (254/799): OptEnvConf\.APISpec.sub-settings.produces the same opt docs structure as before (51 mutations) [opt-env-conf-test] coverage (207/799): OptEnvConf\.APISpec.three-commands.documents the long opt parser in the same way (99 mutations) [opt-env-conf-test] coverage (237/799): OptEnvConf\.APISpec.some-args.produces the same conf docs structure as before (26 mutations) [opt-env-conf-test] coverage (252/799): OptEnvConf\.APISpec.enable-disable-optional.produces the same conf docs structure as before (48 mutations) [opt-env-conf-test] coverage (257/799): OptEnvConf\.APISpec.sub-settings.documents the conf parser in the same way (67 mutations) [opt-env-conf-test] coverage (250/799): OptEnvConf\.APISpec.enable-disable-optional.renders the Nix options the same way (90 mutations) [opt-env-conf-test] coverage (255/799): OptEnvConf\.APISpec.sub-settings.produces the same docs structure as before (60 mutations) [opt-env-conf-test] coverage (261/799): OptEnvConf\.APISpec.sub-settings.produces the same conf docs structure as before (54 mutations) [opt-env-conf-test] coverage (262/799): OptEnvConf\.APISpec.sub-settings.documents the man page in the same way (267 mutations) [opt-env-conf-test] coverage (263/799): OptEnvConf\.APISpec.sub-settings.documents the long opt parser in the same way (70 mutations) [opt-env-conf-test] coverage (256/799): OptEnvConf\.APISpec.sub-settings.produces the same env docs structure as before (54 mutations) [opt-env-conf-test] coverage (266/799): OptEnvConf\.APISpec.sub-settings.documents the env parser in the same way (67 mutations) [opt-env-conf-test] coverage (271/799): OptEnvConf\.APISpec.optional.shows the parser in the same way (122 mutations) [opt-env-conf-test] coverage (281/799): OptEnvConf\.APISpec.optional.produces the same opt docs structure as before (44 mutations) [opt-env-conf-test] coverage (282/799): OptEnvConf\.APISpec.optional.passes the linter (69 mutations) [opt-env-conf-test] coverage (273/799): OptEnvConf\.APISpec.optional.documents the help page in the same way (141 mutations) [opt-env-conf-test] coverage (279/799): OptEnvConf\.APISpec.optional.documents the long opt parser in the same way (63 mutations) [opt-env-conf-test] coverage (276/799): OptEnvConf\.APISpec.optional.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (274/799): OptEnvConf\.APISpec.optional.produces the same env docs structure as before (41 mutations) [opt-env-conf-test] coverage (251/799): OptEnvConf\.APISpec.enable-disable-optional.shows the parser in the same way (151 mutations) [opt-env-conf-test] coverage (280/799): OptEnvConf\.APISpec.optional.produces the same conf docs structure as before (41 mutations) [opt-env-conf-test] coverage (244/799): OptEnvConf\.APISpec.enable-disable-optional.documents the man page in the same way (243 mutations) [opt-env-conf-test] coverage (283/799): OptEnvConf\.APISpec.optional.documents the short opt parser in the same way (67 mutations) [opt-env-conf-test] coverage (275/799): OptEnvConf\.APISpec.optional.documents the env parser in the same way (41 mutations) [opt-env-conf-test] coverage (287/799): OptEnvConf\.APISpec.big-config.documents the help page in the same way (165 mutations) [opt-env-conf-test] coverage (272/799): OptEnvConf\.APISpec.optional.renders the reference documentation in the same way (179 mutations) [opt-env-conf-test] coverage (278/799): OptEnvConf\.APISpec.optional.documents the man page in the same way (194 mutations) [opt-env-conf-test] coverage (288/799): OptEnvConf\.APISpec.big-config.documents the env parser in the same way (59 mutations) [opt-env-conf-test] coverage (284/799): OptEnvConf\.APISpec.big-config.renders the Nix options the same way (88 mutations) [opt-env-conf-test] coverage (246/799): OptEnvConf\.APISpec.enable-disable-optional.documents the help page in the same way (157 mutations) [opt-env-conf-test] coverage (253/799): OptEnvConf\.APISpec.enable-disable-optional.produces the same env docs structure as before (48 mutations) [opt-env-conf-test] coverage (290/799): OptEnvConf\.APISpec.big-config.passes the linter (84 mutations) [opt-env-conf-test] coverage (270/799): OptEnvConf\.APISpec.optional.renders the Nix options the same way (85 mutations) [opt-env-conf-test] coverage (247/799): OptEnvConf\.APISpec.enable-disable-optional.documents the env parser in the same way (61 mutations) [opt-env-conf-test] coverage (289/799): OptEnvConf\.APISpec.big-config.produces the same docs structure as before (46 mutations) [opt-env-conf-test] coverage (249/799): OptEnvConf\.APISpec.enable-disable-optional.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (259/799): OptEnvConf\.APISpec.sub-settings.renders the Nix options the same way (97 mutations) [opt-env-conf-test] coverage (269/799): OptEnvConf\.APISpec.optional.documents the conf parser in the same way (41 mutations) [opt-env-conf-test] coverage (265/799): OptEnvConf\.APISpec.sub-settings.passes the linter (83 mutations) [opt-env-conf-test] coverage (291/799): OptEnvConf\.APISpec.big-config.produces the same conf docs structure as before (46 mutations) [opt-env-conf-test] coverage (294/799): OptEnvConf\.APISpec.big-config.renders the reference documentation in the same way (232 mutations) [opt-env-conf-test] coverage (286/799): OptEnvConf\.APISpec.big-config.documents the conf parser in the same way (59 mutations) [opt-env-conf-test] coverage (267/799): OptEnvConf\.APISpec.sub-settings.documents the short opt parser in the same way (83 mutations) [opt-env-conf-test] coverage (297/799): OptEnvConf\.APISpec.big-config.documents the short opt parser in the same way (79 mutations) [opt-env-conf-test] coverage (264/799): OptEnvConf\.APISpec.sub-settings.documents the help page in the same way (181 mutations) [opt-env-conf-test] coverage (293/799): OptEnvConf\.APISpec.big-config.documents the long opt parser in the same way (68 mutations) [opt-env-conf-test] coverage (296/799): OptEnvConf\.APISpec.big-config.produces the same env docs structure as before (46 mutations) [opt-env-conf-test] coverage (292/799): OptEnvConf\.APISpec.big-config.shows the parser in the same way (149 mutations) [opt-env-conf-test] coverage (309/799): OptEnvConf\.RunSpec.runParser.subConfig.can prefix a conf val parser (81 mutations) [opt-env-conf-test] coverage (295/799): OptEnvConf\.APISpec.big-config.documents the version page in the same way (2 mutations) [opt-env-conf-test] coverage (245/799): OptEnvConf\.APISpec.enable-disable-optional.passes the linter (92 mutations) [opt-env-conf-test] coverage (312/799): OptEnvConf\.RunSpec.runParser.subArgs.can prefix a switch parser (69 mutations) [opt-env-conf-test] coverage (285/799): OptEnvConf\.APISpec.big-config.documents the man page in the same way (251 mutations) [opt-env-conf-test] coverage (310/799): OptEnvConf\.RunSpec.runParser.Select.can use the second parser with select (10 mutations) [opt-env-conf-test] coverage (298/799): OptEnvConf\.APISpec.big-config.produces the same opt docs structure as before (49 mutations) [opt-env-conf-test] coverage (308/799): OptEnvConf\.RunSpec.runParser.withCombinedYamlConfig.can parse without any arguments (107 mutations) [opt-env-conf-test] coverage (314/799): OptEnvConf\.RunSpec.runParser.Some.fails to parse zero args (78 mutations) [opt-env-conf-test] coverage (243/799): OptEnvConf\.APISpec.enable-disable-optional.renders the reference documentation in the same way (224 mutations) [opt-env-conf-test] coverage (313/799): OptEnvConf\.RunSpec.runParser.subArgs.can prefix an option parser (91 mutations) [opt-env-conf-test] coverage (241/799): OptEnvConf\.APISpec.enable-disable-optional.produces the same opt docs structure as before (51 mutations) [opt-env-conf-test] coverage (317/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [] as True (104 mutations) [opt-env-conf-test] coverage (311/799): OptEnvConf\.RunSpec.runParser.Select.can avoid the second parser with select (10 mutations) [opt-env-conf-test] coverage (277/799): OptEnvConf\.APISpec.optional.produces the same docs structure as before (41 mutations) [opt-env-conf-test] coverage (307/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["sub","bar"] (160 mutations) [opt-env-conf-test] coverage (315/799): OptEnvConf\.RunSpec.runParser.Some.can parse some args (102 mutations) [opt-env-conf-test] coverage (300/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["quux"] (254 mutations) [opt-env-conf-test] coverage (306/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["create"] (185 mutations) [opt-env-conf-test] coverage (304/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["--port","notaport"] (265 mutations) [opt-env-conf-test] coverage (303/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: [] (243 mutations) [opt-env-conf-test] coverage (299/799): OptEnvConf\.EnvMapSpec.parseEnvMap.produces valid EnvMaps (0 mutations) [opt-env-conf-test] coverage (302/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["sub"] (173 mutations) [opt-env-conf-test] coverage (268/799): OptEnvConf\.APISpec.sub-settings.shows the parser in the same way (163 mutations) [opt-env-conf-test] coverage (301/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["sub","foo"] (160 mutations) [opt-env-conf-test] coverage (319/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["quux","--port","6"] as (["quux"],[6]) (148 mutations) [opt-env-conf-test] coverage (320/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","False")] as False (121 mutations) [opt-env-conf-test] coverage (316/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["command","arg"] as ("command",'2') (100 mutations) [opt-env-conf-test] coverage (305/799): OptEnvConf\.HelpSpec.this help page in the same way for args\: ["read"] (160 mutations) [opt-env-conf-test] coverage (326/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","-p1"] as (["-p1"],[]) (127 mutations) [opt-env-conf-test] coverage (321/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","all","-bare","--arguments"] as ["all","-bare","--arguments"] (110 mutations) [opt-env-conf-test] coverage (332/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","b","-v"] as (["a","b"],3) (140 mutations) [opt-env-conf-test] coverage (323/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [] as False (104 mutations) [opt-env-conf-test] coverage (329/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-v","b","-v","c"] as (["a","b","c"],4) (140 mutations) [opt-env-conf-test] coverage (327/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vf","foo","-v"] as (2,"foo") (174 mutations) [opt-env-conf-test] coverage (322/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-w","foo"] as (Just "foo",True) (171 mutations) [opt-env-conf-test] coverage (318/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--enable-example"] as True (128 mutations) [opt-env-conf-test] coverage (325/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","False")] as False:1 (121 mutations) [opt-env-conf-test] coverage (330/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses configuration Just (fromList [("foo",String "bar")]) as Right "bar" (75 mutations) [opt-env-conf-test] coverage (331/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo","--watch"] as (Just "foo",True) (153 mutations) [opt-env-conf-test] coverage (333/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--bash-completion-script"] as Left True (93 mutations) [opt-env-conf-test] coverage (328/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as ('a','b') (131 mutations) [opt-env-conf-test] coverage (337/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vv","--"] as (["--"],2):1 (148 mutations) [opt-env-conf-test] coverage (336/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--option","command","arg"] as ("command",'2') (118 mutations) [opt-env-conf-test] coverage (334/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-vv","b","-v","c"] as (["a","b","c"],5) (149 mutations) [opt-env-conf-test] coverage (324/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vv","--"] as (["--"],2) (163 mutations) [opt-env-conf-test] coverage (335/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as "bar" (155 mutations) [opt-env-conf-test] coverage (341/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","True")] as True (121 mutations) [opt-env-conf-test] coverage (345/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["args","here"] as ["args","here"] (142 mutations) [opt-env-conf-test] coverage (340/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--verbose"] as 1 (107 mutations) [opt-env-conf-test] coverage (339/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo","-w"] as (Just "foo",True) (154 mutations) [opt-env-conf-test] coverage (342/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--watch","foo"] as (Just "foo",True) (170 mutations) [opt-env-conf-test] coverage (347/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--no-example"] as False (128 mutations) [opt-env-conf-test] coverage (346/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["c"] as "c" (100 mutations) [opt-env-conf-test] coverage (343/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","-v","b","-v"] as (["a","b"],2) (134 mutations) [opt-env-conf-test] coverage (338/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as Nothing (102 mutations) [opt-env-conf-test] coverage (348/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-vv","-v","b","-v","c"] as (["a","b","c"],6) (149 mutations) [opt-env-conf-test] coverage (353/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","False")] as False:2 (121 mutations) [opt-env-conf-test] coverage (344/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","-p","2"] as (["-p","2"],[]) (127 mutations) [opt-env-conf-test] coverage (349/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","-p1"] as (["-p1"],[]):1 (124 mutations) [opt-env-conf-test] coverage (354/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--bar"] as (Just "--bar",False) (159 mutations) [opt-env-conf-test] coverage (355/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--before","'m'"] as ('m',Nothing) (169 mutations) [opt-env-conf-test] coverage (356/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port","3"] as ([],[3]) (159 mutations) [opt-env-conf-test] coverage (357/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses configuration Just (fromList [("hi",String "ho")]) as "ho" (73 mutations) [opt-env-conf-test] coverage (352/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--enable-example"] as Just True (128 mutations) [opt-env-conf-test] coverage (350/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as ([],0) (85 mutations) [opt-env-conf-test] coverage (366/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-w"] as (Nothing,True) (143 mutations) [opt-env-conf-test] coverage (351/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--enable-example"] as True:1 (128 mutations) [opt-env-conf-test] coverage (362/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["two"] as '2' (29 mutations) [opt-env-conf-test] coverage (361/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-v","-f","foo"] as (1,"foo") (165 mutations) [opt-env-conf-test] coverage (359/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--bar"] as (Just "--bar",False):1 (159 mutations) [opt-env-conf-test] coverage (360/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p1"] as ([],[1]) (139 mutations) [opt-env-conf-test] coverage (364/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["quux","--port","6"] as (["quux"],[6]):1 (159 mutations) [opt-env-conf-test] coverage (363/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--file","foo"] as "foo" (91 mutations) [opt-env-conf-test] coverage (358/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--example"] as True (128 mutations) [opt-env-conf-test] coverage (367/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo"] as (Just "foo",False) (135 mutations) [opt-env-conf-test] coverage (371/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-vv","-v","b","-v","c"] as (["a","b","c"],6):1 (167 mutations) [opt-env-conf-test] coverage (365/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p","1","-p","2","-p","3"] as ([],[1,2,3]) (155 mutations) [opt-env-conf-test] coverage (370/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port=8","bar"] as (["bar"],[8]) (150 mutations) [opt-env-conf-test] coverage (372/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["bar","--port=5"] as (["bar"],[5]) (134 mutations) [opt-env-conf-test] coverage (377/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port=8","bar"] as (["bar"],[8]):1 (134 mutations) [opt-env-conf-test] coverage (385/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","True")] as True (121 mutations) [opt-env-conf-test] coverage (386/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port=2"] as ([],[2]) (126 mutations) [opt-env-conf-test] coverage (387/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","False")] as False:1 (121 mutations) [opt-env-conf-test] coverage (388/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port=2"] as ([],[2]):1 (136 mutations) [opt-env-conf-test] coverage (390/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--watch"] as (Nothing,True) (142 mutations) [opt-env-conf-test] coverage (389/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--disable-example"] as False:1 (128 mutations) [opt-env-conf-test] coverage (391/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as True (104 mutations) [opt-env-conf-test] coverage (392/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-f","foo"] as "foo" (108 mutations) [opt-env-conf-test] coverage (396/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as (True,"bar") (117 mutations) [opt-env-conf-test] coverage (394/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["arg"] as Right "arg" (126 mutations) [opt-env-conf-test] coverage (393/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as ([],[]) (84 mutations) [opt-env-conf-test] coverage (398/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["run2","--foo","bar"] as "bar":1 (144 mutations) [opt-env-conf-test] coverage (395/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["run2","--foo","bar"] as "bar" (144 mutations) [opt-env-conf-test] coverage (400/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","--port=3"] as (["--port=3"],[]) (121 mutations) [opt-env-conf-test] coverage (399/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as ([],[]):1 (87 mutations) [opt-env-conf-test] coverage (397/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as 0 (76 mutations) [opt-env-conf-test] coverage (401/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as False (104 mutations) [opt-env-conf-test] coverage (402/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as ([],0):1 (88 mutations) [opt-env-conf-test] coverage (404/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-v","-v"] as 2 (108 mutations) [opt-env-conf-test] coverage (403/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vv","--verbose"] as 3 (123 mutations) [opt-env-conf-test] coverage (405/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-v","--"] as (["--"],1) (139 mutations) [opt-env-conf-test] coverage (406/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [] as False:1 (104 mutations) [opt-env-conf-test] coverage (407/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as False:1 (104 mutations) [opt-env-conf-test] coverage (408/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--"] as (["--"],0) (117 mutations) [opt-env-conf-test] coverage (409/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-w"] as (Nothing,True):1 (159 mutations) [opt-env-conf-test] coverage (410/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","-v"] as (["-v"],0) (125 mutations) [opt-env-conf-test] coverage (413/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","True")] as True:1 (121 mutations) [opt-env-conf-test] coverage (417/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port","9","quux"] as (["quux"],[9]) (148 mutations) [opt-env-conf-test] coverage (411/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p","1","-p","2","-p","3"] as ([],[1,2,3]):1 (177 mutations) [opt-env-conf-test] coverage (412/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["run1","--foo","bar"] as "bar" (144 mutations) [opt-env-conf-test] coverage (418/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo","-w"] as (Just "foo",True):1 (154 mutations) [opt-env-conf-test] coverage (416/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--no-example"] as Just False (128 mutations) [opt-env-conf-test] coverage (415/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as "bar":2 (155 mutations) [opt-env-conf-test] coverage (414/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--file","foo","-v"] as (["foo"],1) (159 mutations) [opt-env-conf-test] coverage (420/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vvv"] as ([],3) (133 mutations) [opt-env-conf-test] coverage (376/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port=2","-p3"] as ([],[2,3]) (142 mutations) [opt-env-conf-test] coverage (383/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p1","--port","2"] as ([],[1,2]) (178 mutations) [opt-env-conf-test] coverage (379/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as "bar":1 (155 mutations) [opt-env-conf-test] coverage (384/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--disable-example"] as False (128 mutations) [opt-env-conf-test] coverage (421/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","-dfu"] as "-dfu" (97 mutations) [opt-env-conf-test] coverage (382/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vv","--verbose","-v"] as 4 (123 mutations) [opt-env-conf-test] coverage (381/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [] as True:1 (104 mutations) [opt-env-conf-test] coverage (368/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo"] as (Just "foo",False):1 (135 mutations) [opt-env-conf-test] coverage (419/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as ([],0):2 (87 mutations) [opt-env-conf-test] coverage (380/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses configuration Just (fromList [("hi",Number 5\.0)]) as Left 5 (75 mutations) [opt-env-conf-test] coverage (374/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-f","foo"] as (0,"foo") (163 mutations) [opt-env-conf-test] coverage (378/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","-v","b","-v"] as (["a","b"],2):1 (152 mutations) [opt-env-conf-test] coverage (446/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["delete"] as "ho" (29 mutations) [opt-env-conf-test] coverage (369/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","False")] as False (121 mutations) [opt-env-conf-test] coverage (375/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-v","--verbose"] as 2 (114 mutations) [opt-env-conf-test] coverage (438/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","--port","4"] as (["--port","4"],[]) (121 mutations) [opt-env-conf-test] coverage (443/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vv"] as 2 (117 mutations) [opt-env-conf-test] coverage (447/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--watch"] as (Nothing,True):1 (158 mutations) [opt-env-conf-test] coverage (444/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["bar","--port=5"] as (["bar"],[5]):1 (138 mutations) [opt-env-conf-test] coverage (437/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","True")] as True:2 (121 mutations) [opt-env-conf-test] coverage (445/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p7","foo"] as (["foo"],[7]) (147 mutations) [opt-env-conf-test] coverage (441/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--"] as (["--"],0):1 (120 mutations) [opt-env-conf-test] coverage (455/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--disable-example"] as Just False (128 mutations) [opt-env-conf-test] coverage (462/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as ["bar"] (120 mutations) [opt-env-conf-test] coverage (458/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-v","b","-v"] as (["a","b"],4) (159 mutations) [opt-env-conf-test] coverage (435/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo","-p4"] as (["foo"],[4]) (147 mutations) [opt-env-conf-test] coverage (436/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as "bar":3 (91 mutations) [opt-env-conf-test] coverage (456/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","--port","4"] as (["--port","4"],[]):1 (124 mutations) [opt-env-conf-test] coverage (460/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as Nothing:3 (102 mutations) [opt-env-conf-test] coverage (463/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--no-example"] as False:1 (128 mutations) [opt-env-conf-test] coverage (457/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vvv"] as ([],3):1 (145 mutations) [opt-env-conf-test] coverage (431/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","True")] as True:1 (121 mutations) [opt-env-conf-test] coverage (452/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port=2","-p3"] as ([],[2,3]):1 (156 mutations) [opt-env-conf-test] coverage (432/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","False")] as False:2 (121 mutations) [opt-env-conf-test] coverage (433/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","b","-v"] as (["a","b"],3):1 (159 mutations) [opt-env-conf-test] coverage (461/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-vv","b","-v","c"] as (["a","b","c"],5):1 (167 mutations) [opt-env-conf-test] coverage (459/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as Nothing:2 (135 mutations) [opt-env-conf-test] coverage (434/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","foo"] as Just ("foo",Nothing):1 (173 mutations) [opt-env-conf-test] coverage (451/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as Nothing:1 (129 mutations) [opt-env-conf-test] coverage (454/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["arg"] as Right (Just "arg") (131 mutations) [opt-env-conf-test] coverage (424/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as True:1 (104 mutations) [opt-env-conf-test] coverage (428/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","False")] as False:3 (121 mutations) [opt-env-conf-test] coverage (449/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vvf","foo","-v"] as (3,"foo") (174 mutations) [opt-env-conf-test] coverage (430/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vf","foo"] as (["foo"],1) (162 mutations) [opt-env-conf-test] coverage (450/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--bash-completion-script"] as Left True:1 (96 mutations) [opt-env-conf-test] coverage (442/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as ("--foo","bar") (109 mutations) [opt-env-conf-test] coverage (453/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-w","foo"] as (Just "foo",True):1 (154 mutations) [opt-env-conf-test] coverage (427/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses configuration Just (fromList [("hi",String "ho")]) as Just "ho" (97 mutations) [opt-env-conf-test] coverage (426/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","'c'","--bar","'d'"] as ('c','d') (136 mutations) [opt-env-conf-test] coverage (429/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["run","--foo","bar"] as "bar" (144 mutations) [opt-env-conf-test] coverage (464/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as (True,"bar"):1 (118 mutations) [opt-env-conf-test] coverage (373/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--watch","foo"] as (Just "foo",True):1 (153 mutations) [opt-env-conf-test] coverage (423/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","foo"] as Just ("foo",Nothing) (158 mutations) [opt-env-conf-test] coverage (425/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","True")] as True:2 (121 mutations) [opt-env-conf-test] coverage (422/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--example"] as True:1 (128 mutations) [opt-env-conf-test] coverage (466/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("ALTERNATIVE","True")] as True:3 (121 mutations) [opt-env-conf-test] coverage (483/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-vvf","foo"] as (2,"foo") (174 mutations) [opt-env-conf-test] coverage (465/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar"] as ("bar",True) (136 mutations) [opt-env-conf-test] coverage (473/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p1","--port","2"] as ([],[1,2]):1 (157 mutations) [opt-env-conf-test] coverage (467/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["True"] as True (95 mutations) [opt-env-conf-test] coverage (481/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--file=foo"] as "foo" (77 mutations) [opt-env-conf-test] coverage (474/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-v","b","-v"] as (["a","b"],4):1 (140 mutations) [opt-env-conf-test] coverage (482/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo","--watch"] as (Just "foo",True):1 (153 mutations) [opt-env-conf-test] coverage (479/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["add","hi"] as "hi" (95 mutations) [opt-env-conf-test] coverage (475/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","False")] as False:3 (121 mutations) [opt-env-conf-test] coverage (477/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-v"] as 1 (108 mutations) [opt-env-conf-test] coverage (480/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","-p","2"] as (["-p","2"],[]):1 (124 mutations) [opt-env-conf-test] coverage (468/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-ffoo"] as "foo" (92 mutations) [opt-env-conf-test] coverage (469/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["a","--verbose","-v","-v","b","-v","c"] as (["a","b","c"],4):1 (158 mutations) [opt-env-conf-test] coverage (476/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p7","foo"] as (["foo"],[7]):1 (163 mutations) [opt-env-conf-test] coverage (484/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar","-f","quux"] as ["bar","quux"] (143 mutations) [opt-env-conf-test] coverage (472/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as False:2 (70 mutations) [opt-env-conf-test] coverage (478/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses environment [("EXAMPLE","True")] as True:3 (121 mutations) [opt-env-conf-test] coverage (485/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["run1","--foo","bar"] as "bar":1 (144 mutations) [opt-env-conf-test] coverage (471/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-v","--"] as (["--"],1):1 (154 mutations) [opt-env-conf-test] coverage (487/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-p1"] as ([],[1]):1 (149 mutations) [opt-env-conf-test] coverage (440/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port","3"] as ([],[3]):1 (140 mutations) [opt-env-conf-test] coverage (493/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","bar","--foo","quux"] as ["bar","quux"] (120 mutations) [opt-env-conf-test] coverage (470/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--example"] as Just True (128 mutations) [opt-env-conf-test] coverage (486/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["one"] as '1' (29 mutations) [opt-env-conf-test] coverage (448/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["-f","bar","--foo","quux"] as ["bar","quux"] (143 mutations) [opt-env-conf-test] coverage (491/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses configuration Nothing as Nothing (88 mutations) [opt-env-conf-test] coverage (511/799): OptEnvConf\.RunSpec.runParser.RequireCapability.cannot run the setting parser if the capability is available (50 mutations) [opt-env-conf-test] coverage (492/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--foo","--bar"] as "--bar" (94 mutations) [opt-env-conf-test] coverage (510/799): OptEnvConf\.RunSpec.runParser.Setting.can parse a single option (91 mutations) [opt-env-conf-test] coverage (500/799): OptEnvConf\.RunSpec.runParser.pure.can parse a pure value from anything (7 mutations) [opt-env-conf-test] coverage (506/799): OptEnvConf\.RunSpec.runParser.Setting.can parse a single env var (63 mutations) [opt-env-conf-test] coverage (505/799): OptEnvConf\.RunSpec.runParser.Setting.can parse a single arg (86 mutations) [opt-env-conf-test] coverage (508/799): OptEnvConf\.RunSpec.runParser.Setting.can parse a many of the same option (120 mutations) [opt-env-conf-test] coverage (509/799): OptEnvConf\.RunSpec.runParser.Setting.can parse a single config value (73 mutations) [opt-env-conf-test] coverage (507/799): OptEnvConf\.RunSpec.runParser.Setting.parses Null as the default value (66 mutations) [opt-env-conf-test] coverage (494/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--port","9","quux"] as (["quux"],[9]):1 (162 mutations) [opt-env-conf-test] coverage (501/799): OptEnvConf\.RunSpec.runParser.withFirstYamlConfig.can parse without any arguments (107 mutations) [opt-env-conf-test] coverage (495/799): OptEnvConf\.RunSpec.runParser.MapIO.can run an IO action on the result of a parser (11 mutations) [opt-env-conf-test] coverage (513/799): OptEnvConf\.RunSpec.runParser.RequireCapability.can run the setting parser if the capability is available (69 mutations) [opt-env-conf-test] coverage (499/799): OptEnvConf\.RunSpec.runParser.Many.can pass many args (97 mutations) [opt-env-conf-test] coverage (502/799): OptEnvConf\.RunSpec.runParser.<*>.can parse two values with ap (9 mutations) [opt-env-conf-test] coverage (527/799): OptEnvConf\.CompletionSpec.file and directory completion.directoryPathSetting.carries the description through to directory completions (56 mutations) [opt-env-conf-test] coverage (524/799): OptEnvConf\.CompletionSpec.file and directory completion.directoryPathSetting.completes only directories after a directory option's dashed (97 mutations) [opt-env-conf-test] coverage (529/799): OptEnvConf\.CompletionSpec.file and directory completion.combined with other settings.includes directory completions alongside other options (111 mutations) [opt-env-conf-test] coverage (496/799): OptEnvConf\.RunSpec.runParser.Alt.can parse a Right value with Alt (18 mutations) [opt-env-conf-test] coverage (504/799): OptEnvConf\.RunSpec.runParser.Empty.can fail to parse an empty value (27 mutations) [opt-env-conf-test] coverage (497/799): OptEnvConf\.RunSpec.runParser.Alt.can parse a Left value with Alt (26 mutations) [opt-env-conf-test] coverage (531/799): OptEnvConf\.CompletionSpec.file and directory completion.combined with other settings.completes file option value first, then other options (114 mutations) [opt-env-conf-test] coverage (528/799): OptEnvConf\.CompletionSpec.file and directory completion.combined with other settings.includes file completions alongside other options (114 mutations) [opt-env-conf-test] coverage (526/799): OptEnvConf\.CompletionSpec.file and directory completion.directoryPathSetting.directories are not final (56 mutations) [opt-env-conf-test] coverage (525/799): OptEnvConf\.CompletionSpec.file and directory completion.directoryPathSetting.never includes files (56 mutations) [opt-env-conf-test] coverage (498/799): OptEnvConf\.RunSpec.runParser.WithConfig.can replace the config object (74 mutations) [opt-env-conf-test] coverage (530/799): OptEnvConf\.CompletionSpec.file and directory completion.combined with other settings.completes directory option value first, then other options (111 mutations) [opt-env-conf-test] coverage (503/799): OptEnvConf\.RunSpec.runParser.subEnv.can prefix an env var parser (69 mutations) [opt-env-conf-test] coverage (532/799): OptEnvConf\.CompletionSpec.file and directory completion.combined with other settings.completes directory option value alongside default command with argument (133 mutations) [opt-env-conf-test] coverage (534/799): OptEnvConf\.CompletionSpec.zsh.produces the same zsh completion script (2 mutations) [opt-env-conf-test] coverage (522/799): OptEnvConf\.CompletionSpec.file and directory completion.filePathSetting.carries the description through to file completions (59 mutations) [opt-env-conf-test] coverage (516/799): OptEnvConf\.RunSpec.runParser.fmap.can parse a mapped value from anything (7 mutations) [opt-env-conf-test] coverage (533/799): OptEnvConf\.CompletionSpec.fish.produces the same fish completion script (2 mutations) [opt-env-conf-test] coverage (520/799): OptEnvConf\.CompletionSpec.file and directory completion.filePathSetting.directories end in / and files do not (59 mutations) [opt-env-conf-test] coverage (490/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["foo","-p4"] as (["foo"],[4]):1 (151 mutations) [opt-env-conf-test] coverage (489/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","--port=3"] as (["--port=3"],[]):1 (124 mutations) [opt-env-conf-test] coverage (488/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args ["--","-v"] as (["-v"],0):1 (128 mutations) [opt-env-conf-test] coverage (523/799): OptEnvConf\.CompletionSpec.file and directory completion.directoryPathSetting.completes only directories for a directory argument (56 mutations) [opt-env-conf-test] coverage (518/799): OptEnvConf\.CompletionSpec.file and directory completion.filePathSetting.completes files and directories after a file option's dashed (100 mutations) [opt-env-conf-test] coverage (521/799): OptEnvConf\.CompletionSpec.file and directory completion.filePathSetting.files are final and directories are not final (59 mutations) [opt-env-conf-test] coverage (517/799): OptEnvConf\.CompletionSpec.file and directory completion.filePathSetting.completes files and directories for a file argument (59 mutations) [opt-env-conf-test] coverage (519/799): OptEnvConf\.CompletionSpec.file and directory completion.filePathSetting.filters by prefix (68 mutations) [opt-env-conf-test] coverage (536/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.hidden settings.does not suggest hidden switches (39 mutations) [opt-env-conf-test] coverage (537/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.hidden settings.does not suggest hidden options (44 mutations) [opt-env-conf-test] coverage (514/799): OptEnvConf\.RunSpec.runParser.RequireCapability.cannot run the check parser if the capability is not available (17 mutations) [opt-env-conf-test] coverage (535/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a switch from nothing (34 mutations) [opt-env-conf-test] coverage (515/799): OptEnvConf\.RunSpec.runParser.RequireCapability.can run the check parser if the capability is available (22 mutations) [opt-env-conf-test] coverage (541/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.nested commands.completes nested default commands (60 mutations) [opt-env-conf-test] coverage (512/799): OptEnvConf\.RunSpec.runParser.RequireCapability.still runs the below parser when a capability is missing for the check parser (19 mutations) [opt-env-conf-test] coverage (540/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.nested commands.filters sub-commands by prefix (21 mutations) [opt-env-conf-test] coverage (542/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.nested commands.completes top-level commands (9 mutations) [opt-env-conf-test] coverage (543/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial long option prefix with multiple matches.filters options by a longer prefix matching one (38 mutations) [opt-env-conf-test] coverage (544/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial long option prefix with multiple matches.filters options by a short prefix matching multiple (38 mutations) [opt-env-conf-test] coverage (547/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many with other parsers.completes both after consuming one many-option (86 mutations) [opt-env-conf-test] coverage (546/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many with other parsers.completes many switches combined with a command (51 mutations) [opt-env-conf-test] coverage (548/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many with other parsers.completes both many and a following switch (51 mutations) [opt-env-conf-test] coverage (545/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many with other parsers.completes commands after consuming many switches (79 mutations) [opt-env-conf-test] coverage (539/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.nested commands.completes sub-commands after selecting a top-level command (21 mutations) [opt-env-conf-test] coverage (551/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.option with different dashed in args.does not suggest an option when a different dashed is in the args (78 mutations) [opt-env-conf-test] coverage (549/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a long option's dashed (39 mutations) [opt-env-conf-test] coverage (550/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a long switch from a double dash (33 mutations) [opt-env-conf-test] coverage (560/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.default command parser failure.falls back to explicit commands when default command parser fails (43 mutations) [opt-env-conf-test] coverage (558/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.folded short switches.can complete after a folded short switch is consumed (61 mutations) [opt-env-conf-test] coverage (559/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.folded short switches.no longer suggests a switch consumed via folding (70 mutations) [opt-env-conf-test] coverage (562/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.multiple arguments.completes the second argument after the first (47 mutations) [opt-env-conf-test] coverage (563/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.optional.completes through an optional parser (55 mutations) [opt-env-conf-test] coverage (561/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.multiple arguments.completes both arguments when none have been typed (36 mutations) [opt-env-conf-test] coverage (564/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.optional.completes an optional with an applicative (71 mutations) [opt-env-conf-test] coverage (566/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many.can complete repeated options (80 mutations) [opt-env-conf-test] coverage (565/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.optional.completes the second part when the optional is skipped (70 mutations) [opt-env-conf-test] coverage (567/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many.can still complete after consuming one (61 mutations) [opt-env-conf-test] coverage (568/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many.can complete repeated options after one has already been parsed (97 mutations) [opt-env-conf-test] coverage (569/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many.can complete repeated switches (38 mutations) [opt-env-conf-test] coverage (570/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many.can still complete after consuming two (62 mutations) [opt-env-conf-test] coverage (571/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.no longer suggests an option that has already been parsed (78 mutations) [opt-env-conf-test] coverage (572/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.withDefault.still suggests the option when it has a default (53 mutations) [opt-env-conf-test] coverage (573/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.withDefault.completes the underlying parser (87 mutations) [opt-env-conf-test] coverage (574/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.check.completes through a mapIO (33 mutations) [opt-env-conf-test] coverage (576/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.empty parser.produces no completions for empty (0 mutations) [opt-env-conf-test] coverage (577/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.allOrNothing.completes normally inside allOrNothing (43 mutations) [opt-env-conf-test] coverage (575/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.check.completes through a checkMapEither (31 mutations) [opt-env-conf-test] coverage (579/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.deeply nested parsers.completes through optional + many + applicative (84 mutations) [opt-env-conf-test] coverage (578/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.allOrNothing.still suggests the remaining option after one is consumed (75 mutations) [opt-env-conf-test] coverage (581/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a file argument (32 mutations) [opt-env-conf-test] coverage (580/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.deeply nested parsers.completes correctly after all optional+many consumed (138 mutations) [opt-env-conf-test] coverage (583/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.argument completion with dashed values.should only complete the second argument after a dashed first argument (52 mutations) [opt-env-conf-test] coverage (582/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a directory argument (32 mutations) [opt-env-conf-test] coverage (584/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.argument completion with dashed values.should not offer the argument completer after a dashed value is consumed (41 mutations) [opt-env-conf-test] coverage (585/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete both switches of a tuple (38 mutations) [opt-env-conf-test] coverage (586/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many edge cases.handles many where the inner parser fails (3 mutations) [opt-env-conf-test] coverage (587/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many edge cases.returns first iteration completions when recursive call fails (29 mutations) [opt-env-conf-test] coverage (588/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.withConfig.completes the config file value along with main parser suggestions (81 mutations) [opt-env-conf-test] coverage (589/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.withConfig.completes the config file option together with the main parser (45 mutations) [opt-env-conf-test] coverage (591/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.withConfig.completes the main parser after the config option is consumed (89 mutations) [opt-env-conf-test] coverage (592/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete both switches of an either wrapped in optionals (55 mutations) [opt-env-conf-test] coverage (590/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.withConfig.completes the main parser through withConfig (37 mutations) [opt-env-conf-test] coverage (594/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial argument completion.filters argument values by typed prefix (31 mutations) [opt-env-conf-test] coverage (596/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.applicative branch failures.returns nothing when first applicative branch fails (20 mutations) [opt-env-conf-test] coverage (593/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.no longer suggests an argument that has already been parsed (58 mutations) [opt-env-conf-test] coverage (595/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial argument completion.filters argument values by a different prefix (31 mutations) [opt-env-conf-test] coverage (598/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.no longer suggests a switch that has already been parsed (58 mutations) [opt-env-conf-test] coverage (597/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.applicative branch failures.returns nothing when second applicative branch fails (35 mutations) [opt-env-conf-test] coverage (601/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands merged via alternative.completes commands from both sides of an alternative (25 mutations) [opt-env-conf-test] coverage (599/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.multiple commands with shared options.does not leak options from other commands (52 mutations) [opt-env-conf-test] coverage (600/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.multiple commands with shared options.completes options in the selected command only (52 mutations) [opt-env-conf-test] coverage (602/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion after a command.can complete a command's long option (91 mutations) [opt-env-conf-test] coverage (605/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion after a command.can complete a command's short switch (54 mutations) [opt-env-conf-test] coverage (604/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion after a command.can complete a command's short option (102 mutations) [opt-env-conf-test] coverage (603/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion after a command.can complete a command's long switch from a single dash (52 mutations) [opt-env-conf-test] coverage (607/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion after a command.can complete a command with a switch (53 mutations) [opt-env-conf-test] coverage (606/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion after a command.can complete a command's long switch from a double dash (52 mutations) [opt-env-conf-test] coverage (609/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.alternative branch failures.returns no completions when both alternatives fail (31 mutations) [opt-env-conf-test] coverage (608/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.alternative branch failures.restores state when first branch fails in an alternative (66 mutations) [opt-env-conf-test] coverage (610/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.alternative branch failures.returns first branch completions when second branch fails (66 mutations) [opt-env-conf-test] coverage (611/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a long switch from a single dash (33 mutations) [opt-env-conf-test] coverage (612/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a short option with a separate arg (83 mutations) [opt-env-conf-test] coverage (614/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many with partial values.filters many option values by prefix (80 mutations) [opt-env-conf-test] coverage (615/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a file option (73 mutations) [opt-env-conf-test] coverage (613/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.many with partial values.filters many option values by prefix after one is consumed (97 mutations) [opt-env-conf-test] coverage (616/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.short option shorthand.completes after a short option consumed in shorthand (74 mutations) [opt-env-conf-test] coverage (620/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with options inside.completes a command's many options after one is consumed (97 mutations) [opt-env-conf-test] coverage (617/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial option value completion.filters option values by typed prefix (72 mutations) [opt-env-conf-test] coverage (622/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.arguments after double dash.consumes -- as the argument value (41 mutations) [opt-env-conf-test] coverage (619/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with options inside.completes a command's many options (99 mutations) [opt-env-conf-test] coverage (618/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial option value completion.returns all option values when prefix is empty (72 mutations) [opt-env-conf-test] coverage (621/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.arguments after double dash.suggests the switch even after -- (known bug) (62 mutations) [opt-env-conf-test] coverage (624/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete both switches of a tuple, with a prefix (38 mutations) [opt-env-conf-test] coverage (623/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial argument completion after consuming earlier args.filters the second argument's completer by prefix after the first is consumed (47 mutations) [opt-env-conf-test] coverage (625/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes the default command's argument when no command is given (44 mutations) [opt-env-conf-test] coverage (627/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes the default command's option value when no command is given (102 mutations) [opt-env-conf-test] coverage (626/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.still filters commands by prefix when there is a default (17 mutations) [opt-env-conf-test] coverage (630/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.still lists all commands when there is a default (17 mutations) [opt-env-conf-test] coverage (629/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes both commands and the default command's switch (48 mutations) [opt-env-conf-test] coverage (628/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes the default command's option when no command is given (53 mutations) [opt-env-conf-test] coverage (631/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes inside the default command after consuming its switch (87 mutations) [opt-env-conf-test] coverage (632/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes the default command's switch when no command is given (47 mutations) [opt-env-conf-test] coverage (634/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.mixed arguments and options.can complete an option after a positional argument (52 mutations) [opt-env-conf-test] coverage (633/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with a default command.completes inside the default command after consuming its option (109 mutations) [opt-env-conf-test] coverage (635/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.mixed arguments and options.can complete a positional after an option (66 mutations) [opt-env-conf-test] coverage (637/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands.can complete a command argument (9 mutations) [opt-env-conf-test] coverage (636/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands.can complete a command argument when it's been partially provided (9 mutations) [opt-env-conf-test] coverage (639/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.enableDisableSwitch.completes the documented dummy flag (69 mutations) [opt-env-conf-test] coverage (638/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.enableDisableSwitch.filters the documented flag by prefix (69 mutations) [opt-env-conf-test] coverage (556/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion at a middle index.filters completions when cursor word narrows the match (38 mutations) [opt-env-conf-test] coverage (557/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.completion at a middle index.completes the value of an option at its value position with a matching prefix (83 mutations) [opt-env-conf-test] coverage (554/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a short switch from a single dash (35 mutations) [opt-env-conf-test] coverage (555/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.settings with only env or conf.does not error on env-only settings combined with arg settings (42 mutations) [opt-env-conf-test] coverage (552/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.some.can still complete after consuming one (61 mutations) [opt-env-conf-test] coverage (439/799): OptEnvConf\.RunSpec.runParser.Unit tests.parses args [] as "b" (17 mutations) [opt-env-conf-test] coverage (553/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.some.can complete at least one switch (38 mutations) [opt-env-conf-test] coverage (538/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.select.completes through a select (34 mutations) [opt-env-conf-test] coverage (667/799): OptEnvConf\.CompleterSpec.filePath.can complete "\." to ["\.hidden\.txt","\.hidden/"] (38 mutations) [opt-env-conf-test] coverage (669/799): OptEnvConf\.CompleterSpec.filePath.can complete "\./\./" to ["\./\./foo\.txt","\./\./config\.yaml","\./\./bar/"] (29 mutations) [opt-env-conf-test] coverage (671/799): OptEnvConf\.CompleterSpec.filePath.can complete "\./bar" to ["\./bar/quux\.txt","\./bar/","\./bar/deep/"] (38 mutations) [opt-env-conf-test] coverage (672/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/" to ["bar/quux\.txt","bar/deep/"] (37 mutations) [opt-env-conf-test] coverage (668/799): OptEnvConf\.CompleterSpec.filePath.can complete "\./" to ["\./foo\.txt","\./config\.yaml","\./bar/"] (29 mutations) [opt-env-conf-test] coverage (670/799): OptEnvConf\.CompleterSpec.filePath.can complete "\./\." to ["\./\.hidden\.txt","\./\.hidden/"] (38 mutations) [opt-env-conf-test] coverage (673/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/d" to ["bar/deep/"] (44 mutations) [opt-env-conf-test] coverage (676/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/q" to ["bar/quux\.txt"] (44 mutations) [opt-env-conf-test] coverage (675/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/deep/" to ["bar/deep/gold\.txt"] (37 mutations) [opt-env-conf-test] coverage (674/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/deep" to ["bar/deep/gold\.txt","bar/deep/"] (44 mutations) [opt-env-conf-test] coverage (677/799): OptEnvConf\.CompleterSpec.filePath.can complete "\.\." to parent directory contents (41 mutations) [opt-env-conf-test] coverage (679/799): OptEnvConf\.CompleterSpec.filePath.can complete "\.\./f" to matching parent files (46 mutations) [opt-env-conf-test] coverage (680/799): OptEnvConf\.CompleterSpec.filePath.can complete "\.\./bar/" to sibling dir contents (44 mutations) [opt-env-conf-test] coverage (678/799): OptEnvConf\.CompleterSpec.filePath.can complete "\.\./" to parent directory contents (47 mutations) [opt-env-conf-test] coverage (682/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/\.\./f" to matching files (48 mutations) [opt-env-conf-test] coverage (681/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar/\.\./" to current dir contents (49 mutations) [opt-env-conf-test] coverage (683/799): OptEnvConf\.CompleterSpec.filePath.can complete "\.\./bar/deep/\.\./" to bar/ contents (48 mutations) [opt-env-conf-test] coverage (684/799): OptEnvConf\.CompleterSpec.filePath.can complete absolute paths (38 mutations) [opt-env-conf-test] coverage (685/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "" to ["bar/"] (26 mutations) [opt-env-conf-test] coverage (686/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "b" to ["bar/"] (41 mutations) [opt-env-conf-test] coverage (687/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "f" to [] (40 mutations) [opt-env-conf-test] coverage (688/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\." to ["\.hidden/"] (38 mutations) [opt-env-conf-test] coverage (689/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\./" to ["\./bar/"] (26 mutations) [opt-env-conf-test] coverage (690/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\./\." to ["\./\.hidden/"] (38 mutations) [opt-env-conf-test] coverage (691/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\./\./" to ["\./\./bar/"] (26 mutations) [opt-env-conf-test] coverage (692/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\./\." to ["\./\.hidden/"]:1 (38 mutations) [opt-env-conf-test] coverage (693/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\./bar" to ["\./bar/","\./bar/deep/"] (41 mutations) [opt-env-conf-test] coverage (694/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "bar/" to ["bar/","bar/deep/"] (41 mutations) [opt-env-conf-test] coverage (697/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\.\." to parent directories (38 mutations) [opt-env-conf-test] coverage (696/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "bar/deep" to ["bar/deep/"] (47 mutations) [opt-env-conf-test] coverage (695/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "bar/d" to ["bar/deep/"] (47 mutations) [opt-env-conf-test] coverage (700/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "bar/\.\./" to current dir directories (46 mutations) [opt-env-conf-test] coverage (699/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\.\./b" to matching parent directories (49 mutations) [opt-env-conf-test] coverage (698/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "\.\./" to parent directories (44 mutations) [opt-env-conf-test] coverage (703/799): OptEnvConf\.CompleterSpec.filePathWithExtension.can complete "c" to ["config\.yaml"] (43 mutations) [opt-env-conf-test] coverage (702/799): OptEnvConf\.CompleterSpec.filePathWithExtension.can complete "" to ["config\.yaml","bar/"] (35 mutations) [opt-env-conf-test] coverage (701/799): OptEnvConf\.CompleterSpec.directoryPath.can complete "bar/\.\./b" to matching directories (51 mutations) [opt-env-conf-test] coverage (704/799): OptEnvConf\.CompleterSpec.filePathWithExtension.can complete "b" to ["bar/"] (41 mutations) [opt-env-conf-test] coverage (705/799): OptEnvConf\.CompleterSpec.filePathWithExtension.can complete "bar" to ["bar/","bar/deep/"] (44 mutations) [opt-env-conf-test] coverage (707/799): OptEnvConf\.CompleterSpec.filePathWithExtensions.can complete "bar/" to ["bar/quux\.txt","bar/deep/"] (43 mutations) [opt-env-conf-test] coverage (706/799): OptEnvConf\.CompleterSpec.filePathWithExtensions.can complete "" to ["foo\.txt","config\.yaml","bar/"] (35 mutations) [opt-env-conf-test] coverage (708/799): OptEnvConf\.ReaderSpec.maybeReader.can parse a bool using this example reader (2 mutations) [opt-env-conf-test] coverage (709/799): OptEnvConf\.ReaderSpec.viaStringCodec.can parse a string via its string codec (0 mutations) [opt-env-conf-test] coverage (710/799): OptEnvConf\.ReaderSpec.commaSeparated.can parse these two ints (2 mutations) [opt-env-conf-test] coverage (712/799): OptEnvConf\.ReaderSpec.parseCommaSeparated.roundtrips with renderCommaSeparated starting from Strings (0 mutations) [opt-env-conf-test] coverage (711/799): OptEnvConf\.ReaderSpec.renderCommaSeparated.escapes commas and backslashes (0 mutations) [opt-env-conf-test] coverage (713/799): OptEnvConf\.ReaderSpec.parseCommaSeparated.roundtrips with renderCommaSeparated starting from lists (0 mutations) [opt-env-conf-test] coverage (714/799): OptEnvConf\.ReaderSpec.commaSeparatedSet.can parse these two ints (2 mutations) [opt-env-conf-test] coverage (715/799): OptEnvConf\.ReaderSpec.commaSeparatedList.can parse these two ints (2 mutations) [opt-env-conf-test] coverage (716/799): OptEnvConf\.ArgsSpec.consumeSwitch.consumes a long switch if there are no other args (24 mutations) [opt-env-conf-test] coverage (718/799): OptEnvConf\.ArgsSpec.consumeSwitch.consumes a short switch if there are no other args (25 mutations) [opt-env-conf-test] coverage (717/799): OptEnvConf\.ArgsSpec.consumeSwitch.consumes a folded switch at the front first (34 mutations) [opt-env-conf-test] coverage (720/799): OptEnvConf\.ArgsSpec.consumeSwitch.fails to consume if there are no arguments (2 mutations) [opt-env-conf-test] coverage (719/799): OptEnvConf\.ArgsSpec.consumeSwitch.fails to consume if there are no dasheds (35 mutations) [opt-env-conf-test] coverage (722/799): OptEnvConf\.ArgsSpec.consumeSwitch.does not consume a mismatched switch (23 mutations) [opt-env-conf-test] coverage (721/799): OptEnvConf\.ArgsSpec.consumeSwitch.consumes a switch at the front first (25 mutations) [opt-env-conf-test] coverage (725/799): OptEnvConf\.ArgsSpec.consumeArgument.consumes any argument after a double-dash as an argument (34 mutations) [opt-env-conf-test] coverage (723/799): OptEnvConf\.ArgsSpec.consumeArgument.consumes a plain argument when there is one (12 mutations) [opt-env-conf-test] coverage (663/799): OptEnvConf\.CompleterSpec.filePath.can complete "b" to ["bar/"] (38 mutations) [opt-env-conf-test] coverage (726/799): OptEnvConf\.ArgsSpec.consumeArgument.skips dead arguments (52 mutations) [opt-env-conf-test] coverage (727/799): OptEnvConf\.ArgsSpec.consumeArgument.tries to consume dashed argument followed by a live argument (43 mutations) [opt-env-conf-test] coverage (730/799): OptEnvConf\.ArgsSpec.consumeArgument.tries to ignore this value that looks like an option value (33 mutations) [opt-env-conf-test] coverage (729/799): OptEnvConf\.ArgsSpec.consumeArgument.tries to consume dashed argument followed by a dead argument (32 mutations) [opt-env-conf-test] coverage (728/799): OptEnvConf\.ArgsSpec.consumeArgument.consumes a bare double-dash if it's the last argument (29 mutations) [opt-env-conf-test] coverage (665/799): OptEnvConf\.CompleterSpec.filePath.can complete "c" to ["config\.yaml"] (38 mutations) [opt-env-conf-test] coverage (661/799): OptEnvConf\.CompleterSpec.filePath.can complete "" to ["foo\.txt","config\.yaml","bar/"] (29 mutations) [opt-env-conf-test] coverage (731/799): OptEnvConf\.ArgsSpec.parseArg.roundtrips with renderArg (0 mutations) [opt-env-conf-test] coverage (662/799): OptEnvConf\.CompleterSpec.filePath.can complete "f" to ["foo\.txt"] (38 mutations) [opt-env-conf-test] coverage (732/799): OptEnvConf\.ArgsSpec.parseArg.produces valid args (12 mutations) [opt-env-conf-test] coverage (733/799): OptEnvConf\.ArgsSpec.renderDashed.roundtrips with parseArg for long dashed (3 mutations) [opt-env-conf-test] coverage (734/799): OptEnvConf\.ArgsSpec.renderDashed.roundtrips with parseArg for short dashed (6 mutations) [opt-env-conf-test] coverage (660/799): OptEnvConf\.NonDetSpec.runNonDetT.can recover from underlying errors (0 mutations) [opt-env-conf-test] coverage (657/799): OptEnvConf\.CompletionSpec.bash.produces the same bash completion script (2 mutations) [opt-env-conf-test] coverage (656/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.argument completer at end.offers the argument completer at the end after a switch is consumed (66 mutations) [opt-env-conf-test] coverage (655/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.argument completer at end.does not offer option completer when not at end of args (81 mutations) [opt-env-conf-test] coverage (664/799): OptEnvConf\.CompleterSpec.filePath.can complete "bar" to ["bar/quux\.txt","bar/","bar/deep/"] (38 mutations) [opt-env-conf-test] coverage (654/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a long option (72 mutations) [opt-env-conf-test] coverage (651/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.prefix filtering.filters switches by typed prefix (38 mutations) [opt-env-conf-test] coverage (653/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.command not found.returns no completions for an unknown command (19 mutations) [opt-env-conf-test] coverage (650/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.prefix filtering.filters commands by typed prefix (8 mutations) [opt-env-conf-test] coverage (743/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a short option before a long option:1 (39 mutations) [opt-env-conf-test] coverage (742/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a short option (51 mutations) [opt-env-conf-test] coverage (746/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a folded option (48 mutations) [opt-env-conf-test] coverage (744/799): OptEnvConf\.ArgsSpec.consumeOption.does not consume a mismatched option (34 mutations) [opt-env-conf-test] coverage (745/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a long option (36 mutations) [opt-env-conf-test] coverage (747/799): OptEnvConf\.ArgsSpec.consumeOption.fails to consume if there are no dasheds (50 mutations) [opt-env-conf-test] coverage (649/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete both switches of an either (51 mutations) [opt-env-conf-test] coverage (648/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a directory option (73 mutations) [opt-env-conf-test] coverage (748/799): OptEnvConf\.ArgsSpec.consumeOption.fails to consume if there are no arguments (2 mutations) [opt-env-conf-test] coverage (739/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a short option before a long option (37 mutations) [opt-env-conf-test] coverage (740/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a short option in shorthand notation (35 mutations) [opt-env-conf-test] coverage (741/799): OptEnvConf\.ArgsSpec.consumeOption.consumes a long option with an equals sign (22 mutations) [opt-env-conf-test] coverage (737/799): OptEnvConf\.ArgsSpec.parseArgs.parses empty args as an empty arg map (1 mutations) [opt-env-conf-test] coverage (724/799): OptEnvConf\.ArgsSpec.consumeArgument.does not consume anything if there is nothing to consume (3 mutations) [opt-env-conf-test] coverage (652/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.prefix filtering.returns nothing when prefix matches nothing (33 mutations) [opt-env-conf-test] coverage (736/799): OptEnvConf\.ArgsSpec.parseArgs.produces valid Argss for annoying strings (20 mutations) [opt-env-conf-test] coverage (735/799): OptEnvConf\.ArgsSpec.parseArgs.produces valid Args (12 mutations) [opt-env-conf-test] coverage (738/799): OptEnvConf\.ArgsSpec.consumeOption.consumes an option at the front first (51 mutations) [opt-env-conf-test] coverage (659/799): OptEnvConf\.NonDetSpec.runNonDet.can recover from failures with <|> (0 mutations) [opt-env-conf-test] coverage (658/799): OptEnvConf\.NonDetSpec.runNonDet.can guard against previous values (0 mutations) [opt-env-conf-test] coverage (643/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.partial command name with inner option completion.completes a command's options after selecting by prefix (52 mutations) [opt-env-conf-test] coverage (647/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.can complete a short option's dashed (41 mutations) [opt-env-conf-test] coverage (646/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.choice.completes across all choices (51 mutations) [opt-env-conf-test] coverage (644/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.commands with partial option value inside.filters a command's option values by prefix (91 mutations) [opt-env-conf-test] coverage (645/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.pure parser.produces no completions for pure (1 mutations) [opt-env-conf-test] coverage (666/799): OptEnvConf\.CompleterSpec.filePath.can complete "q" to [] (37 mutations) [opt-env-conf-test] coverage (642/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.global options with commands and a default.completes global options and commands together (53 mutations) [opt-env-conf-test] coverage (641/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.global options with commands and a default.completes commands after a global option (72 mutations) [opt-env-conf-test] coverage (752/799): OptEnvConf\.ErrorSpec.renders the read-int-argument error the same as before (126 mutations) [opt-env-conf-test] coverage (754/799): OptEnvConf\.ErrorSpec.renders the leftover-argument error the same as before (32 mutations) [opt-env-conf-test] coverage (640/799): OptEnvConf\.CompletionSpec.pureCompletionQuery.global options with commands and a default.completes the default command's options after a global option (76 mutations) [opt-env-conf-test] coverage (755/799): OptEnvConf\.ErrorSpec.renders the all-or-nothing-relevant error the same as before (211 mutations) [opt-env-conf-test] coverage (757/799): OptEnvConf\.ErrorSpec.renders the missing-options error the same as before (114 mutations) [opt-env-conf-test] coverage (756/799): OptEnvConf\.ErrorSpec.renders the required-command error the same as before (41 mutations) [opt-env-conf-test] coverage (758/799): OptEnvConf\.ErrorSpec.renders the check-failed-checkMaybe error the same as before (92 mutations) [opt-env-conf-test] coverage (753/799): OptEnvConf\.ErrorSpec.renders the read-int-options error the same as before (132 mutations) [opt-env-conf-test] coverage (762/799): OptEnvConf\.ErrorSpec.renders the unreadable-vars error the same as before (92 mutations) [opt-env-conf-test] coverage (759/799): OptEnvConf\.ErrorSpec.renders the typo-switch error the same as before (138 mutations) [opt-env-conf-test] coverage (761/799): OptEnvConf\.ErrorSpec.renders the unrecognised-switch error the same as before (37 mutations) [opt-env-conf-test] coverage (760/799): OptEnvConf\.ErrorSpec.renders the read-int-option error the same as before (129 mutations) [opt-env-conf-test] coverage (763/799): OptEnvConf\.ErrorSpec.renders the unfolding-tombstone-switch error the same as before (184 mutations) [opt-env-conf-test] coverage (767/799): OptEnvConf\.ErrorSpec.renders the unrecognised-command error the same as before (58 mutations) [opt-env-conf-test] coverage (768/799): OptEnvConf\.ErrorSpec.renders the some-none error the same as before (117 mutations) [opt-env-conf-test] coverage (769/799): OptEnvConf\.ErrorSpec.renders the missing-var error the same as before (100 mutations) [opt-env-conf-test] coverage (771/799): OptEnvConf\.ErrorSpec.renders the all-or-nothing error the same as before (210 mutations) [opt-env-conf-test] coverage (770/799): OptEnvConf\.ErrorSpec.renders the missing-option error the same as before (111 mutations) [opt-env-conf-test] coverage (772/799): OptEnvConf\.ErrorSpec.renders the leftover-switch error the same as before (37 mutations) [opt-env-conf-test] coverage (773/799): OptEnvConf\.ErrorSpec.renders the empty error the same as before (32 mutations) [opt-env-conf-test] coverage (774/799): OptEnvConf\.ErrorSpec.renders the check-failed-checkEither error the same as before (90 mutations) [opt-env-conf-test] coverage (775/799): OptEnvConf\.ErrorSpec.renders the missing-vars error the same as before (103 mutations) [opt-env-conf-test] coverage (776/799): OptEnvConf\.ErrorSpec.renders the leftover-option error the same as before (37 mutations) [opt-env-conf-test] coverage (777/799): OptEnvConf\.ErrorSpec.renders the unrecognised-option error the same as before (37 mutations) [opt-env-conf-test] coverage (778/799): OptEnvConf\.ErrorSpec.renders the missing-env error the same as before (100 mutations) [opt-env-conf-test] coverage (750/799): OptEnvConf\.ErrorSpec.renders the typo-option error the same as before (150 mutations) [opt-env-conf-test] coverage (749/799): OptEnvConf\.ErrorSpec.renders the unreadable-var error the same as before (89 mutations) [opt-env-conf-test] coverage (766/799): OptEnvConf\.ErrorSpec.renders the unfolding-tombstone-option error the same as before (179 mutations) [opt-env-conf-test] coverage (764/799): OptEnvConf\.ErrorSpec.renders the empty-choice error the same as before (32 mutations) [opt-env-conf-test] coverage (765/799): OptEnvConf\.ErrorSpec.renders the missing-argument error the same as before (109 mutations) [opt-env-conf-test] coverage (791/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:12 (30 mutations) [opt-env-conf-test] coverage (751/799): OptEnvConf\.ErrorSpec.renders the unrecognised-arg error the same as before (32 mutations) [opt-env-conf-test] coverage (789/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:10 (40 mutations) [opt-env-conf-test] coverage (788/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:9 (96 mutations) [opt-env-conf-test] coverage (779/799): OptEnvConf\.LintSpec.produces the same lint error for this parser (41 mutations) [opt-env-conf-test] coverage (799/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:20 (42 mutations) [opt-env-conf-test] coverage (798/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:19 (47 mutations) [opt-env-conf-test] coverage (790/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:11 (40 mutations) [opt-env-conf-test] coverage (794/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:15 (45 mutations) [opt-env-conf-test] coverage (797/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:18 (41 mutations) [opt-env-conf-test] coverage (793/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:14 (25 mutations) [opt-env-conf-test] coverage (787/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:8 (41 mutations) [opt-env-conf-test] coverage (796/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:17 (41 mutations) [opt-env-conf-test] coverage (786/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:7 (41 mutations) [opt-env-conf-test] coverage (795/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:16 (40 mutations) [opt-env-conf-test] coverage (792/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:13 (44 mutations) [opt-env-conf-test] coverage (782/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:3 (35 mutations) [opt-env-conf-test] coverage (785/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:6 (63 mutations) [opt-env-conf-test] coverage (783/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:4 (47 mutations) [opt-env-conf-test] coverage (784/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:5 (42 mutations) [opt-env-conf-test] coverage (781/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:2 (63 mutations) [opt-env-conf-test] coverage (780/799): OptEnvConf\.LintSpec.produces the same lint error for this parser:1 (96 mutations) [opt-env-conf-test] mutation-nix: running mutations [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (not (null v)) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (False) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (True) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not False && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not True && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (not (null v)) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = True && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && not (elem '.' v) && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = False && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> not (isDigit c) || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && False && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not not ((null v)) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || not (c == '.')) v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || False) v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && True && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || True) v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> False) v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> False || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> not (isDigit c || c == '.')) v [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c && c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True) v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && not (all (\c -> isDigit c || c == '.') v) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && True [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v || all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && True [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = True [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) || elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] @@ -173,7 +173,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go [] = [] [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test] - | isVersion version = [] [opt-env-conf-test] + | True = [] [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:176:9-26 [opt-env-conf-test] @@ -173,7 +173,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go [] = [] [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test] - | isVersion version = [] [opt-env-conf-test] + | not (isVersion version) = [] [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> True || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> False || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:178:36-45 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> not (isDigit c) || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> isDigit c || True) rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> isDigit c || not (c == '.')) rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> True) rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> False) rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> isDigit c && c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:178:36-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> not (isDigit c || c == '.')) rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] @@ -146,14 +146,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  generatedFileComment :: CallStack -> T.Text [opt-env-conf-test]  generatedFileComment cs = [opt-env-conf-test]  let loc = case getCallStack cs of [opt-env-conf-test] - (_, srcLoc) : _ -> [opt-env-conf-test] - packageName (Stack.srcLocPackage srcLoc) [opt-env-conf-test] - <> ":" [opt-env-conf-test] - <> Stack.srcLocFile srcLoc [opt-env-conf-test] - <> ":" [opt-env-conf-test] - <> show (Stack.srcLocStartLine srcLoc) [opt-env-conf-test]  [] -> "unknown" [opt-env-conf-test]  in T.pack $ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] @@ -158,11 +158,7 @@ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  ("# " <>) [opt-env-conf-test] - [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test] - "This file was generated by", [opt-env-conf-test] - loc, [opt-env-conf-test] - "To update this it, run the test with --golden-reset" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Extract just the package name from a GHC package identifier. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] @@ -146,14 +146,13 @@ [opt-env-conf-test]  [opt-env-conf-test]  generatedFileComment :: CallStack -> T.Text [opt-env-conf-test]  generatedFileComment cs = [opt-env-conf-test]  let loc = case getCallStack cs of [opt-env-conf-test]  (_, srcLoc) : _ -> [opt-env-conf-test]  packageName (Stack.srcLocPackage srcLoc) [opt-env-conf-test]  <> ":" [opt-env-conf-test]  <> Stack.srcLocFile srcLoc [opt-env-conf-test]  <> ":" [opt-env-conf-test]  <> show (Stack.srcLocStartLine srcLoc) [opt-env-conf-test] - [] -> "unknown" [opt-env-conf-test]  in T.pack $ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] @@ -158,11 +158,10 @@ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  ("# " <>) [opt-env-conf-test] - [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test]  "This file was generated by", [opt-env-conf-test]  loc, [opt-env-conf-test]  "To update this it, run the test with --golden-reset" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Extract just the package name from a GHC package identifier. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Test.hs:161:13-14 [opt-env-conf-test] @@ -158,11 +158,10 @@ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  ("# " <>) [opt-env-conf-test]  [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test]  "This file was generated by", [opt-env-conf-test]  loc, [opt-env-conf-test] - "To update this it, run the test with --golden-reset" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Extract just the package name from a GHC package identifier. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Test.hs:88:54-62 [opt-env-conf-test] @@ -85,7 +85,7 @@ [opt-env-conf-test]  settingsParserConfTest = parserConfTest settingsParser [opt-env-conf-test]  [opt-env-conf-test]  parserConfTest :: (Show a, Eq a) => Parser a -> JSON.Object -> a -> IO () [opt-env-conf-test] -parserConfTest parser obj = parserTest parser [] [] (Just obj) [opt-env-conf-test] +parserConfTest parser obj = parserTest parser [] [] (Nothing) [opt-env-conf-test]  [opt-env-conf-test]  settingsParserTest :: (Show a, Eq a, HasParser a) => [String] -> [(String, String)] -> Maybe JSON.Object -> a -> IO () [opt-env-conf-test]  settingsParserTest = parserTest settingsParser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] @@ -64,10 +64,9 @@ [opt-env-conf-test]  [opt-env-conf-test]  parserLintTest :: Parser a -> IO () [opt-env-conf-test]  parserLintTest parser = [opt-env-conf-test]  case lintParser parser of [opt-env-conf-test] - Nothing -> pure () [opt-env-conf-test]  Just errs -> [opt-env-conf-test]  expectationFailure $ T.unpack $ renderChunksText With24BitColours $ renderLintErrors errs [opt-env-conf-test]  [opt-env-conf-test]  settingsParserArgsTest :: (Show a, Eq a, HasParser a) => [String] -> a -> IO () [opt-env-conf-test]  settingsParserArgsTest = parserArgsTest settingsParser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] @@ -64,10 +64,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  parserLintTest :: Parser a -> IO () [opt-env-conf-test]  parserLintTest parser = [opt-env-conf-test]  case lintParser parser of [opt-env-conf-test]  Nothing -> pure () [opt-env-conf-test] - Just errs -> [opt-env-conf-test] - expectationFailure $ T.unpack $ renderChunksText With24BitColours $ renderLintErrors errs [opt-env-conf-test]  [opt-env-conf-test]  settingsParserArgsTest :: (Show a, Eq a, HasParser a) => [String] -> a -> IO () [opt-env-conf-test]  settingsParserArgsTest = parserArgsTest settingsParser [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:819:51-71 [opt-env-conf-test] @@ -816,7 +816,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] + [exampleValuesChunks confDocExamples | not (not (null confDocExamples))], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:819:51-71 [opt-env-conf-test] @@ -816,7 +816,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] + [exampleValuesChunks confDocExamples | not (True)], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:819:50-72 [opt-env-conf-test] @@ -816,7 +816,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] + [exampleValuesChunks confDocExamples | not not ((null confDocExamples))], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:819:46-72 [opt-env-conf-test] @@ -816,7 +816,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] + [exampleValuesChunks confDocExamples | True], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:819:50-72 [opt-env-conf-test] @@ -816,7 +816,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] + [exampleValuesChunks confDocExamples | not True], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:819:46-72 [opt-env-conf-test] @@ -816,7 +816,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] + [exampleValuesChunks confDocExamples | not (not (null confDocExamples))], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:819:7-73 [opt-env-conf-test] @@ -816,7 +816,6 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:824:18-42 [opt-env-conf-test] @@ -821,7 +821,6 @@ [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test] - [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:824:18-42 [opt-env-conf-test] @@ -821,7 +821,6 @@ [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test] - [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && not (elem '.' v && all (\c -> isDigit c || c == '.') v) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf-test] @@ -819,11 +819,9 @@ [opt-env-conf-test]  [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:826:17-40 [opt-env-conf-test] @@ -823,7 +823,6 @@ [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test] - [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf-test] @@ -819,11 +819,9 @@ [opt-env-conf-test]  [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [[confValChunk key, ": "] ++ line] [opt-env-conf-test] - ls -> [opt-env-conf-test] - [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:826:17-40 [opt-env-conf-test] @@ -823,7 +823,6 @@ [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test] - [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf-test] @@ -814,16 +814,4 @@ [opt-env-conf-test]  renderConfDoc :: ConfDoc -> [[Chunk]] [opt-env-conf-test]  renderConfDoc ConfDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [[mHelpChunk confDocHelp]], [opt-env-conf-test] - [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test] - [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] - concatMap [opt-env-conf-test] - ( \(key, schema) -> [opt-env-conf-test] - case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [[confValChunk key, ": "] ++ line] [opt-env-conf-test] - ls -> [opt-env-conf-test] - [confValChunk key, ":"] : indent ls [opt-env-conf-test] - ) [opt-env-conf-test] - (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf-test] @@ -814,16 +814,15 @@ [opt-env-conf-test]  renderConfDoc :: ConfDoc -> [[Chunk]] [opt-env-conf-test]  renderConfDoc ConfDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test]  [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:817:5-6 [opt-env-conf-test] @@ -814,16 +814,7 @@ [opt-env-conf-test]  renderConfDoc :: ConfDoc -> [[Chunk]] [opt-env-conf-test]  renderConfDoc ConfDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[mHelpChunk confDocHelp]], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList confDocDefault], [opt-env-conf-test]  [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test] - concatMap [opt-env-conf-test] - ( \(key, schema) -> [opt-env-conf-test] - case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [[confValChunk key, ": "] ++ line] [opt-env-conf-test] - ls -> [opt-env-conf-test] - [confValChunk key, ":"] : indent ls [opt-env-conf-test] - ) [opt-env-conf-test] - (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:769:11-12 [opt-env-conf-test] @@ -766,10 +766,9 @@ [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test] - [ envVarChunksNE envDocVars, [opt-env-conf-test]  [ mMetavarChunk envDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:768:7-8 [opt-env-conf-test] @@ -765,13 +765,7 @@ [opt-env-conf-test]  renderEnvDoc :: EnvDoc -> [[Chunk]] [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks [opt-env-conf-test] - [ envVarChunksNE envDocVars, [opt-env-conf-test] - [ mMetavarChunk envDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test]  [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:768:7-8 [opt-env-conf-test] @@ -765,13 +765,8 @@ [opt-env-conf-test]  renderEnvDoc :: EnvDoc -> [[Chunk]] [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks [opt-env-conf-test] - [ envVarChunksNE envDocVars, [opt-env-conf-test] - [ mMetavarChunk envDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test]  [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:776:50-69 [opt-env-conf-test] @@ -773,7 +773,7 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test] + [exampleValuesChunks envDocExamples | not (True)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:776:49-70 [opt-env-conf-test] @@ -773,7 +773,7 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test] + [exampleValuesChunks envDocExamples | not True] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:776:50-69 [opt-env-conf-test] @@ -773,7 +773,7 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test] + [exampleValuesChunks envDocExamples | not (not (null envDocExamples))] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:776:49-70 [opt-env-conf-test] @@ -773,7 +773,7 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test] + [exampleValuesChunks envDocExamples | not not ((null envDocExamples))] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:769:11-12 [opt-env-conf-test] @@ -766,10 +766,7 @@ [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test] - [ envVarChunksNE envDocVars, [opt-env-conf-test] - [ mMetavarChunk envDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:776:45-70 [opt-env-conf-test] @@ -773,7 +773,7 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test] + [exampleValuesChunks envDocExamples | not (not (null envDocExamples))] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf-test] @@ -765,16 +765,7 @@ [opt-env-conf-test]  renderEnvDoc :: EnvDoc -> [[Chunk]] [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks [opt-env-conf-test] - [ envVarChunksNE envDocVars, [opt-env-conf-test] - [ mMetavarChunk envDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [mHelpChunk envDocHelp] [opt-env-conf-test] - ], [opt-env-conf-test] - [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test]  parserConfDocs = docsToConfDocs . parserDocs [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:776:7-71 [opt-env-conf-test] @@ -773,7 +773,6 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf-test] @@ -765,16 +765,9 @@ [opt-env-conf-test]  renderEnvDoc :: EnvDoc -> [[Chunk]] [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks [opt-env-conf-test] - [ envVarChunksNE envDocVars, [opt-env-conf-test] - [ mMetavarChunk envDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [mHelpChunk envDocHelp] [opt-env-conf-test] - ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test]  [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test]  parserConfDocs = docsToConfDocs . parserDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Test.hs:178:49-57 [opt-env-conf-test] @@ -175,6 +175,6 @@ [opt-env-conf-test]  go ('-' : rest) [opt-env-conf-test]  | isVersion version = [] [opt-env-conf-test]  where [opt-env-conf-test] - version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test] + version = takeWhile (\c -> isDigit c || False) rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test]  isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:727:17-34 [opt-env-conf-test] @@ -724,7 +724,7 @@ [opt-env-conf-test]  [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [ [ mMetavarChunk optDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] + | True [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:725:15-16 [opt-env-conf-test] @@ -722,10 +722,9 @@ [opt-env-conf-test]  [ [ unwordsChunks $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [ [ mMetavarChunk optDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:776:45-70 [opt-env-conf-test] @@ -773,7 +773,7 @@ [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test] + [exampleValuesChunks envDocExamples | True] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:724:13-14 [opt-env-conf-test] @@ -721,12 +721,7 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [ [ mMetavarChunk optDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:724:13-14 [opt-env-conf-test] @@ -721,12 +721,11 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [ [ mMetavarChunk optDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:722:7-8 [opt-env-conf-test] @@ -719,16 +719,7 @@ [opt-env-conf-test]  renderOptDocLong :: OptDoc -> [[Chunk]] [opt-env-conf-test]  renderOptDocLong OptDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks $ [opt-env-conf-test] - concat [opt-env-conf-test] - [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [ [ mMetavarChunk optDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test]  [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:733:50-69 [opt-env-conf-test] @@ -730,7 +730,7 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test] + [exampleValuesChunks optDocExamples | not (True)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:722:7-8 [opt-env-conf-test] @@ -719,16 +719,8 @@ [opt-env-conf-test]  renderOptDocLong :: OptDoc -> [[Chunk]] [opt-env-conf-test]  renderOptDocLong OptDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks $ [opt-env-conf-test] - concat [opt-env-conf-test] - [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [ [ mMetavarChunk optDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test]  [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:733:50-69 [opt-env-conf-test] @@ -730,7 +730,7 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test] + [exampleValuesChunks optDocExamples | not (not (null optDocExamples))] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:733:49-70 [opt-env-conf-test] @@ -730,7 +730,7 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test] + [exampleValuesChunks optDocExamples | not True] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:733:45-70 [opt-env-conf-test] @@ -730,7 +730,7 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test] + [exampleValuesChunks optDocExamples | True] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:733:49-70 [opt-env-conf-test] @@ -730,7 +730,7 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test] + [exampleValuesChunks optDocExamples | not not ((null optDocExamples))] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:768:5-6 [opt-env-conf-test] @@ -765,16 +765,15 @@ [opt-env-conf-test]  renderEnvDoc :: EnvDoc -> [[Chunk]] [opt-env-conf-test]  renderEnvDoc EnvDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test]  [ envVarChunksNE envDocVars, [opt-env-conf-test]  [ mMetavarChunk envDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk envDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList envDocDefault], [opt-env-conf-test] - [exampleValuesChunks envDocExamples | not (null envDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserConfDocs :: Parser a -> AnyDocs ConfDoc [opt-env-conf-test]  parserConfDocs = docsToConfDocs . parserDocs [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:733:7-71 [opt-env-conf-test] @@ -730,7 +730,6 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf-test] @@ -719,19 +719,7 @@ [opt-env-conf-test]  renderOptDocLong :: OptDoc -> [[Chunk]] [opt-env-conf-test]  renderOptDocLong OptDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks $ [opt-env-conf-test] - concat [opt-env-conf-test] - [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [ [ mMetavarChunk optDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [mHelpChunk optDocHelp] [opt-env-conf-test] - ], [opt-env-conf-test] - [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test]  parserEnvDocs = docsToEnvDocs . parserDocs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf-test] @@ -719,19 +719,9 @@ [opt-env-conf-test]  renderOptDocLong :: OptDoc -> [[Chunk]] [opt-env-conf-test]  renderOptDocLong OptDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks $ [opt-env-conf-test] - concat [opt-env-conf-test] - [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [ [ mMetavarChunk optDocMetavar [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [mHelpChunk optDocHelp] [opt-env-conf-test] - ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test]  [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test]  parserEnvDocs = docsToEnvDocs . parserDocs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:722:5-6 [opt-env-conf-test] @@ -719,19 +719,18 @@ [opt-env-conf-test]  renderOptDocLong :: OptDoc -> [[Chunk]] [opt-env-conf-test]  renderOptDocLong OptDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [ [ mMetavarChunk optDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test]  parserEnvDocs = docsToEnvDocs . parserDocs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:632:55-85 [opt-env-conf-test] @@ -629,7 +629,6 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] -renderShortOptDocs progname = unwordsChunks . (\cs -> [[progNameChunk progname], cs]) . fromMaybe [] . go False [opt-env-conf-test]  where [opt-env-conf-test]  withoutNothings = [opt-env-conf-test]  filter [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:632:55-85 [opt-env-conf-test] @@ -629,7 +629,6 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] -renderShortOptDocs progname = unwordsChunks . (\cs -> [[progNameChunk progname], cs]) . fromMaybe [] . go False [opt-env-conf-test]  where [opt-env-conf-test]  withoutNothings = [opt-env-conf-test]  filter [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:632:107-112 [opt-env-conf-test] @@ -629,7 +629,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] -renderShortOptDocs progname = unwordsChunks . (\cs -> [[progNameChunk progname], cs]) . fromMaybe [] . go False [opt-env-conf-test] +renderShortOptDocs progname = unwordsChunks . (\cs -> [[progNameChunk progname], cs]) . fromMaybe [] . go True [opt-env-conf-test]  where [opt-env-conf-test]  withoutNothings = [opt-env-conf-test]  filter [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:637:38-43 [opt-env-conf-test] @@ -634,7 +634,7 @@ [opt-env-conf-test]  withoutNothings = [opt-env-conf-test]  filter [opt-env-conf-test]  ( \case [opt-env-conf-test] - AnyDocsSingle Nothing -> False [opt-env-conf-test] + AnyDocsSingle Nothing -> True [opt-env-conf-test]  AnyDocsAnd [] -> False [opt-env-conf-test]  AnyDocsOr [] -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:638:30-35 [opt-env-conf-test] @@ -635,7 +635,7 @@ [opt-env-conf-test]  filter [opt-env-conf-test]  ( \case [opt-env-conf-test]  AnyDocsSingle Nothing -> False [opt-env-conf-test] - AnyDocsAnd [] -> False [opt-env-conf-test] + AnyDocsAnd [] -> True [opt-env-conf-test]  AnyDocsOr [] -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:733:45-70 [opt-env-conf-test] @@ -730,7 +730,7 @@ [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test]  ], [opt-env-conf-test]  [defaultValueChunks d | d <- maybeToList optDocDefault], [opt-env-conf-test] - [exampleValuesChunks optDocExamples | not (null optDocExamples)] [opt-env-conf-test] + [exampleValuesChunks optDocExamples | not (not (null optDocExamples))] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  parserEnvDocs :: Parser a -> AnyDocs EnvDoc [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:640:18-22 [opt-env-conf-test] @@ -637,7 +637,7 @@ [opt-env-conf-test]  AnyDocsSingle Nothing -> False [opt-env-conf-test]  AnyDocsAnd [] -> False [opt-env-conf-test]  AnyDocsOr [] -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test] + _ -> False [opt-env-conf-test]  ) [opt-env-conf-test]  go :: [opt-env-conf-test]  -- Need parens [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:650:22-38 [opt-env-conf-test] @@ -647,7 +647,7 @@ [opt-env-conf-test]  go b = [opt-env-conf-test]  \case [opt-env-conf-test]  AnyDocsCommands mDefault _ -> case mDefault of [opt-env-conf-test] - Nothing -> Just ["COMMAND"] [opt-env-conf-test] + Nothing -> Nothing [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:639:29-34 [opt-env-conf-test] @@ -636,7 +636,7 @@ [opt-env-conf-test]  ( \case [opt-env-conf-test]  AnyDocsSingle Nothing -> False [opt-env-conf-test]  AnyDocsAnd [] -> False [opt-env-conf-test] - AnyDocsOr [] -> False [opt-env-conf-test] + AnyDocsOr [] -> True [opt-env-conf-test]  _ -> True [opt-env-conf-test]  ) [opt-env-conf-test]  go :: [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf-test] @@ -653,7 +653,7 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test] + cs -> Just $ (if False then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:651:21-39 [opt-env-conf-test] @@ -648,7 +648,7 @@ [opt-env-conf-test]  \case [opt-env-conf-test]  AnyDocsCommands mDefault _ -> case mDefault of [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test] - Just _ -> Just ["[COMMAND]"] [opt-env-conf-test] + Just _ -> Nothing [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:653:29-34 [opt-env-conf-test] @@ -650,7 +650,7 @@ [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test] - case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] + case mapMaybe (go True) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf-test] @@ -650,10 +650,9 @@ [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf-test] @@ -650,10 +650,9 @@ [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:658:29-34 [opt-env-conf-test] @@ -655,7 +655,7 @@ [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test] - case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] + case mapMaybe (go True) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs [opt-env-conf-test]  AnyDocsSingle mOd -> case mOd of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:658:11-79 [opt-env-conf-test] @@ -655,9 +655,8 @@ [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test]  cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs [opt-env-conf-test]  AnyDocsSingle mOd -> case mOd of [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:649:39-39 [opt-env-conf-test] @@ -646,9 +646,8 @@ [opt-env-conf-test]  Maybe [Chunk] [opt-env-conf-test]  go b = [opt-env-conf-test]  \case [opt-env-conf-test]  AnyDocsCommands mDefault _ -> case mDefault of [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test] - Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf-test] @@ -650,10 +650,9 @@ [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] - [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf-test] @@ -662,7 +662,7 @@ [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test]  Just [opt-env-conf-test] - $ ( if isJust optDocDefault [opt-env-conf-test] + $ ( if True [opt-env-conf-test]  then bracketise [opt-env-conf-test]  else id [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:649:39-39 [opt-env-conf-test] @@ -646,9 +646,8 @@ [opt-env-conf-test]  Maybe [Chunk] [opt-env-conf-test]  go b = [opt-env-conf-test]  \case [opt-env-conf-test]  AnyDocsCommands mDefault _ -> case mDefault of [opt-env-conf-test] - Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf-test] @@ -662,7 +662,7 @@ [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test]  Just [opt-env-conf-test] - $ ( if isJust optDocDefault [opt-env-conf-test] + $ ( if not (isJust optDocDefault) [opt-env-conf-test]  then bracketise [opt-env-conf-test]  else id [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:655:20-26 [opt-env-conf-test] @@ -652,7 +652,7 @@ [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] - [c] -> Just c [opt-env-conf-test] + [c] -> Nothing [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf-test] @@ -653,7 +653,7 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test] + cs -> Just $ (if True then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:672:21-38 [opt-env-conf-test] @@ -669,7 +669,7 @@ [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] + | not (optDocTryArgument) [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf-test] @@ -653,7 +653,7 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test] + cs -> Just $ (if not (b) then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:675:21-36 [opt-env-conf-test] @@ -672,7 +672,7 @@ [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test] - | optDocTrySwitch [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:674:19-20 [opt-env-conf-test] @@ -671,9 +671,8 @@ [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test] - | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:675:21-36 [opt-env-conf-test] @@ -672,7 +672,7 @@ [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test] - | optDocTrySwitch [opt-env-conf-test] + | not (optDocTrySwitch) [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:679:25-59 [opt-env-conf-test] @@ -676,7 +676,6 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:681:21-36 [opt-env-conf-test] @@ -678,7 +678,7 @@ [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | optDocTryOption [opt-env-conf-test] + | True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:678:23-24 [opt-env-conf-test] @@ -675,9 +675,7 @@ [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:681:21-36 [opt-env-conf-test] @@ -678,7 +678,7 @@ [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | optDocTryOption [opt-env-conf-test] + | not (optDocTryOption) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:679:25-59 [opt-env-conf-test] @@ -676,7 +676,6 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:678:23-24 [opt-env-conf-test] @@ -675,9 +675,8 @@ [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:677:19-20 [opt-env-conf-test] @@ -674,12 +674,11 @@ [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf-test] @@ -668,19 +668,7 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test] - [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ], [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test] - | optDocTrySwitch [opt-env-conf-test] - ], [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryOption [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test]  orChunk = fore cyan "|" [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:727:17-34 [opt-env-conf-test] @@ -724,7 +724,7 @@ [opt-env-conf-test]  [ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [ [ mMetavarChunk optDocMetavar [opt-env-conf-test]  ] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] + | not (optDocTryArgument) [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [mHelpChunk optDocHelp] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf-test] @@ -668,19 +668,16 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test] - [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test]  orChunk = fore cyan "|" [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:671:17-18 [opt-env-conf-test] @@ -668,19 +668,13 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryOption [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test]  orChunk = fore cyan "|" [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:658:11-79 [opt-env-conf-test] @@ -655,9 +655,8 @@ [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] - cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs [opt-env-conf-test]  AnyDocsSingle mOd -> case mOd of [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf-test] @@ -658,29 +658,28 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs [opt-env-conf-test]  AnyDocsSingle mOd -> case mOd of [opt-env-conf-test] - Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test]  Just [opt-env-conf-test]  $ ( if isJust optDocDefault [opt-env-conf-test]  then bracketise [opt-env-conf-test]  else id [opt-env-conf-test]  ) [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test]  orChunk = fore cyan "|" [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:665:22-42 [opt-env-conf-test] @@ -662,7 +662,7 @@ [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test]  Just [opt-env-conf-test] - $ ( if isJust optDocDefault [opt-env-conf-test] + $ ( if False [opt-env-conf-test]  then bracketise [opt-env-conf-test]  else id [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:672:21-38 [opt-env-conf-test] @@ -669,7 +669,7 @@ [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:671:19-20 [opt-env-conf-test] @@ -668,9 +668,8 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {True} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf-test] @@ -658,29 +658,8 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs [opt-env-conf-test]  AnyDocsSingle mOd -> case mOd of [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test] - Just OptDoc {..} -> [opt-env-conf-test] - Just [opt-env-conf-test] - $ ( if isJust optDocDefault [opt-env-conf-test] - then bracketise [opt-env-conf-test] - else id [opt-env-conf-test] - ) [opt-env-conf-test] - $ unwordsChunks [opt-env-conf-test] - $ concat [opt-env-conf-test] - [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test] - | optDocTryArgument [opt-env-conf-test] - ], [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test] - | optDocTrySwitch [opt-env-conf-test] - ], [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | optDocTryOption [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test]  orChunk = fore cyan "|" [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {False} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {not (..)} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {True} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {False} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {not (..)} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {True} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {False} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:628:16-18 [opt-env-conf-test] @@ -625,7 +625,7 @@ [opt-env-conf-test]  optDocExamples = setDocExamples [opt-env-conf-test]  optDocMetavar = setDocMetavar [opt-env-conf-test]  optDocHelp = setDocHelp [opt-env-conf-test] - pure OptDoc {..} [opt-env-conf-test] + pure OptDoc {not (..)} [opt-env-conf-test]  [opt-env-conf-test]  -- | Render short-form documentation of options [opt-env-conf-test]  renderShortOptDocs :: String -> AnyDocs (Maybe OptDoc) -> [Chunk] [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:477:29-33 [opt-env-conf-test] @@ -474,7 +474,7 @@ [opt-env-conf-test]  Just [opt-env-conf-test]  SetDoc [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test] - setDocTrySwitch = True, [opt-env-conf-test] + setDocTrySwitch = False, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test]  setDocDasheds = ["--version"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:478:29-34 [opt-env-conf-test] @@ -475,7 +475,7 @@ [opt-env-conf-test]  SetDoc [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test] - setDocTryOption = False, [opt-env-conf-test] + setDocTryOption = True, [opt-env-conf-test]  setDocDasheds = ["--version"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test]  setDocConfKeys = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:476:31-36 [opt-env-conf-test] @@ -473,7 +473,7 @@ [opt-env-conf-test]  AnyDocsSingle $ [opt-env-conf-test]  Just [opt-env-conf-test]  SetDoc [opt-env-conf-test] - { setDocTryArgument = False, [opt-env-conf-test] + { setDocTryArgument = True, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test]  setDocDasheds = ["--version"], [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:485:31-82 [opt-env-conf-test] @@ -482,9 +482,8 @@ [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test]  setDocExamples = [], [opt-env-conf-test]  setDocMetavar = Nothing, [opt-env-conf-test]  setDocHelp = Just $ case mVersion of [opt-env-conf-test] - Nothing -> "Output version information" [opt-env-conf-test]  Just version -> "Output version information: " <> showVersion version [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  renderSetDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:485:31-82 [opt-env-conf-test] @@ -482,9 +482,8 @@ [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test]  setDocExamples = [], [opt-env-conf-test]  setDocMetavar = Nothing, [opt-env-conf-test]  setDocHelp = Just $ case mVersion of [opt-env-conf-test]  Nothing -> "Output version information" [opt-env-conf-test] - Just version -> "Output version information: " <> showVersion version [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  renderSetDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:474:5-10 [opt-env-conf-test] @@ -471,21 +471,21 @@ [opt-env-conf-test]  versionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  versionDocs mVersion = [opt-env-conf-test]  AnyDocsSingle $ [opt-env-conf-test] - Just [opt-env-conf-test] + Nothing [opt-env-conf-test]  SetDoc [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test]  setDocDasheds = ["--version"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test]  setDocConfKeys = Nothing, [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test]  setDocExamples = [], [opt-env-conf-test]  setDocMetavar = Nothing, [opt-env-conf-test]  setDocHelp = Just $ case mVersion of [opt-env-conf-test]  Nothing -> "Output version information" [opt-env-conf-test]  Just version -> "Output version information: " <> showVersion version [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  renderSetDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test]  renderSetDocs = unlinesChunks . intercalate [[]] . go . combineSetDocs . withoutHiddenDocs [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:459:31-36 [opt-env-conf-test] @@ -456,7 +456,7 @@ [opt-env-conf-test]  AnyDocsSingle $ [opt-env-conf-test]  Just [opt-env-conf-test]  SetDoc [opt-env-conf-test] - { setDocTryArgument = False, [opt-env-conf-test] + { setDocTryArgument = True, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test]  setDocDasheds = ["-h", "--help"], [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:460:29-33 [opt-env-conf-test] @@ -457,7 +457,7 @@ [opt-env-conf-test]  Just [opt-env-conf-test]  SetDoc [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test] - setDocTrySwitch = True, [opt-env-conf-test] + setDocTrySwitch = False, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test]  setDocDasheds = ["-h", "--help"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:461:29-34 [opt-env-conf-test] @@ -458,7 +458,7 @@ [opt-env-conf-test]  SetDoc [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test] - setDocTryOption = False, [opt-env-conf-test] + setDocTryOption = True, [opt-env-conf-test]  setDocDasheds = ["-h", "--help"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test]  setDocConfKeys = Nothing, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:462:27-43 [opt-env-conf-test] @@ -459,7 +459,6 @@ [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test] - setDocDasheds = ["-h", "--help"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test]  setDocConfKeys = Nothing, [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:462:27-43 [opt-env-conf-test] @@ -459,7 +459,6 @@ [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test] - setDocDasheds = ["-h", "--help"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test]  setDocConfKeys = Nothing, [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:468:24-50 [opt-env-conf-test] @@ -465,7 +465,7 @@ [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test]  setDocExamples = [], [opt-env-conf-test]  setDocMetavar = Nothing, [opt-env-conf-test] - setDocHelp = Just "Show this help text" [opt-env-conf-test] + setDocHelp = Nothing [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  versionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:457:5-10 [opt-env-conf-test] @@ -454,19 +454,19 @@ [opt-env-conf-test]  helpDocs :: AnyDocs (Maybe SetDoc) [opt-env-conf-test]  helpDocs = [opt-env-conf-test]  AnyDocsSingle $ [opt-env-conf-test] - Just [opt-env-conf-test] + Nothing [opt-env-conf-test]  SetDoc [opt-env-conf-test]  { setDocTryArgument = False, [opt-env-conf-test]  setDocTrySwitch = True, [opt-env-conf-test]  setDocTryOption = False, [opt-env-conf-test]  setDocDasheds = ["-h", "--help"], [opt-env-conf-test]  setDocEnvVars = Nothing, [opt-env-conf-test]  setDocConfKeys = Nothing, [opt-env-conf-test]  setDocDefault = Nothing, [opt-env-conf-test]  setDocExamples = [], [opt-env-conf-test]  setDocMetavar = Nothing, [opt-env-conf-test]  setDocHelp = Just "Show this help text" [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  versionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  versionDocs mVersion = [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf-test] @@ -402,10 +402,7 @@ [opt-env-conf-test]  renderVersionPage :: String -> Version -> [Chunk] [opt-env-conf-test]  renderVersionPage progname version = [opt-env-conf-test]  unwordsChunks [opt-env-conf-test] - [ [progNameChunk progname], [opt-env-conf-test] - [versionChunk version], [opt-env-conf-test] - ["\n"] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render the output of top-level @--help@ [opt-env-conf-test]  renderHelpPage :: String -> Version -> String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf-test] @@ -402,10 +402,9 @@ [opt-env-conf-test]  renderVersionPage :: String -> Version -> [Chunk] [opt-env-conf-test]  renderVersionPage progname version = [opt-env-conf-test]  unwordsChunks [opt-env-conf-test]  [ [progNameChunk progname], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test] - ["\n"] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render the output of top-level @--help@ [opt-env-conf-test]  renderHelpPage :: String -> Version -> String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:405:5-6 [opt-env-conf-test] @@ -402,10 +402,9 @@ [opt-env-conf-test]  renderVersionPage :: String -> Version -> [Chunk] [opt-env-conf-test]  renderVersionPage progname version = [opt-env-conf-test]  unwordsChunks [opt-env-conf-test] - [ [progNameChunk progname], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  ["\n"] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render the output of top-level @--help@ [opt-env-conf-test]  renderHelpPage :: String -> Version -> String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf-test] @@ -388,7 +388,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test] - AnyDocsCommands _ cs -> all nullCommandDoc cs [opt-env-conf-test] + AnyDocsCommands _ cs -> False [opt-env-conf-test]  AnyDocsOr [] -> True [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf-test] @@ -388,7 +388,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test] - AnyDocsCommands _ cs -> all nullCommandDoc cs [opt-env-conf-test] + AnyDocsCommands _ cs -> not (all nullCommandDoc cs) [opt-env-conf-test]  AnyDocsOr [] -> True [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:392:19-23 [opt-env-conf-test] @@ -389,7 +389,7 @@ [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test]  AnyDocsCommands _ cs -> all nullCommandDoc cs [opt-env-conf-test] - AnyDocsOr [] -> True [opt-env-conf-test] + AnyDocsOr [] -> False [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test]  AnyDocsAnd _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:393:18-23 [opt-env-conf-test] @@ -390,7 +390,7 @@ [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test]  AnyDocsCommands _ cs -> all nullCommandDoc cs [opt-env-conf-test]  AnyDocsOr [] -> True [opt-env-conf-test] - AnyDocsOr _ -> False [opt-env-conf-test] + AnyDocsOr _ -> True [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test]  AnyDocsAnd _ -> False [opt-env-conf-test]  AnyDocsSingle _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:394:20-24 [opt-env-conf-test] @@ -391,7 +391,7 @@ [opt-env-conf-test]  AnyDocsCommands _ cs -> all nullCommandDoc cs [opt-env-conf-test]  AnyDocsOr [] -> True [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test] - AnyDocsAnd [] -> True [opt-env-conf-test] + AnyDocsAnd [] -> False [opt-env-conf-test]  AnyDocsAnd _ -> False [opt-env-conf-test]  AnyDocsSingle _ -> False [opt-env-conf-test]  where [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:395:19-24 [opt-env-conf-test] @@ -392,7 +392,7 @@ [opt-env-conf-test]  AnyDocsOr [] -> True [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test] - AnyDocsAnd _ -> False [opt-env-conf-test] + AnyDocsAnd _ -> True [opt-env-conf-test]  AnyDocsSingle _ -> False [opt-env-conf-test]  where [opt-env-conf-test]  nullCommandDoc :: CommandDoc a -> Bool [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:396:22-27 [opt-env-conf-test] @@ -393,7 +393,7 @@ [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test]  AnyDocsAnd _ -> False [opt-env-conf-test] - AnyDocsSingle _ -> False [opt-env-conf-test] + AnyDocsSingle _ -> True [opt-env-conf-test]  where [opt-env-conf-test]  nullCommandDoc :: CommandDoc a -> Bool [opt-env-conf-test]  nullCommandDoc = nullDocs . commandDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:232:9-26 [opt-env-conf-test] @@ -229,7 +229,7 @@ [opt-env-conf-test]  [ ["argument:"], [opt-env-conf-test]  [mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTryArgument [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:232:9-26 [opt-env-conf-test] @@ -229,7 +229,7 @@ [opt-env-conf-test]  [ ["argument:"], [opt-env-conf-test]  [mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTryArgument [opt-env-conf-test] + | not (setDocTryArgument) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:229:11-12 [opt-env-conf-test] @@ -226,9 +226,8 @@ [opt-env-conf-test]  renderSetDocWithoutHeader SetDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test] - [ ["argument:"], [opt-env-conf-test]  [mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:228:7-8 [opt-env-conf-test] @@ -225,12 +225,11 @@ [opt-env-conf-test]  renderSetDocWithoutHeader :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDocWithoutHeader SetDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test]  [ ["argument:"], [opt-env-conf-test]  [mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:238:9-24 [opt-env-conf-test] @@ -235,7 +235,7 @@ [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTrySwitch, [opt-env-conf-test] + | True, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:235:11-12 [opt-env-conf-test] @@ -232,9 +232,7 @@ [opt-env-conf-test]  | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] - [ ["switch:"], [opt-env-conf-test] - dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTrySwitch, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:238:9-24 [opt-env-conf-test] @@ -235,7 +235,7 @@ [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTrySwitch, [opt-env-conf-test] + | not (setDocTrySwitch), [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:235:11-12 [opt-env-conf-test] @@ -232,9 +232,8 @@ [opt-env-conf-test]  | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] - [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTrySwitch, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:244:18-52 [opt-env-conf-test] @@ -241,7 +241,6 @@ [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:229:11-12 [opt-env-conf-test] @@ -226,9 +226,7 @@ [opt-env-conf-test]  renderSetDocWithoutHeader SetDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test] - [ ["argument:"], [opt-env-conf-test] - [mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:234:7-8 [opt-env-conf-test] @@ -231,13 +231,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTrySwitch, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:246:9-24 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTryOption, [opt-env-conf-test] + | True, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:246:9-24 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTryOption, [opt-env-conf-test] + | not (setDocTryOption), [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:244:18-52 [opt-env-conf-test] @@ -241,7 +241,6 @@ [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:242:11-12 [opt-env-conf-test] @@ -239,10 +239,7 @@ [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] - [ ["option:"], [opt-env-conf-test] - dashedChunksNE dasheds [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:241:7-8 [opt-env-conf-test] @@ -238,14 +238,13 @@ [opt-env-conf-test]  | setDocTrySwitch, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test] - | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["env:"], [opt-env-conf-test]  envVarChunksNE vars [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:242:11-12 [opt-env-conf-test] @@ -239,10 +239,9 @@ [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] - [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:252:18-52 [opt-env-conf-test] @@ -249,7 +249,6 @@ [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["env:"], [opt-env-conf-test]  envVarChunksNE vars [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | vars <- maybeToList setDocEnvVars [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:252:18-52 [opt-env-conf-test] @@ -249,7 +249,6 @@ [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["env:"], [opt-env-conf-test]  envVarChunksNE vars [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | vars <- maybeToList setDocEnvVars [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:250:11-12 [opt-env-conf-test] @@ -247,10 +247,7 @@ [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] - [ ["env:"], [opt-env-conf-test] - envVarChunksNE vars [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | vars <- maybeToList setDocEnvVars [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:250:11-12 [opt-env-conf-test] @@ -247,10 +247,9 @@ [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test] - [ ["env:"], [opt-env-conf-test]  envVarChunksNE vars [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | vars <- maybeToList setDocEnvVars [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf-test] @@ -258,7 +258,6 @@ [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf-test] @@ -258,7 +258,6 @@ [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:268:32-56 [opt-env-conf-test] @@ -265,7 +265,6 @@ [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test] - ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:261:22-58 [opt-env-conf-test] @@ -258,7 +258,6 @@ [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:268:32-56 [opt-env-conf-test] @@ -265,7 +265,6 @@ [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test] - ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf-test] @@ -262,11 +262,10 @@ [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test] - [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test]  ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf-test] @@ -262,11 +262,8 @@ [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test] - (l : ll) -> [opt-env-conf-test] - ([confValChunk key, ": "] ++ l) [opt-env-conf-test] - : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf-test] @@ -256,18 +256,16 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test]  ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test]  | confs <- maybeToList setDocConfKeys [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf-test] @@ -256,18 +256,9 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test] - ls -> [opt-env-conf-test] - ["config:"] [opt-env-conf-test] - : indent [opt-env-conf-test] - ( case ls of [opt-env-conf-test] - [] -> [["TODO"]] [opt-env-conf-test] - (l : ll) -> [opt-env-conf-test] - ([confValChunk key, ": "] ++ l) [opt-env-conf-test] - : indent ll [opt-env-conf-test] - ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test]  | confs <- maybeToList setDocConfKeys [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:279:14-33 [opt-env-conf-test] @@ -276,7 +276,7 @@ [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:279:14-33 [opt-env-conf-test] @@ -276,7 +276,7 @@ [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] + | not (not (null setDocExamples)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:279:13-34 [opt-env-conf-test] @@ -276,7 +276,7 @@ [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] + | not True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:279:13-34 [opt-env-conf-test] @@ -276,7 +276,7 @@ [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] + | not not ((null setDocExamples)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:279:9-34 [opt-env-conf-test] @@ -276,7 +276,7 @@ [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] + | True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:279:9-34 [opt-env-conf-test] @@ -276,7 +276,7 @@ [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] + | not (not (null setDocExamples)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:278:7-8 [opt-env-conf-test] @@ -275,9 +275,8 @@ [opt-env-conf-test]  [ defaultValueChunks dv [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  helpLines :: Help -> [[Chunk]] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf-test] @@ -225,60 +225,7 @@ [opt-env-conf-test]  renderSetDocWithoutHeader :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDocWithoutHeader SetDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks [opt-env-conf-test] - [ ["argument:"], [opt-env-conf-test] - [mMetavarChunk setDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | setDocTryArgument [opt-env-conf-test] - ], [opt-env-conf-test] - [ unwordsChunks [opt-env-conf-test] - [ ["switch:"], [opt-env-conf-test] - dashedChunksNE dasheds [opt-env-conf-test] - ] [opt-env-conf-test] - | setDocTrySwitch, [opt-env-conf-test] - dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test] - ], [opt-env-conf-test] - [ unwordsChunks [opt-env-conf-test] - [ ["option:"], [opt-env-conf-test] - dashedChunksNE dasheds [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | setDocTryOption, [opt-env-conf-test] - dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test] - ], [opt-env-conf-test] - [ unwordsChunks [opt-env-conf-test] - [ ["env:"], [opt-env-conf-test] - envVarChunksNE vars [opt-env-conf-test] - ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | vars <- maybeToList setDocEnvVars [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ concatMap [opt-env-conf-test] - ( \(key, schema) -> [opt-env-conf-test] - case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test] - ls -> [opt-env-conf-test] - ["config:"] [opt-env-conf-test] - : indent [opt-env-conf-test] - ( case ls of [opt-env-conf-test] - [] -> [["TODO"]] [opt-env-conf-test] - (l : ll) -> [opt-env-conf-test] - ([confValChunk key, ": "] ++ l) [opt-env-conf-test] - : indent ll [opt-env-conf-test] - ) [opt-env-conf-test] - ) [opt-env-conf-test] - (NE.toList confs) [opt-env-conf-test] - | confs <- maybeToList setDocConfKeys [opt-env-conf-test] - ], [opt-env-conf-test] - [ defaultValueChunks dv [opt-env-conf-test] - | dv <- maybeToList setDocDefault [opt-env-conf-test] - ], [opt-env-conf-test] - [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  helpLines :: Help -> [[Chunk]] [opt-env-conf-test]  helpLines = map (map (fore blue)) . stringLines [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf-test] @@ -225,60 +225,54 @@ [opt-env-conf-test]  renderSetDocWithoutHeader :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDocWithoutHeader SetDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ unwordsChunks [opt-env-conf-test] - [ ["argument:"], [opt-env-conf-test] - [mMetavarChunk setDocMetavar] [opt-env-conf-test] - ] [opt-env-conf-test] - | setDocTryArgument [opt-env-conf-test] - ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTrySwitch, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["env:"], [opt-env-conf-test]  envVarChunksNE vars [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | vars <- maybeToList setDocEnvVars [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test]  ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test]  | confs <- maybeToList setDocConfKeys [opt-env-conf-test]  ], [opt-env-conf-test]  [ defaultValueChunks dv [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test]  [ exampleValuesChunks setDocExamples [opt-env-conf-test]  | not (null setDocExamples) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  helpLines :: Help -> [[Chunk]] [opt-env-conf-test]  helpLines = map (map (fore blue)) . stringLines [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:228:5-6 [opt-env-conf-test] @@ -225,60 +225,57 @@ [opt-env-conf-test]  renderSetDocWithoutHeader :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDocWithoutHeader SetDoc {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ unwordsChunks [opt-env-conf-test]  [ ["argument:"], [opt-env-conf-test]  [mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["switch:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTrySwitch, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["option:"], [opt-env-conf-test]  dashedChunksNE dasheds [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | setDocTryOption, [opt-env-conf-test]  dasheds <- maybeToList (NE.nonEmpty setDocDasheds) [opt-env-conf-test]  ], [opt-env-conf-test]  [ unwordsChunks [opt-env-conf-test]  [ ["env:"], [opt-env-conf-test]  envVarChunksNE vars [opt-env-conf-test]  ++ [" ", mMetavarChunk setDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | vars <- maybeToList setDocEnvVars [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test]  [line] -> [opt-env-conf-test]  [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test]  ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test]  | confs <- maybeToList setDocConfKeys [opt-env-conf-test]  ], [opt-env-conf-test]  [ defaultValueChunks dv [opt-env-conf-test]  | dv <- maybeToList setDocDefault [opt-env-conf-test]  ], [opt-env-conf-test] - [ exampleValuesChunks setDocExamples [opt-env-conf-test] - | not (null setDocExamples) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  helpLines :: Help -> [[Chunk]] [opt-env-conf-test]  helpLines = map (map (fore blue)) . stringLines [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf-test] @@ -214,10 +214,7 @@ [opt-env-conf-test]  renderSetDoc :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDoc setDoc = [opt-env-conf-test]  concat [opt-env-conf-test] - [ renderSetDocHeader (setDocHelp setDoc), [opt-env-conf-test] - renderSetDocWithoutHeader setDoc, [opt-env-conf-test] - [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  renderSetDocHeader :: Maybe Help -> [[Chunk]] [opt-env-conf-test]  renderSetDocHeader = maybe [[fore red "undocumented"]] helpLines [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf-test] @@ -214,10 +214,9 @@ [opt-env-conf-test]  renderSetDoc :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDoc setDoc = [opt-env-conf-test]  concat [opt-env-conf-test] - [ renderSetDocHeader (setDocHelp setDoc), [opt-env-conf-test]  renderSetDocWithoutHeader setDoc, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  renderSetDocHeader :: Maybe Help -> [[Chunk]] [opt-env-conf-test]  renderSetDocHeader = maybe [[fore red "undocumented"]] helpLines [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {True} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {False} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:217:5-6 [opt-env-conf-test] @@ -214,10 +214,9 @@ [opt-env-conf-test]  renderSetDoc :: SetDoc -> [[Chunk]] [opt-env-conf-test]  renderSetDoc setDoc = [opt-env-conf-test]  concat [opt-env-conf-test]  [ renderSetDocHeader (setDocHelp setDoc), [opt-env-conf-test]  renderSetDocWithoutHeader setDoc, [opt-env-conf-test] - [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  renderSetDocHeader :: Maybe Help -> [[Chunk]] [opt-env-conf-test]  renderSetDocHeader = maybe [[fore red "undocumented"]] helpLines [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {not (..)} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:391:27-48 [opt-env-conf-test] @@ -388,7 +388,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test] - AnyDocsCommands _ cs -> all nullCommandDoc cs [opt-env-conf-test] + AnyDocsCommands _ cs -> True [opt-env-conf-test]  AnyDocsOr [] -> True [opt-env-conf-test]  AnyDocsOr _ -> False [opt-env-conf-test]  AnyDocsAnd [] -> True [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {True} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {False} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {not (..)} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {True} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {False} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:209:16-18 [opt-env-conf-test] @@ -206,7 +206,7 @@ [opt-env-conf-test]  let setDocExamples = settingExamples [opt-env-conf-test]  let setDocMetavar = settingMetavar [opt-env-conf-test]  let setDocHelp = settingHelp [opt-env-conf-test] - pure SetDoc {..} [opt-env-conf-test] + pure SetDoc {not (..)} [opt-env-conf-test]  [opt-env-conf-test]  settingOptDoc :: Setting a -> Maybe OptDoc [opt-env-conf-test]  settingOptDoc = settingSetDoc >=> setDocOptDoc [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:139:24-28 [opt-env-conf-test] @@ -136,9 +136,8 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> AnyDocsCommands mDefault $ map goDoc cs [opt-env-conf-test]  AnyDocsAnd ds -> case concatMap goAnd ds of [opt-env-conf-test] - [a] -> a [opt-env-conf-test]  as -> AnyDocsAnd as [opt-env-conf-test]  AnyDocsOr ds -> AnyDocsOr $ concatMap goOr ds [opt-env-conf-test]  AnyDocsSingle v -> AnyDocsSingle v [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:139:24-28 [opt-env-conf-test] @@ -136,9 +136,8 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> AnyDocsCommands mDefault $ map goDoc cs [opt-env-conf-test]  AnyDocsAnd ds -> case concatMap goAnd ds of [opt-env-conf-test]  [a] -> a [opt-env-conf-test] - as -> AnyDocsAnd as [opt-env-conf-test]  AnyDocsOr ds -> AnyDocsOr $ concatMap goOr ds [opt-env-conf-test]  AnyDocsSingle v -> AnyDocsSingle v [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:168:36-50 [opt-env-conf-test] @@ -165,7 +165,6 @@ [opt-env-conf-test]  go :: Parser a -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  go = \case [opt-env-conf-test]  ParserPure _ -> AnyDocsSingle Nothing [opt-env-conf-test] - ParserAp pf pa -> AnyDocsAnd [go pf, go pa] [opt-env-conf-test]  ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:168:36-50 [opt-env-conf-test] @@ -165,7 +165,6 @@ [opt-env-conf-test]  go :: Parser a -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  go = \case [opt-env-conf-test]  ParserPure _ -> AnyDocsSingle Nothing [opt-env-conf-test] - ParserAp pf pa -> AnyDocsAnd [go pf, go pa] [opt-env-conf-test]  ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:169:40-54 [opt-env-conf-test] @@ -166,7 +166,6 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  ParserPure _ -> AnyDocsSingle Nothing [opt-env-conf-test]  ParserAp pf pa -> AnyDocsAnd [go pf, go pa] [opt-env-conf-test] - ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test]  ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:169:40-54 [opt-env-conf-test] @@ -166,7 +166,6 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  ParserPure _ -> AnyDocsSingle Nothing [opt-env-conf-test]  ParserAp pf pa -> AnyDocsAnd [go pf, go pa] [opt-env-conf-test] - ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test]  ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:171:36-50 [opt-env-conf-test] @@ -168,7 +168,6 @@ [opt-env-conf-test]  ParserAp pf pa -> AnyDocsAnd [go pf, go pa] [opt-env-conf-test]  ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test] - ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test]  ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test]  ParserSome mLoc p -> AnyDocsAnd [go p, go (ParserMany mLoc p)] -- TODO: is this right? [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:172:35-64 [opt-env-conf-test] @@ -169,7 +169,6 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test] - ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test]  ParserSome mLoc p -> AnyDocsAnd [go p, go (ParserMany mLoc p)] -- TODO: is this right? [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:172:35-64 [opt-env-conf-test] @@ -169,7 +169,6 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test] - ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test]  ParserSome mLoc p -> AnyDocsAnd [go p, go (ParserMany mLoc p)] -- TODO: is this right? [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:173:39-69 [opt-env-conf-test] @@ -170,7 +170,6 @@ [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test]  ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test] - ParserSome mLoc p -> AnyDocsAnd [go p, go (ParserMany mLoc p)] -- TODO: is this right? [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands _ mDefault cs -> AnyDocsCommands mDefault $ map commandParserDocs cs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:177:46-60 [opt-env-conf-test] @@ -174,7 +174,6 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands _ mDefault cs -> AnyDocsCommands mDefault $ map commandParserDocs cs [opt-env-conf-test] - ParserWithConfig _ p1 p2 -> AnyDocsAnd [go p1, go p2] -- TODO: is this right? Maybe we want to document that it's not a pure parser? [opt-env-conf-test]  ParserSetting _ set -> AnyDocsSingle $ settingSetDoc set [opt-env-conf-test]  [opt-env-conf-test]  commandParserDocs :: Command a -> CommandDoc (Maybe SetDoc) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:171:36-50 [opt-env-conf-test] @@ -168,7 +168,6 @@ [opt-env-conf-test]  ParserAp pf pa -> AnyDocsAnd [go pf, go pa] [opt-env-conf-test]  ParserSelect p1 p2 -> AnyDocsAnd [go p1, go p2] [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test] - ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test]  ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test]  ParserSome mLoc p -> AnyDocsAnd [go p, go (ParserMany mLoc p)] -- TODO: is this right? [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:173:39-69 [opt-env-conf-test] @@ -170,7 +170,6 @@ [opt-env-conf-test]  ParserEmpty _ -> AnyDocsOr [] [opt-env-conf-test]  ParserAlt p1 p2 -> AnyDocsOr [go p1, go p2] [opt-env-conf-test]  ParserMany _ p -> AnyDocsOr [go p, AnyDocsSingle Nothing] [opt-env-conf-test] - ParserSome mLoc p -> AnyDocsAnd [go p, go (ParserMany mLoc p)] -- TODO: is this right? [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands _ mDefault cs -> AnyDocsCommands mDefault $ map commandParserDocs cs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:177:46-60 [opt-env-conf-test] @@ -174,7 +174,6 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands _ mDefault cs -> AnyDocsCommands mDefault $ map commandParserDocs cs [opt-env-conf-test] - ParserWithConfig _ p1 p2 -> AnyDocsAnd [go p1, go p2] -- TODO: is this right? Maybe we want to document that it's not a pure parser? [opt-env-conf-test]  ParserSetting _ set -> AnyDocsSingle $ settingSetDoc set [opt-env-conf-test]  [opt-env-conf-test]  commandParserDocs :: Command a -> CommandDoc (Maybe SetDoc) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf-test] @@ -446,7 +446,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] -withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test]  [opt-env-conf-test]  withHelpDocs :: AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  withHelpDocs sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, sd] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf-test] @@ -446,7 +446,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] -withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test]  [opt-env-conf-test]  withHelpDocs :: AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  withHelpDocs sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, sd] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:449:66-102 [opt-env-conf-test] @@ -446,7 +446,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] -withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test]  [opt-env-conf-test]  withHelpDocs :: AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  withHelpDocs sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, sd] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:452:47-61 [opt-env-conf-test] @@ -449,7 +449,6 @@ [opt-env-conf-test]  withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test]  [opt-env-conf-test]  withHelpDocs :: AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] -withHelpDocs sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, sd] [opt-env-conf-test]  [opt-env-conf-test]  helpDocs :: AnyDocs (Maybe SetDoc) [opt-env-conf-test]  helpDocs = [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:452:47-61 [opt-env-conf-test] @@ -449,7 +449,6 @@ [opt-env-conf-test]  withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test]  [opt-env-conf-test]  withHelpDocs :: AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] -withHelpDocs sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, sd] [opt-env-conf-test]  [opt-env-conf-test]  helpDocs :: AnyDocs (Maybe SetDoc) [opt-env-conf-test]  helpDocs = [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:510:28-34 [opt-env-conf-test] @@ -507,7 +507,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if setDocHelp d == Nothing [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf-test] @@ -507,7 +507,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if True [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf-test] @@ -507,7 +507,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if False [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:510:12-34 [opt-env-conf-test] @@ -507,7 +507,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if not (setDocHelp d == Just h) [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf-test] @@ -529,12 +529,11 @@ [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [d] -> [go' d] [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go' (AnyDocsSingle d) : goOr' ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  ne = d :| sds [opt-env-conf-test]  in AnyDocsSingle ne : goOr' rest [opt-env-conf-test]  (d : ds) -> go' d : goOr' ds [opt-env-conf-test]  [opt-env-conf-test]  renderCommandDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf-test] @@ -529,12 +529,8 @@ [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [d] -> [go' d] [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go' (AnyDocsSingle d) : goOr' ds [opt-env-conf-test] - Just h -> [opt-env-conf-test] - let (sds, rest) = goSameHelp h ds [opt-env-conf-test] - ne = d :| sds [opt-env-conf-test] - in AnyDocsSingle ne : goOr' rest [opt-env-conf-test]  (d : ds) -> go' d : goOr' ds [opt-env-conf-test]  [opt-env-conf-test]  renderCommandDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:501:13-14 [opt-env-conf-test] @@ -498,9 +498,8 @@ [opt-env-conf-test]  AnyDocsOr ds -> concatMap go ds [opt-env-conf-test]  AnyDocsSingle (d :| ds) -> [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (setDocHelp d), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader (d : ds) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:541:40-44 [opt-env-conf-test] @@ -538,7 +538,7 @@ [opt-env-conf-test]  (d : ds) -> go' d : goOr' ds [opt-env-conf-test]  [opt-env-conf-test]  renderCommandDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] -renderCommandDocs = unlinesChunks . go True . withoutHiddenDocs [opt-env-conf-test] +renderCommandDocs = unlinesChunks . go False . withoutHiddenDocs [opt-env-conf-test]  where [opt-env-conf-test]  go :: Bool -> AnyDocs SetDoc -> [[Chunk]] [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:588:28-34 [opt-env-conf-test] @@ -585,7 +585,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if setDocHelp d == Nothing [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf-test] @@ -585,7 +585,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if True [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf-test] @@ -585,7 +585,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if False [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf-test] @@ -585,7 +585,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if not (setDocHelp d == Just h) [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf-test] @@ -563,7 +563,7 @@ [opt-env-conf-test]  goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]] [opt-env-conf-test]  goOr isTopLevel = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [d] -> go isTopLevel d [opt-env-conf-test] + [d] -> go False d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf-test] @@ -563,7 +563,7 @@ [opt-env-conf-test]  goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]] [opt-env-conf-test]  goOr isTopLevel = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [d] -> go isTopLevel d [opt-env-conf-test] + [d] -> go not (isTopLevel) d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:501:13-14 [opt-env-conf-test] @@ -498,9 +498,7 @@ [opt-env-conf-test]  AnyDocsOr ds -> concatMap go ds [opt-env-conf-test]  AnyDocsSingle (d :| ds) -> [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (setDocHelp d), [opt-env-conf-test] - indent $ concatMap renderSetDocWithoutHeader (d : ds) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf-test] @@ -563,7 +563,7 @@ [opt-env-conf-test]  goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]] [opt-env-conf-test]  goOr isTopLevel = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [d] -> go isTopLevel d [opt-env-conf-test] + [d] -> go True d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf-test] @@ -566,7 +566,7 @@ [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] + Nothing -> go True (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf-test] @@ -566,7 +566,7 @@ [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] + Nothing -> go False (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf-test] @@ -566,7 +566,7 @@ [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] + Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr True ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf-test] @@ -566,7 +566,7 @@ [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] + Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr False ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:569:25-35 [opt-env-conf-test] @@ -566,7 +566,7 @@ [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] + Nothing -> go not (isTopLevel) (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:579:29-39 [opt-env-conf-test] @@ -576,7 +576,7 @@ [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] + | not not (isTopLevel) [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:579:25-39 [opt-env-conf-test] @@ -576,7 +576,7 @@ [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:569:62-72 [opt-env-conf-test] @@ -566,7 +566,7 @@ [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] + Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr not (isTopLevel) ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:579:25-39 [opt-env-conf-test] @@ -576,7 +576,7 @@ [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] + | not (not isTopLevel) [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:579:29-39 [opt-env-conf-test] @@ -576,7 +576,7 @@ [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:575:58-64 [opt-env-conf-test] @@ -572,7 +572,7 @@ [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test] + [ indent $ renderSetDocHeader (Nothing), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf-test] @@ -572,10 +572,7 @@ [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test] - indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test] - [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf-test] @@ -572,10 +572,9 @@ [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test] - [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:575:27-28 [opt-env-conf-test] @@ -572,10 +572,9 @@ [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:574:23-24 [opt-env-conf-test] @@ -571,13 +571,12 @@ [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf-test] @@ -578,7 +578,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test] - goOr isTopLevel rest [opt-env-conf-test] + goOr False rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf-test] @@ -578,7 +578,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test] - goOr isTopLevel rest [opt-env-conf-test] + goOr not (isTopLevel) rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:573:19-20 [opt-env-conf-test] @@ -570,16 +570,7 @@ [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test] - indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test] - [[]] [opt-env-conf-test] - ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] - ], [opt-env-conf-test] - goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:573:19-20 [opt-env-conf-test] @@ -570,16 +570,8 @@ [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test] - indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test] - [[]] [opt-env-conf-test] - ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] - ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf-test] @@ -565,21 +565,20 @@ [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf-test] @@ -565,21 +565,8 @@ [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test] - Just h -> [opt-env-conf-test] - let (sds, rest) = goSameHelp h ds [opt-env-conf-test] - in concat [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ concat [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test] - indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test] - [[]] [opt-env-conf-test] - ] [opt-env-conf-test] - | not isTopLevel [opt-env-conf-test] - ], [opt-env-conf-test] - goOr isTopLevel rest [opt-env-conf-test] - ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf-test] @@ -580,7 +580,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] - (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] + (d : ds) -> go True d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf-test] @@ -580,7 +580,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] - (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] + (d : ds) -> go False d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:583:22-32 [opt-env-conf-test] @@ -580,7 +580,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] - (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] + (d : ds) -> go not (isTopLevel) d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf-test] @@ -578,7 +578,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test] - goOr isTopLevel rest [opt-env-conf-test] + goOr True rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf-test] @@ -580,7 +580,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] - (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] + (d : ds) -> go isTopLevel d ++ goOr True ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf-test] @@ -580,7 +580,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] - (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] + (d : ds) -> go isTopLevel d ++ goOr False ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf-test] @@ -552,7 +552,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[Chunk]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = True [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf-test] @@ -552,7 +552,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[Chunk]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = False [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf-test] @@ -553,7 +553,7 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if True then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test]  : go False commandDocs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:583:43-53 [opt-env-conf-test] @@ -580,7 +580,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test] - (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test] + (d : ds) -> go isTopLevel d ++ goOr not (isTopLevel) ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:555:37-60 [opt-env-conf-test] @@ -552,7 +552,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[Chunk]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = mDefault == Nothing [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:555:25-60 [opt-env-conf-test] @@ -552,7 +552,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[Chunk]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = not (mDefault == Just commandDocArgument) [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Doc.hs:559:20-25 [opt-env-conf-test] @@ -556,7 +556,7 @@ [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test] - : go False commandDocs [opt-env-conf-test] + : go True commandDocs [opt-env-conf-test]  ++ [[]] [opt-env-conf-test]  [opt-env-conf-test]  -- Group together settings with the same help (produced by combinators like enableDisableSwitch) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf-test] @@ -543,7 +543,7 @@ [opt-env-conf-test]  go :: Bool -> AnyDocs SetDoc -> [[Chunk]] [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> concatMap (goCommand mDefault) cs [opt-env-conf-test] - AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test] + AnyDocsAnd ds -> concatMap (go False) ds [opt-env-conf-test]  AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test]  | isTopLevel -> [] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf-test] @@ -543,7 +543,7 @@ [opt-env-conf-test]  go :: Bool -> AnyDocs SetDoc -> [[Chunk]] [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> concatMap (goCommand mDefault) cs [opt-env-conf-test] - AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test] + AnyDocsAnd ds -> concatMap (go True) ds [opt-env-conf-test]  AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test]  | isTopLevel -> [] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf-test] @@ -555,7 +555,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test] - : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test]  : go False commandDocs [opt-env-conf-test]  ++ [[]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf-test] @@ -555,7 +555,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test] - : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test]  : go False commandDocs [opt-env-conf-test]  ++ [[]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf-test] @@ -544,7 +544,7 @@ [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> concatMap (goCommand mDefault) cs [opt-env-conf-test]  AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test] - AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test] + AnyDocsOr ds -> goOr True ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test]  | isTopLevel -> [] [opt-env-conf-test]  | otherwise -> indent (renderSetDoc d) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf-test] @@ -544,7 +544,7 @@ [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> concatMap (goCommand mDefault) cs [opt-env-conf-test]  AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test] - AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test] + AnyDocsOr ds -> goOr False ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test]  | isTopLevel -> [] [opt-env-conf-test]  | otherwise -> indent (renderSetDoc d) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:547:28-38 [opt-env-conf-test] @@ -544,7 +544,7 @@ [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> concatMap (goCommand mDefault) cs [opt-env-conf-test]  AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test] - AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test] + AnyDocsOr ds -> goOr not (isTopLevel) ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test]  | isTopLevel -> [] [opt-env-conf-test]  | otherwise -> indent (renderSetDoc d) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:558:17-71 [opt-env-conf-test] @@ -555,7 +555,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test] - : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test]  : go False commandDocs [opt-env-conf-test]  ++ [[]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf-test] @@ -553,7 +553,7 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if False then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test]  : go False commandDocs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:556:25-34 [opt-env-conf-test] @@ -553,7 +553,7 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  indent $ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if not (isDefault) then " (default)" else "" [opt-env-conf-test]  in [helpChunk commandDocHelp] [opt-env-conf-test]  : ["command: ", commandChunk commandDocArgument, suffix] [opt-env-conf-test]  : go False commandDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:549:11-21 [opt-env-conf-test] @@ -546,7 +546,7 @@ [opt-env-conf-test]  AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test]  AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test] - | isTopLevel -> [] [opt-env-conf-test] + | True -> [] [opt-env-conf-test]  | otherwise -> indent (renderSetDoc d) [opt-env-conf-test]  [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[Chunk]] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:546:38-48 [opt-env-conf-test] @@ -543,7 +543,7 @@ [opt-env-conf-test]  go :: Bool -> AnyDocs SetDoc -> [[Chunk]] [opt-env-conf-test]  go isTopLevel = \case [opt-env-conf-test]  AnyDocsCommands mDefault cs -> concatMap (goCommand mDefault) cs [opt-env-conf-test] - AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test] + AnyDocsAnd ds -> concatMap (go not (isTopLevel)) ds [opt-env-conf-test]  AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test]  | isTopLevel -> [] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:549:11-21 [opt-env-conf-test] @@ -546,7 +546,7 @@ [opt-env-conf-test]  AnyDocsAnd ds -> concatMap (go isTopLevel) ds [opt-env-conf-test]  AnyDocsOr ds -> goOr isTopLevel ds [opt-env-conf-test]  AnyDocsSingle d [opt-env-conf-test] - | isTopLevel -> [] [opt-env-conf-test] + | not (isTopLevel) -> [] [opt-env-conf-test]  | otherwise -> indent (renderSetDoc d) [opt-env-conf-test]  [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[Chunk]] [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:607:35-58 [opt-env-conf-test] @@ -604,7 +604,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = mDefault == Nothing [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf-test] @@ -604,7 +604,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = True [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf-test] @@ -604,7 +604,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = False [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf-test] @@ -605,7 +605,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if False then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf-test] @@ -605,7 +605,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if not (isDefault) then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:607:23-58 [opt-env-conf-test] @@ -604,7 +604,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = not (mDefault == Just commandDocArgument) [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:608:23-32 [opt-env-conf-test] @@ -605,7 +605,7 @@ [opt-env-conf-test]  goCommand :: Maybe String -> CommandDoc SetDoc -> [[[Chunk]]] [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if True then " (default)" else "" [opt-env-conf-test]  in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:609:20-61 [opt-env-conf-test] @@ -606,7 +606,6 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test] - in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test]  parserOptDocs = docsToOptDocs . parserDocs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:609:20-61 [opt-env-conf-test] @@ -606,7 +606,6 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test] - in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test]  parserOptDocs = docsToOptDocs . parserDocs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:609:19-90 [opt-env-conf-test] @@ -606,7 +606,6 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test] - in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test]  parserOptDocs = docsToOptDocs . parserDocs [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:717:27-53 [opt-env-conf-test] @@ -714,7 +714,7 @@ [opt-env-conf-test]  AnyDocsCommands _ _ -> Nothing [opt-env-conf-test]  AnyDocsAnd ds -> concat <$> mapM goTable ds [opt-env-conf-test]  AnyDocsOr ds -> concat <$> mapM goTable ds [opt-env-conf-test] - AnyDocsSingle od -> Just [renderOptDocLong od] [opt-env-conf-test] + AnyDocsSingle od -> Nothing [opt-env-conf-test]  [opt-env-conf-test]  renderOptDocLong :: OptDoc -> [[Chunk]] [opt-env-conf-test]  renderOptDocLong OptDoc {..} = [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:609:19-90 [opt-env-conf-test] @@ -606,7 +606,6 @@ [opt-env-conf-test]  goCommand mDefault CommandDoc {..} = [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test] - in [indent [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]]] [opt-env-conf-test]  [opt-env-conf-test]  parserOptDocs :: Parser a -> AnyDocs (Maybe OptDoc) [opt-env-conf-test]  parserOptDocs = docsToOptDocs . parserDocs [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:697:43-66 [opt-env-conf-test] @@ -694,7 +694,7 @@ [opt-env-conf-test]  AnyDocsCommands mDefault cs -> [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = mDefault == Nothing [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf-test] @@ -694,7 +694,7 @@ [opt-env-conf-test]  AnyDocsCommands mDefault cs -> [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = not (mDefault == Just commandDocArgument) [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf-test] @@ -695,7 +695,7 @@ [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if True then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf-test] @@ -694,7 +694,7 @@ [opt-env-conf-test]  AnyDocsCommands mDefault cs -> [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = True [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:700:36-77 [opt-env-conf-test] @@ -697,7 +697,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test] - unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test]  ) [opt-env-conf-test]  cs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:700:35-106 [opt-env-conf-test] @@ -697,7 +697,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test] - unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test]  ) [opt-env-conf-test]  cs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf-test] @@ -695,7 +695,7 @@ [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if not (isDefault) then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:700:35-106 [opt-env-conf-test] @@ -697,7 +697,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test] - unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test]  ) [opt-env-conf-test]  cs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:700:36-77 [opt-env-conf-test] @@ -697,7 +697,6 @@ [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test] - unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test]  ) [opt-env-conf-test]  cs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:698:31-40 [opt-env-conf-test] @@ -695,7 +695,7 @@ [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test]  let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] - suffix = if isDefault then " (default)" else "" [opt-env-conf-test] + suffix = if False then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf-test] @@ -426,11 +426,9 @@ [opt-env-conf-test]  renderHelpPageHelper progname' commandPath mVersion progDesc docs = [opt-env-conf-test]  unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ let progname = unwords $ progname' : commandPath [opt-env-conf-test] - in usageChunk : renderShortOptDocs progname (docsToOptDocs docs), [opt-env-conf-test]  [], [opt-env-conf-test]  unlinesChunks $ progDescLines progDesc [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test]  if null commandPath [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:704:24-54 [opt-env-conf-test] @@ -701,9 +701,8 @@ [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test]  ) [opt-env-conf-test]  cs [opt-env-conf-test]  AnyDocsAnd ds -> case goTable (AnyDocsAnd ds) of [opt-env-conf-test]  Nothing -> concatMap go ds [opt-env-conf-test] - Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test]  AnyDocsOr ds -> case goTable (AnyDocsOr ds) of [opt-env-conf-test]  Nothing -> concatMap go ds [opt-env-conf-test]  Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:697:31-66 [opt-env-conf-test] @@ -694,7 +694,7 @@ [opt-env-conf-test]  AnyDocsCommands mDefault cs -> [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \CommandDoc {..} -> [opt-env-conf-test] - let isDefault = mDefault == Just commandDocArgument [opt-env-conf-test] + let isDefault = False [opt-env-conf-test]  suffix = if isDefault then " (default)" else "" [opt-env-conf-test]  in indent $ [opt-env-conf-test]  unwordsChunks [[commandChunk commandDocArgument, suffix], [helpChunk commandDocHelp]] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:707:23-54 [opt-env-conf-test] @@ -704,9 +704,8 @@ [opt-env-conf-test]  AnyDocsAnd ds -> case goTable (AnyDocsAnd ds) of [opt-env-conf-test]  Nothing -> concatMap go ds [opt-env-conf-test]  Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test]  AnyDocsOr ds -> case goTable (AnyDocsOr ds) of [opt-env-conf-test]  Nothing -> concatMap go ds [opt-env-conf-test] - Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test]  AnyDocsSingle vs -> indent $ layoutAsTableLines [renderOptDocLong vs] [opt-env-conf-test]  [opt-env-conf-test]  goTable :: AnyDocs OptDoc -> Maybe [[[Chunk]]] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:707:23-54 [opt-env-conf-test] @@ -704,9 +704,8 @@ [opt-env-conf-test]  AnyDocsAnd ds -> case goTable (AnyDocsAnd ds) of [opt-env-conf-test]  Nothing -> concatMap go ds [opt-env-conf-test]  Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test]  AnyDocsOr ds -> case goTable (AnyDocsOr ds) of [opt-env-conf-test] - Nothing -> concatMap go ds [opt-env-conf-test]  Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test]  AnyDocsSingle vs -> indent $ layoutAsTableLines [renderOptDocLong vs] [opt-env-conf-test]  [opt-env-conf-test]  goTable :: AnyDocs OptDoc -> Maybe [[[Chunk]]] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Doc.hs:704:24-54 [opt-env-conf-test] @@ -701,9 +701,8 @@ [opt-env-conf-test]  : indent (go commandDocs) [opt-env-conf-test]  ) [opt-env-conf-test]  cs [opt-env-conf-test]  AnyDocsAnd ds -> case goTable (AnyDocsAnd ds) of [opt-env-conf-test] - Nothing -> concatMap go ds [opt-env-conf-test]  Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test]  AnyDocsOr ds -> case goTable (AnyDocsOr ds) of [opt-env-conf-test]  Nothing -> concatMap go ds [opt-env-conf-test]  Just csss -> indent $ layoutAsTableLines csss [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf-test] @@ -426,11 +426,7 @@ [opt-env-conf-test]  renderHelpPageHelper progname' commandPath mVersion progDesc docs = [opt-env-conf-test]  unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ let progname = unwords $ progname' : commandPath [opt-env-conf-test] - in usageChunk : renderShortOptDocs progname (docsToOptDocs docs), [opt-env-conf-test] - [], [opt-env-conf-test] - unlinesChunks $ progDescLines progDesc [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test]  if null commandPath [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:429:9-10 [opt-env-conf-test] @@ -426,11 +426,10 @@ [opt-env-conf-test]  renderHelpPageHelper progname' commandPath mVersion progDesc docs = [opt-env-conf-test]  unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ let progname = unwords $ progname' : commandPath [opt-env-conf-test]  in usageChunk : renderShortOptDocs progname (docsToOptDocs docs), [opt-env-conf-test]  [], [opt-env-conf-test] - unlinesChunks $ progDescLines progDesc [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test]  if null commandPath [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf-test] @@ -433,7 +433,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test] - if null commandPath [opt-env-conf-test] + if True [opt-env-conf-test]  then withHelpAndVersionDocs mVersion docs [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf-test] @@ -433,7 +433,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test] - if null commandPath [opt-env-conf-test] + if False [opt-env-conf-test]  then withHelpAndVersionDocs mVersion docs [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:434:9-10 [opt-env-conf-test] @@ -431,12 +431,7 @@ [opt-env-conf-test]  [], [opt-env-conf-test]  unlinesChunks $ progDescLines progDesc [opt-env-conf-test]  ], [opt-env-conf-test] - [ headerChunks "Available settings", [opt-env-conf-test] - renderSetDocs $ [opt-env-conf-test] - if null commandPath [opt-env-conf-test] - then withHelpAndVersionDocs mVersion docs [opt-env-conf-test] - else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:436:16-32 [opt-env-conf-test] @@ -433,7 +433,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test] - if null commandPath [opt-env-conf-test] + if not (null commandPath) [opt-env-conf-test]  then withHelpAndVersionDocs mVersion docs [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:444:18-47 [opt-env-conf-test] @@ -441,7 +441,7 @@ [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:444:18-47 [opt-env-conf-test] @@ -441,7 +441,7 @@ [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] + | not (not (null (docsToCommandDocs docs))) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:444:17-48 [opt-env-conf-test] @@ -441,7 +441,7 @@ [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] + | not True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:444:17-48 [opt-env-conf-test] @@ -441,7 +441,7 @@ [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] + | not not ((null (docsToCommandDocs docs))) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:444:13-48 [opt-env-conf-test] @@ -441,7 +441,7 @@ [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] + | not (not (null (docsToCommandDocs docs))) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:441:13-14 [opt-env-conf-test] @@ -438,9 +438,7 @@ [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Available commands", [opt-env-conf-test] - renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null (docsToCommandDocs docs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:441:13-14 [opt-env-conf-test] @@ -438,9 +438,8 @@ [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null (docsToCommandDocs docs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf-test] @@ -426,24 +426,7 @@ [opt-env-conf-test]  renderHelpPageHelper progname' commandPath mVersion progDesc docs = [opt-env-conf-test]  unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ let progname = unwords $ progname' : commandPath [opt-env-conf-test] - in usageChunk : renderShortOptDocs progname (docsToOptDocs docs), [opt-env-conf-test] - [], [opt-env-conf-test] - unlinesChunks $ progDescLines progDesc [opt-env-conf-test] - ], [opt-env-conf-test] - [ headerChunks "Available settings", [opt-env-conf-test] - renderSetDocs $ [opt-env-conf-test] - if null commandPath [opt-env-conf-test] - then withHelpAndVersionDocs mVersion docs [opt-env-conf-test] - else withHelpDocs docs [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "Available commands", [opt-env-conf-test] - renderCommandDocsShort docs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf-test] @@ -426,24 +426,19 @@ [opt-env-conf-test]  renderHelpPageHelper progname' commandPath mVersion progDesc docs = [opt-env-conf-test]  unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ let progname = unwords $ progname' : commandPath [opt-env-conf-test] - in usageChunk : renderShortOptDocs progname (docsToOptDocs docs), [opt-env-conf-test] - [], [opt-env-conf-test] - unlinesChunks $ progDescLines progDesc [opt-env-conf-test] - ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test]  if null commandPath [opt-env-conf-test]  then withHelpAndVersionDocs mVersion docs [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null (docsToCommandDocs docs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:429:7-8 [opt-env-conf-test] @@ -426,24 +426,18 @@ [opt-env-conf-test]  renderHelpPageHelper progname' commandPath mVersion progDesc docs = [opt-env-conf-test]  unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ let progname = unwords $ progname' : commandPath [opt-env-conf-test]  in usageChunk : renderShortOptDocs progname (docsToOptDocs docs), [opt-env-conf-test]  [], [opt-env-conf-test]  unlinesChunks $ progDescLines progDesc [opt-env-conf-test]  ], [opt-env-conf-test]  [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test]  if null commandPath [opt-env-conf-test]  then withHelpAndVersionDocs mVersion docs [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "Available commands", [opt-env-conf-test] - renderCommandDocsShort docs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test]  withHelpAndVersionDocs mVersion sd = simplifyAnyDocs $ AnyDocsOr [helpDocs, versionDocs mVersion, sd] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:444:13-48 [opt-env-conf-test] @@ -441,7 +441,7 @@ [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test] + | True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:413:37-49 [opt-env-conf-test] @@ -410,7 +410,7 @@ [opt-env-conf-test]  -- | Render the output of top-level @--help@ [opt-env-conf-test]  renderHelpPage :: String -> Version -> String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test]  renderHelpPage progname version = [opt-env-conf-test] - renderHelpPageHelper progname [] (Just version) [opt-env-conf-test] + renderHelpPageHelper progname [] (Nothing) [opt-env-conf-test]  [opt-env-conf-test]  -- | Render the output of a @--help@ with at least one command [opt-env-conf-test]  renderCommandHelpPage :: String -> [String] -> CommandDoc (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:434:9-10 [opt-env-conf-test] @@ -431,12 +431,11 @@ [opt-env-conf-test]  [], [opt-env-conf-test]  unlinesChunks $ progDescLines progDesc [opt-env-conf-test]  ], [opt-env-conf-test] - [ headerChunks "Available settings", [opt-env-conf-test]  renderSetDocs $ [opt-env-conf-test]  if null commandPath [opt-env-conf-test]  then withHelpAndVersionDocs mVersion docs [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Doc.hs:297:38-50 [opt-env-conf-test] @@ -294,7 +294,7 @@ [opt-env-conf-test]  AnyDocs (Maybe SetDoc) -> [opt-env-conf-test]  [Chunk] [opt-env-conf-test]  renderManPage progname version progDesc docs' = [opt-env-conf-test] - let docs = withHelpAndVersionDocs (Just version) docs' [opt-env-conf-test] + let docs = withHelpAndVersionDocs (Nothing) docs' [opt-env-conf-test]  optDocs = docsToOptDocs docs [opt-env-conf-test]  envDocs = docsToEnvDocs docs [opt-env-conf-test]  confDocs = docsToConfDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf-test] @@ -305,7 +305,6 @@ [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test]  [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test] - [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:312:15-31 [opt-env-conf-test] @@ -309,7 +309,6 @@ [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test] - [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:312:15-31 [opt-env-conf-test] @@ -309,7 +309,6 @@ [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test] - [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:313:15-47 [opt-env-conf-test] @@ -310,7 +310,6 @@ [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test] - [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:441:11-12 [opt-env-conf-test] @@ -438,11 +438,10 @@ [opt-env-conf-test]  else withHelpDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Available commands", [opt-env-conf-test]  renderCommandDocsShort docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null (docsToCommandDocs docs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withHelpAndVersionDocs :: Maybe Version -> AnyDocs (Maybe SetDoc) -> AnyDocs (Maybe SetDoc) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:313:15-47 [opt-env-conf-test] @@ -310,7 +310,6 @@ [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test] - [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:314:15-48 [opt-env-conf-test] @@ -311,7 +311,6 @@ [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test] - [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:315:15-34 [opt-env-conf-test] @@ -312,7 +312,6 @@ [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test] - [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:314:15-48 [opt-env-conf-test] @@ -311,7 +311,6 @@ [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test] - [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:315:15-34 [opt-env-conf-test] @@ -312,7 +312,6 @@ [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test] - [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:319:15-35 [opt-env-conf-test] @@ -316,7 +316,6 @@ [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] - [".Sh ", "SETTINGS"], [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf-test] @@ -302,23 +302,22 @@ [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  -- See https://man.openbsd.org/mdoc#MACRO_OVERVIEW [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test] - [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test]  [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test]  [".Sh ", "SETTINGS"], [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf-test] @@ -302,23 +302,22 @@ [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  -- See https://man.openbsd.org/mdoc#MACRO_OVERVIEW [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test]  [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test]  [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test]  [".Sh ", "SETTINGS"], [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:326:22-38 [opt-env-conf-test] @@ -323,7 +323,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not (not (null commandDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:326:22-38 [opt-env-conf-test] @@ -323,7 +323,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf-test] @@ -305,7 +305,6 @@ [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test]  [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test] - [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:326:21-39 [opt-env-conf-test] @@ -323,7 +323,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:326:21-39 [opt-env-conf-test] @@ -323,7 +323,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not not ((null commandDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:308:15-53 [opt-env-conf-test] @@ -305,7 +305,6 @@ [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test]  [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test] - [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:326:17-39 [opt-env-conf-test] @@ -323,7 +323,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:305:13-14 [opt-env-conf-test] @@ -302,23 +302,11 @@ [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  -- See https://man.openbsd.org/mdoc#MACRO_OVERVIEW [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test] - [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test] - [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test] - [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test] - [".Sh ", "NAME"], [opt-env-conf-test] - [".Nm ", progNameChunk progname], [opt-env-conf-test] - [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test] - [".Sh ", "VERSION"], [opt-env-conf-test] - [versionChunk version], [opt-env-conf-test] - [".Sh ", "SYNOPSIS"], [opt-env-conf-test] - renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] - [".Sh ", "SETTINGS"], [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:317:15-35 [opt-env-conf-test] @@ -314,7 +314,6 @@ [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test] - [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test]  [".Sh ", "SETTINGS"], [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:323:19-39 [opt-env-conf-test] @@ -320,7 +320,6 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:323:17-18 [opt-env-conf-test] @@ -320,9 +320,7 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test] - renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:323:15-16 [opt-env-conf-test] @@ -320,11 +320,10 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:332:21-39 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:329:19-38 [opt-env-conf-test] @@ -326,7 +326,6 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:329:19-38 [opt-env-conf-test] @@ -326,7 +326,6 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:329:17-18 [opt-env-conf-test] @@ -326,9 +326,7 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] - renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:329:17-18 [opt-env-conf-test] @@ -326,9 +326,8 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:329:15-16 [opt-env-conf-test] @@ -326,11 +326,10 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:338:22-38 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:332:22-38 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:317:15-35 [opt-env-conf-test] @@ -314,7 +314,6 @@ [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test] - [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test]  [".Sh ", "SETTINGS"], [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:323:17-18 [opt-env-conf-test] @@ -320,9 +320,8 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:323:19-39 [opt-env-conf-test] @@ -320,7 +320,6 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:338:22-38 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not (not (nullDocs envDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:332:22-38 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not (not (nullDocs optDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:332:21-39 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not not ((nullDocs optDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not (not (nullDocs optDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:338:21-39 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:326:17-39 [opt-env-conf-test] @@ -323,7 +323,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not (not (null commandDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:338:21-39 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not not ((nullDocs envDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:338:17-39 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:338:17-39 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not (not (nullDocs envDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:335:19-52 [opt-env-conf-test] @@ -332,7 +332,6 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:335:19-52 [opt-env-conf-test] @@ -332,7 +332,6 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:335:15-16 [opt-env-conf-test] @@ -332,11 +332,10 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:344:22-39 [opt-env-conf-test] @@ -341,7 +341,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not (not (nullDocs confDocs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:344:21-40 [opt-env-conf-test] @@ -341,7 +341,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:344:21-40 [opt-env-conf-test] @@ -341,7 +341,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not not ((nullDocs confDocs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:335:17-18 [opt-env-conf-test] @@ -332,9 +332,7 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] - renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:344:17-40 [opt-env-conf-test] @@ -341,7 +341,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:344:17-40 [opt-env-conf-test] @@ -341,7 +341,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not (not (nullDocs confDocs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:341:19-51 [opt-env-conf-test] @@ -338,7 +338,6 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:341:19-51 [opt-env-conf-test] @@ -338,7 +338,6 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:341:17-18 [opt-env-conf-test] @@ -338,9 +338,7 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] - renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:344:22-39 [opt-env-conf-test] @@ -341,7 +341,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:319:15-35 [opt-env-conf-test] @@ -316,7 +316,6 @@ [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] - [".Sh ", "SETTINGS"], [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:341:17-18 [opt-env-conf-test] @@ -338,9 +338,8 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf-test] @@ -302,48 +302,7 @@ [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  -- See https://man.openbsd.org/mdoc#MACRO_OVERVIEW [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ -- Document date [opt-env-conf-test] - [".Dd $Mdocdate$"], [opt-env-conf-test] - -- Document title [opt-env-conf-test] - [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test] - -- Operating system footer [opt-env-conf-test] - [".Os"], [opt-env-conf-test] - -- Section header [opt-env-conf-test] - [".Sh ", "NAME"], [opt-env-conf-test] - [".Nm ", progNameChunk progname], [opt-env-conf-test] - [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test] - [".Sh ", "VERSION"], [opt-env-conf-test] - [versionChunk version], [opt-env-conf-test] - [".Sh ", "SYNOPSIS"], [opt-env-conf-test] - renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] - [".Sh ", "SETTINGS"], [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test] - renderCommandDocs docs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test] - renderLongOptDocs optDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test] - renderEnvDocs envDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] - renderConfDocs confDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render reference documentation [opt-env-conf-test]  renderReferenceDocumentation :: String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf-test] @@ -302,48 +302,31 @@ [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  -- See https://man.openbsd.org/mdoc#MACRO_OVERVIEW [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ -- Document date [opt-env-conf-test] - [".Dd $Mdocdate$"], [opt-env-conf-test] - -- Document title [opt-env-conf-test] - [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test] - -- Operating system footer [opt-env-conf-test] - [".Os"], [opt-env-conf-test] - -- Section header [opt-env-conf-test] - [".Sh ", "NAME"], [opt-env-conf-test] - [".Nm ", progNameChunk progname], [opt-env-conf-test] - [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test] - [".Sh ", "VERSION"], [opt-env-conf-test] - [versionChunk version], [opt-env-conf-test] - [".Sh ", "SYNOPSIS"], [opt-env-conf-test] - renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test] - [".Sh ", "SETTINGS"], [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test] - ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render reference documentation [opt-env-conf-test]  renderReferenceDocumentation :: String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:305:11-12 [opt-env-conf-test] @@ -302,48 +302,42 @@ [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  -- See https://man.openbsd.org/mdoc#MACRO_OVERVIEW [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ -- Document date [opt-env-conf-test]  [".Dd $Mdocdate$"], [opt-env-conf-test]  -- Document title [opt-env-conf-test]  [".Dt ", progNameChunk progname, " 1"], [opt-env-conf-test]  -- Operating system footer [opt-env-conf-test]  [".Os"], [opt-env-conf-test]  -- Section header [opt-env-conf-test]  [".Sh ", "NAME"], [opt-env-conf-test]  [".Nm ", progNameChunk progname], [opt-env-conf-test]  [".Nd ", chunk $ T.pack progDesc], [opt-env-conf-test]  [".Sh ", "VERSION"], [opt-env-conf-test]  [versionChunk version], [opt-env-conf-test]  [".Sh ", "SYNOPSIS"], [opt-env-conf-test]  renderShortOptDocs progname $ docsToOptDocs docs', [opt-env-conf-test]  [".Sh ", "SETTINGS"], [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "COMMANDS"], [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test] - renderConfDocs confDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render reference documentation [opt-env-conf-test]  renderReferenceDocumentation :: String -> AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf-test] @@ -355,11 +355,7 @@ [opt-env-conf-test]  commandDocs = docsToCommandDocs docs [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ usageChunk : renderShortOptDocs progname (docsToOptDocs docs'), [opt-env-conf-test] - [], [opt-env-conf-test] - headerChunks "All settings", [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf-test] @@ -355,11 +355,10 @@ [opt-env-conf-test]  commandDocs = docsToCommandDocs docs [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ usageChunk : renderShortOptDocs progname (docsToOptDocs docs'), [opt-env-conf-test]  [], [opt-env-conf-test]  headerChunks "All settings", [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:358:13-14 [opt-env-conf-test] @@ -355,11 +355,10 @@ [opt-env-conf-test]  commandDocs = docsToCommandDocs docs [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ usageChunk : renderShortOptDocs progname (docsToOptDocs docs'), [opt-env-conf-test]  [], [opt-env-conf-test]  headerChunks "All settings", [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:367:21-39 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:367:22-38 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not (not (null commandDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:341:15-16 [opt-env-conf-test] @@ -338,11 +338,10 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "CONFIGURATION VALUES"], [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Render reference documentation [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:367:22-38 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:364:17-18 [opt-env-conf-test] @@ -361,9 +361,7 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "All commands", [opt-env-conf-test] - renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:364:17-18 [opt-env-conf-test] @@ -361,9 +361,8 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:364:15-16 [opt-env-conf-test] @@ -361,11 +361,10 @@ [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:373:22-38 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:373:21-39 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:367:17-39 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:367:21-39 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not not ((null commandDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:367:17-39 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] + | not (not (null commandDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:373:21-39 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not not ((nullDocs optDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:370:17-18 [opt-env-conf-test] @@ -367,9 +367,8 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:370:15-16 [opt-env-conf-test] @@ -367,11 +367,10 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:379:21-39 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:335:17-18 [opt-env-conf-test] @@ -332,9 +332,8 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:379:17-39 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:376:17-18 [opt-env-conf-test] @@ -373,9 +373,7 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Environment Variables", [opt-env-conf-test] - renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:376:15-16 [opt-env-conf-test] @@ -373,11 +373,10 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:385:22-39 [opt-env-conf-test] @@ -382,7 +382,7 @@ [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:385:22-39 [opt-env-conf-test] @@ -382,7 +382,7 @@ [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not (not (nullDocs confDocs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:385:21-40 [opt-env-conf-test] @@ -382,7 +382,7 @@ [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:373:22-38 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not (not (nullDocs optDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | not (not (nullDocs optDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:370:17-18 [opt-env-conf-test] @@ -367,9 +367,7 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Options", [opt-env-conf-test] - renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:379:17-39 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not (not (nullDocs envDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:379:22-38 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not (not (nullDocs envDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:379:22-38 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not (True) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:379:21-39 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] + | not not ((nullDocs envDocs)) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:385:21-40 [opt-env-conf-test] @@ -382,7 +382,7 @@ [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not not ((nullDocs confDocs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:385:17-40 [opt-env-conf-test] @@ -382,7 +382,7 @@ [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:385:17-40 [opt-env-conf-test] @@ -382,7 +382,7 @@ [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] + | not (not (nullDocs confDocs)) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:376:17-18 [opt-env-conf-test] @@ -373,9 +373,8 @@ [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:382:17-18 [opt-env-conf-test] @@ -379,9 +379,7 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Configuration Values", [opt-env-conf-test] - renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Doc.hs:382:15-16 [opt-env-conf-test] @@ -379,11 +379,10 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf-test] @@ -355,36 +355,31 @@ [opt-env-conf-test]  commandDocs = docsToCommandDocs docs [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ usageChunk : renderShortOptDocs progname (docsToOptDocs docs'), [opt-env-conf-test] - [], [opt-env-conf-test] - headerChunks "All settings", [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test] - ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf-test] @@ -355,36 +355,30 @@ [opt-env-conf-test]  commandDocs = docsToCommandDocs docs [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ usageChunk : renderShortOptDocs progname (docsToOptDocs docs'), [opt-env-conf-test]  [], [opt-env-conf-test]  headerChunks "All settings", [opt-env-conf-test]  renderSetDocs docs [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "All commands", [opt-env-conf-test]  renderCommandDocs docs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "Configuration Values", [opt-env-conf-test] - renderConfDocs confDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf-test] @@ -74,7 +74,7 @@ [opt-env-conf-test]  deriving (Show) [opt-env-conf-test]  [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test] - { optDocTryArgument :: !Bool, [opt-env-conf-test] + { False :: !Bool, [opt-env-conf-test]  optDocTrySwitch :: !Bool, [opt-env-conf-test]  optDocTryOption :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf-test] @@ -74,7 +74,7 @@ [opt-env-conf-test]  deriving (Show) [opt-env-conf-test]  [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test] - { optDocTryArgument :: !Bool, [opt-env-conf-test] + { True :: !Bool, [opt-env-conf-test]  optDocTrySwitch :: !Bool, [opt-env-conf-test]  optDocTryOption :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:358:11-12 [opt-env-conf-test] @@ -355,36 +355,7 @@ [opt-env-conf-test]  commandDocs = docsToCommandDocs docs [opt-env-conf-test]  in unlinesChunks $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ usageChunk : renderShortOptDocs progname (docsToOptDocs docs'), [opt-env-conf-test] - [], [opt-env-conf-test] - headerChunks "All settings", [opt-env-conf-test] - renderSetDocs docs [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "All commands", [opt-env-conf-test] - renderCommandDocs docs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (null commandDocs) [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "Options", [opt-env-conf-test] - renderLongOptDocs optDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "Environment Variables", [opt-env-conf-test] - renderEnvDocs envDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs envDocs) [opt-env-conf-test] - ], [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ headerChunks "Configuration Values", [opt-env-conf-test] - renderConfDocs confDocs [opt-env-conf-test] - ] [opt-env-conf-test] - | not (nullDocs confDocs) [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  nullDocs :: AnyDocs a -> Bool [opt-env-conf-test]  nullDocs = \case [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:77:5-22 [opt-env-conf-test] @@ -74,7 +74,7 @@ [opt-env-conf-test]  deriving (Show) [opt-env-conf-test]  [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test] - { optDocTryArgument :: !Bool, [opt-env-conf-test] + { not (optDocTryArgument) :: !Bool, [opt-env-conf-test]  optDocTrySwitch :: !Bool, [opt-env-conf-test]  optDocTryOption :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf-test] @@ -75,7 +75,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test]  { optDocTryArgument :: !Bool, [opt-env-conf-test] - optDocTrySwitch :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  optDocTryOption :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test]  optDocDefault :: !(Maybe String), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf-test] @@ -75,7 +75,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test]  { optDocTryArgument :: !Bool, [opt-env-conf-test] - optDocTrySwitch :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  optDocTryOption :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test]  optDocDefault :: !(Maybe String), [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:78:5-20 [opt-env-conf-test] @@ -75,7 +75,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test]  { optDocTryArgument :: !Bool, [opt-env-conf-test] -  optDocTrySwitch :: !Bool, [opt-env-conf-test] +  not (optDocTrySwitch) :: !Bool, [opt-env-conf-test]  optDocTryOption :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test]  optDocDefault :: !(Maybe String), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf-test] @@ -76,7 +76,7 @@ [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test]  { optDocTryArgument :: !Bool, [opt-env-conf-test]  optDocTrySwitch :: !Bool, [opt-env-conf-test] - optDocTryOption :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test]  optDocDefault :: !(Maybe String), [opt-env-conf-test]  optDocExamples :: ![String], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Doc.hs:382:17-18 [opt-env-conf-test] @@ -379,9 +379,8 @@ [opt-env-conf-test]  | not (nullDocs envDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ headerChunks "Configuration Values", [opt-env-conf-test]  renderConfDocs confDocs [opt-env-conf-test]  ] [opt-env-conf-test]  | not (nullDocs confDocs) [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf-test] @@ -76,7 +76,7 @@ [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test]  { optDocTryArgument :: !Bool, [opt-env-conf-test]  optDocTrySwitch :: !Bool, [opt-env-conf-test] - optDocTryOption :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test]  optDocDefault :: !(Maybe String), [opt-env-conf-test]  optDocExamples :: ![String], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf-test] @@ -60,7 +60,7 @@ [opt-env-conf-test]  import Text.Colour.Layout [opt-env-conf-test]  [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test] - { setDocTryArgument :: !Bool, [opt-env-conf-test] + { False :: !Bool, [opt-env-conf-test]  setDocTrySwitch :: !Bool, [opt-env-conf-test]  setDocTryOption :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:79:5-20 [opt-env-conf-test] @@ -76,7 +76,7 @@ [opt-env-conf-test]  data OptDoc = OptDoc [opt-env-conf-test]  { optDocTryArgument :: !Bool, [opt-env-conf-test]  optDocTrySwitch :: !Bool, [opt-env-conf-test] -  optDocTryOption :: !Bool, [opt-env-conf-test] +  not (optDocTryOption) :: !Bool, [opt-env-conf-test]  optDocDasheds :: ![Dashed], [opt-env-conf-test]  optDocDefault :: !(Maybe String), [opt-env-conf-test]  optDocExamples :: ![String], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf-test] @@ -60,7 +60,7 @@ [opt-env-conf-test]  import Text.Colour.Layout [opt-env-conf-test]  [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test] - { setDocTryArgument :: !Bool, [opt-env-conf-test] + { True :: !Bool, [opt-env-conf-test]  setDocTrySwitch :: !Bool, [opt-env-conf-test]  setDocTryOption :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:63:5-22 [opt-env-conf-test] @@ -60,7 +60,7 @@ [opt-env-conf-test]  import Text.Colour.Layout [opt-env-conf-test]  [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test] - { setDocTryArgument :: !Bool, [opt-env-conf-test] + { not (setDocTryArgument) :: !Bool, [opt-env-conf-test]  setDocTrySwitch :: !Bool, [opt-env-conf-test]  setDocTryOption :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf-test] @@ -61,7 +61,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test]  { setDocTryArgument :: !Bool, [opt-env-conf-test] - setDocTrySwitch :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  setDocTryOption :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test]  setDocEnvVars :: !(Maybe (NonEmpty String)), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test]  { setDocTryArgument :: !Bool, [opt-env-conf-test]  setDocTrySwitch :: !Bool, [opt-env-conf-test] - setDocTryOption :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test]  setDocEnvVars :: !(Maybe (NonEmpty String)), [opt-env-conf-test]  setDocConfKeys :: !(Maybe (NonEmpty (NonEmpty String, JSONSchema))), [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf-test] @@ -61,7 +61,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test]  { setDocTryArgument :: !Bool, [opt-env-conf-test] -  setDocTrySwitch :: !Bool, [opt-env-conf-test] +  not (setDocTrySwitch) :: !Bool, [opt-env-conf-test]  setDocTryOption :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test]  setDocEnvVars :: !(Maybe (NonEmpty String)), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:64:5-20 [opt-env-conf-test] @@ -61,7 +61,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test]  { setDocTryArgument :: !Bool, [opt-env-conf-test] - setDocTrySwitch :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  setDocTryOption :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test]  setDocEnvVars :: !(Maybe (NonEmpty String)), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test]  { setDocTryArgument :: !Bool, [opt-env-conf-test]  setDocTrySwitch :: !Bool, [opt-env-conf-test] - setDocTryOption :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test]  setDocEnvVars :: !(Maybe (NonEmpty String)), [opt-env-conf-test]  setDocConfKeys :: !(Maybe (NonEmpty (NonEmpty String, JSONSchema))), [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf-test] @@ -269,9 +269,8 @@ [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test]  applyComponent d ".." = parent d [opt-env-conf-test]  applyComponent d c = case parseRelDir c of [opt-env-conf-test] - Nothing -> d [opt-env-conf-test]  Just rd -> d rd [opt-env-conf-test]  [opt-env-conf-test]  filterPrefix :: String -> [CompletionResult] -> [CompletionResult] [opt-env-conf-test]  filterPrefix s = filter ((s `isPrefixOf`) . completionResultValue) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:266:27-35 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | not (not (null seg))] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:266:27-35 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | not (True)] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:266:26-36 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | not True] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | True] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | not (not (null seg))] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completer.hs:266:15-37 [opt-env-conf-test] @@ -263,7 +263,6 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:267:34-42 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | not (True)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:267:34-42 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | not (not (null seg))] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:267:33-43 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | not True] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:266:26-36 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | not not ((null seg))] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf-test] @@ -269,9 +269,8 @@ [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test]  applyComponent d ".." = parent d [opt-env-conf-test]  applyComponent d c = case parseRelDir c of [opt-env-conf-test]  Nothing -> d [opt-env-conf-test] - Just rd -> d rd [opt-env-conf-test]  [opt-env-conf-test]  filterPrefix :: String -> [CompletionResult] -> [CompletionResult] [opt-env-conf-test]  filterPrefix s = filter ((s `isPrefixOf`) . completionResultValue) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | not (not (null seg))] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:265:7-66 [opt-env-conf-test] @@ -262,9 +262,8 @@ [opt-env-conf-test]  splitOnSlash [] = [] [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completer.hs:243:28-76 [opt-env-conf-test] @@ -240,7 +240,6 @@ [opt-env-conf-test]  let (curDirPrefix, afterCurDir) = stripCurDir fp' [opt-env-conf-test]  components = splitOnSlash afterCurDir [opt-env-conf-test]  -- Find the index after the last "../" component [opt-env-conf-test] - lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test]  in if lastDotDotIdx == 0 [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:243:23-27 [opt-env-conf-test] @@ -240,9 +240,8 @@ [opt-env-conf-test]  let (curDirPrefix, afterCurDir) = stripCurDir fp' [opt-env-conf-test]  components = splitOnSlash afterCurDir [opt-env-conf-test]  -- Find the index after the last "../" component [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test] - [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test]  in if lastDotDotIdx == 0 [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test]  else [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Completer.hs:246:27-28 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test] - in if lastDotDotIdx == 0 [opt-env-conf-test] + in if lastDotDotIdx == 1 [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test]  else [opt-env-conf-test]  let prefixComponents = take lastDotDotIdx components [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Completer.hs:244:15-16 [opt-env-conf-test] @@ -241,7 +241,7 @@ [opt-env-conf-test]  components = splitOnSlash afterCurDir [opt-env-conf-test]  -- Find the index after the last "../" component [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test] - [] -> 0 [opt-env-conf-test] + [] -> 1 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test]  in if lastDotDotIdx == 0 [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:265:7-66 [opt-env-conf-test] @@ -262,9 +262,8 @@ [opt-env-conf-test]  splitOnSlash [] = [] [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test] - in if lastDotDotIdx == 0 [opt-env-conf-test] + in if not (lastDotDotIdx == 0) [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test]  else [opt-env-conf-test]  let prefixComponents = take lastDotDotIdx components [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:254:19-47 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | True, not (null remainderComponents) = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test] - in if lastDotDotIdx == 0 [opt-env-conf-test] + in if False [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test]  else [opt-env-conf-test]  let prefixComponents = take lastDotDotIdx components [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:254:19-47 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | not ("/" `isSuffixOf` afterCurDir), not (null remainderComponents) = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completer.hs:267:22-44 [opt-env-conf-test] @@ -264,7 +264,6 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:254:54-78 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | "/" `isSuffixOf` afterCurDir, not (True) = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:246:10-28 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test] - in if lastDotDotIdx == 0 [opt-env-conf-test] + in if True [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test]  else [opt-env-conf-test]  let prefixComponents = take lastDotDotIdx components [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | True] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Doc.hs:65:5-20 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  data SetDoc = SetDoc [opt-env-conf-test]  { setDocTryArgument :: !Bool, [opt-env-conf-test]  setDocTrySwitch :: !Bool, [opt-env-conf-test] -  setDocTryOption :: !Bool, [opt-env-conf-test] +  not (setDocTryOption) :: !Bool, [opt-env-conf-test]  setDocDasheds :: ![Dashed], [opt-env-conf-test]  setDocEnvVars :: !(Maybe (NonEmpty String)), [opt-env-conf-test]  setDocConfKeys :: !(Maybe (NonEmpty (NonEmpty String, JSONSchema))), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:243:66-75 [opt-env-conf-test] @@ -240,7 +240,7 @@ [opt-env-conf-test]  let (curDirPrefix, afterCurDir) = stripCurDir fp' [opt-env-conf-test]  components = splitOnSlash afterCurDir [opt-env-conf-test]  -- Find the index after the last "../" component [opt-env-conf-test] - lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test] + lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, True] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test]  in if lastDotDotIdx == 0 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:267:33-43 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | not not ((null seg))] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:254:53-79 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | "/" `isSuffixOf` afterCurDir, not True = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:254:49-79 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | "/" `isSuffixOf` afterCurDir, True = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf-test] @@ -211,9 +211,8 @@ [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test]  hiddenRel p = case toFilePath p of [opt-env-conf-test] - ('.' : _) -> True [opt-env-conf-test]  _ -> False [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test]  stripCurDir = \case [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf-test] @@ -211,9 +211,9 @@ [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test] -hiddenRel p = case toFilePath p of [opt-env-conf-test] +hiddenRel p = False= case toFilePath p of [opt-env-conf-test]  ('.' : _) -> True [opt-env-conf-test]  _ -> False [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test]  stripCurDir = \case [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Completer.hs:215:16-20 [opt-env-conf-test] @@ -212,7 +212,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test]  hiddenRel p = case toFilePath p of [opt-env-conf-test] - ('.' : _) -> True [opt-env-conf-test] + ('.' : _) -> False [opt-env-conf-test]  _ -> False [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Completer.hs:216:8-13 [opt-env-conf-test] @@ -213,7 +213,7 @@ [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test]  hiddenRel p = case toFilePath p of [opt-env-conf-test]  ('.' : _) -> True [opt-env-conf-test] - _ -> False [opt-env-conf-test] + _ -> True [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test]  stripCurDir = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf-test] @@ -155,11 +155,10 @@ [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test] - _ -> pure [] [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:254:49-79 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | "/" `isSuffixOf` afterCurDir, not (not (null remainderComponents)) = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf-test] @@ -155,11 +155,8 @@ [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test] - [] -> do [opt-env-conf-test] - (ds, _) <- listDirRel baseDir [opt-env-conf-test] - pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test]  _ -> pure [] [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf-test] @@ -211,9 +211,9 @@ [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test] -hiddenRel p = case toFilePath p of [opt-env-conf-test] +hiddenRel p = not (case toFilePath p of [opt-env-conf-test]  ('.' : _) -> True [opt-env-conf-test] - _ -> False [opt-env-conf-test] + _ -> False) [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test]  stripCurDir = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf-test] @@ -211,9 +211,8 @@ [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test]  hiddenRel p = case toFilePath p of [opt-env-conf-test]  ('.' : _) -> True [opt-env-conf-test] - _ -> False [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test]  stripCurDir = \case [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:254:53-79 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | "/" `isSuffixOf` afterCurDir, not not ((null remainderComponents)) = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:254:54-78 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  prefix = curDirPrefix <> concatMap (<> "/") prefixComponents [opt-env-conf-test]  -- Preserve trailing slash from the original input [opt-env-conf-test]  trailingSlash [opt-env-conf-test] - | "/" `isSuffixOf` afterCurDir, not (null remainderComponents) = "/" [opt-env-conf-test] + | "/" `isSuffixOf` afterCurDir, not (not (null remainderComponents)) = "/" [opt-env-conf-test]  | otherwise = "" [opt-env-conf-test]  remainder = intercalate "/" remainderComponents <> trailingSlash [opt-env-conf-test]  baseDir = foldl' applyComponent here prefixComponents [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:214:15-13 [opt-env-conf-test] @@ -211,9 +211,9 @@ [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  hiddenRel :: Path Rel f -> Bool [opt-env-conf-test] -hiddenRel p = case toFilePath p of [opt-env-conf-test] +hiddenRel p = True= case toFilePath p of [opt-env-conf-test]  ('.' : _) -> True [opt-env-conf-test]  _ -> False [opt-env-conf-test]  [opt-env-conf-test]  stripCurDir :: FilePath -> (FilePath, FilePath) [opt-env-conf-test]  stripCurDir = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf-test] @@ -154,19 +154,16 @@ [opt-env-conf-test]  directoryPathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test]  _ -> pure [] [opt-env-conf-test] - Just (Abs ad) -> do [opt-env-conf-test] - (ds, _) <- listDirForgiving ad [opt-env-conf-test] - pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  Just (Rel rd) -> do [opt-env-conf-test]  let ad = baseDir rd [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:243:66-75 [opt-env-conf-test] @@ -240,7 +240,7 @@ [opt-env-conf-test]  let (curDirPrefix, afterCurDir) = stripCurDir fp' [opt-env-conf-test]  components = splitOnSlash afterCurDir [opt-env-conf-test]  -- Find the index after the last "../" component [opt-env-conf-test] - lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test] + lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, not (c == "..")] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test]  ixs -> maximum ixs [opt-env-conf-test]  in if lastDotDotIdx == 0 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if not (hiddenRel (dirname af)) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf-test] @@ -154,19 +154,14 @@ [opt-env-conf-test]  directoryPathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test] - Nothing -> case fp of [opt-env-conf-test] - [] -> do [opt-env-conf-test] - (ds, _) <- listDirRel baseDir [opt-env-conf-test] - pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test] - _ -> pure [] [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  Just (Rel rd) -> do [opt-env-conf-test]  let ad = baseDir rd [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:243:23-27 [opt-env-conf-test] @@ -240,9 +240,8 @@ [opt-env-conf-test]  let (curDirPrefix, afterCurDir) = stripCurDir fp' [opt-env-conf-test]  components = splitOnSlash afterCurDir [opt-env-conf-test]  -- Find the index after the last "../" component [opt-env-conf-test]  lastDotDotIdx = case [i | (i, c) <- zip [1 ..] components, c == ".."] of [opt-env-conf-test]  [] -> 0 [opt-env-conf-test] - ixs -> maximum ixs [opt-env-conf-test]  in if lastDotDotIdx == 0 [opt-env-conf-test]  then (curDirPrefix, afterCurDir, here) [opt-env-conf-test]  else [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if not (fp == ".") [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf-test] @@ -183,7 +183,7 @@ [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf-test] @@ -168,24 +168,23 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test] - Nothing -> pure [] [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test]  let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test]  if fp == "." [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test]  let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf-test] @@ -168,24 +168,13 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test]  let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test] - Just (Rel rf) -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] - then do [opt-env-conf-test] - (ds, _) <- listDirRel baseDir [opt-env-conf-test] - pure (map fromRelDir ds) [opt-env-conf-test] - else do [opt-env-conf-test] - let dir = parent rf [opt-env-conf-test] - let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] - (ds, _) <- listDirForgiving ad [opt-env-conf-test] - pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf-test] @@ -71,14 +71,8 @@ [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  (dirsFromParentListing, filesFromParentListing) <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test] - [] -> do [opt-env-conf-test] - (ds, fs) <- listDirRel baseDir [opt-env-conf-test] - pure [opt-env-conf-test] - ( map fromRelDir $ filter (not . hiddenRel) ds, [opt-env-conf-test] - map fromRelFile $ filter (not . hiddenRel) fs [opt-env-conf-test] - ) [opt-env-conf-test]  _ -> pure ([], []) [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completer.hs:192:9-10 [opt-env-conf-test] @@ -189,9 +189,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ dirsFromPartialListing, [opt-env-conf-test]  dirsFromParentListing [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  addPrefix :: String -> CompletionResult -> CompletionResult [opt-env-conf-test]  addPrefix pfx cr = cr {completionResultValue = pfx <> completionResultValue cr} [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completer.hs:192:9-10 [opt-env-conf-test] @@ -189,9 +189,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ dirsFromPartialListing, [opt-env-conf-test] - dirsFromParentListing [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  addPrefix :: String -> CompletionResult -> CompletionResult [opt-env-conf-test]  addPrefix pfx cr = cr {completionResultValue = pfx <> completionResultValue cr} [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf-test] @@ -70,28 +70,20 @@ [opt-env-conf-test]  filePathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  (dirsFromParentListing, filesFromParentListing) <- case parseSomeDir fp of [opt-env-conf-test] - Nothing -> case fp of [opt-env-conf-test] - [] -> do [opt-env-conf-test] - (ds, fs) <- listDirRel baseDir [opt-env-conf-test] - pure [opt-env-conf-test] - ( map fromRelDir $ filter (not . hiddenRel) ds, [opt-env-conf-test] - map fromRelFile $ filter (not . hiddenRel) fs [opt-env-conf-test] - ) [opt-env-conf-test] - _ -> pure ([], []) [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map (fromAbsFile . (ad )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  Just (Rel rd) -> do [opt-env-conf-test]  let ad = baseDir rd [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf-test] @@ -183,7 +183,7 @@ [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if not (hiddenRel rf) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf-test] @@ -183,7 +183,7 @@ [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf-test] @@ -168,24 +168,19 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test] - Just (Abs af) -> do [opt-env-conf-test] - let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test] - (ds, _) <- listDirForgiving dir [opt-env-conf-test] - pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test]  if fp == "." [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test]  let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:175:31-53 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf-test] @@ -71,14 +71,13 @@ [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  (dirsFromParentListing, filesFromParentListing) <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map fromRelFile $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test] - _ -> pure ([], []) [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf-test] @@ -95,7 +95,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf-test] @@ -95,7 +95,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if not (fp == ".") [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf-test] @@ -105,7 +105,7 @@ [opt-env-conf-test]  else pure ([], []) [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving dir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf-test] @@ -114,7 +114,7 @@ [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:144:9-50 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  pure $ filter matchesExtension results [opt-env-conf-test]  where [opt-env-conf-test]  matchesExtension cr [opt-env-conf-test] - | "/" `isSuffixOf` completionResultValue cr = True [opt-env-conf-test] + | True = True [opt-env-conf-test]  | otherwise = any (`isSuffixOf` completionResultValue cr) exts [opt-env-conf-test]  [opt-env-conf-test]  directoryPath :: Completer [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf-test] @@ -123,11 +123,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ map fileResult filesFromPartialListing, [opt-env-conf-test] - map fileResult filesFromParentListing, [opt-env-conf-test] - map dirResult dirsFromPartialListing, [opt-env-conf-test] - map dirResult dirsFromParentListing [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  addPrefix :: String -> CompletionResult -> CompletionResult [opt-env-conf-test]  addPrefix pfx cr = cr {completionResultValue = pfx <> completionResultValue cr} [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf-test] @@ -93,33 +93,25 @@ [opt-env-conf-test]  map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  if fp == "." [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir ds, [opt-env-conf-test]  map fromRelFile fs [opt-env-conf-test]  ) [opt-env-conf-test]  else pure ([], []) [opt-env-conf-test] - Just (Abs af) -> do [opt-env-conf-test] - let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test] - (ds, fs) <- listDirForgiving dir [opt-env-conf-test] - pure [opt-env-conf-test] - ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test] - map (fromAbsFile . (dir )) $ filterHidden fs [opt-env-conf-test] - ) [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test]  let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  map (fromRelFile . (dir )) $ filterHidden fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf-test] @@ -93,33 +93,24 @@ [opt-env-conf-test]  map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] - then do [opt-env-conf-test] - (ds, fs) <- listDirRel baseDir [opt-env-conf-test] - pure [opt-env-conf-test] - ( map fromRelDir ds, [opt-env-conf-test] - map fromRelFile fs [opt-env-conf-test] - ) [opt-env-conf-test] - else pure ([], []) [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test]  let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving dir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  map (fromAbsFile . (dir )) $ filterHidden fs [opt-env-conf-test]  ) [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test]  let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  map (fromRelFile . (dir )) $ filterHidden fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf-test] @@ -123,11 +123,10 @@ [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] - [ map fileResult filesFromPartialListing, [opt-env-conf-test]  map fileResult filesFromParentListing, [opt-env-conf-test]  map dirResult dirsFromPartialListing, [opt-env-conf-test]  map dirResult dirsFromParentListing [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  addPrefix :: String -> CompletionResult -> CompletionResult [opt-env-conf-test]  addPrefix pfx cr = cr {completionResultValue = pfx <> completionResultValue cr} [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf-test] @@ -93,33 +93,24 @@ [opt-env-conf-test]  map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  if fp == "." [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir ds, [opt-env-conf-test]  map fromRelFile fs [opt-env-conf-test]  ) [opt-env-conf-test]  else pure ([], []) [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test]  let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving dir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  map (fromAbsFile . (dir )) $ filterHidden fs [opt-env-conf-test]  ) [opt-env-conf-test] - Just (Rel rf) -> do [opt-env-conf-test] - let dir = parent rf [opt-env-conf-test] - let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] - (ds, fs) <- listDirForgiving ad [opt-env-conf-test] - pure [opt-env-conf-test] - ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test] - map (fromRelFile . (dir )) $ filterHidden fs [opt-env-conf-test] - ) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf-test] @@ -142,7 +142,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  matchesExtension cr [opt-env-conf-test]  | "/" `isSuffixOf` completionResultValue cr = True [opt-env-conf-test] - | otherwise = any (`isSuffixOf` completionResultValue cr) exts [opt-env-conf-test] + | otherwise = True [opt-env-conf-test]  [opt-env-conf-test]  directoryPath :: Completer [opt-env-conf-test]  directoryPath = Completer $ \fp' -> do [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Completer.hs:144:53-57 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  pure $ filter matchesExtension results [opt-env-conf-test]  where [opt-env-conf-test]  matchesExtension cr [opt-env-conf-test] - | "/" `isSuffixOf` completionResultValue cr = True [opt-env-conf-test] + | "/" `isSuffixOf` completionResultValue cr = False [opt-env-conf-test]  | otherwise = any (`isSuffixOf` completionResultValue cr) exts [opt-env-conf-test]  [opt-env-conf-test]  directoryPath :: Completer [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf-test] @@ -120,5 +120,4 @@ [opt-env-conf-test]  parenthesise cs = fore cyan "(" : cs ++ [fore cyan ")"] [opt-env-conf-test]  [opt-env-conf-test]  bracketise :: [Chunk] -> [Chunk] [opt-env-conf-test] -bracketise [c] = [fore cyan "[", c, fore cyan "]"] [opt-env-conf-test]  bracketise cs = fore cyan "[" : cs ++ [fore cyan "]"] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf-test] @@ -120,5 +120,4 @@ [opt-env-conf-test]  parenthesise cs = fore cyan "(" : cs ++ [fore cyan ")"] [opt-env-conf-test]  [opt-env-conf-test]  bracketise :: [Chunk] -> [Chunk] [opt-env-conf-test] -bracketise [c] = [fore cyan "[", c, fore cyan "]"] [opt-env-conf-test]  bracketise cs = fore cyan "[" : cs ++ [fore cyan "]"] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:123:18-51 [opt-env-conf-test] @@ -120,5 +120,4 @@ [opt-env-conf-test]  parenthesise cs = fore cyan "(" : cs ++ [fore cyan ")"] [opt-env-conf-test]  [opt-env-conf-test]  bracketise :: [Chunk] -> [Chunk] [opt-env-conf-test] -bracketise [c] = [fore cyan "[", c, fore cyan "]"] [opt-env-conf-test]  bracketise cs = fore cyan "[" : cs ++ [fore cyan "]"] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf-test] @@ -84,9 +84,8 @@ [opt-env-conf-test]  syntaxChunk = fore blue . chunk . T.pack [opt-env-conf-test]  [opt-env-conf-test]  capabilitiesChunks :: Set Capability -> [Chunk] [opt-env-conf-test]  capabilitiesChunks caps = case Set.toList caps of [opt-env-conf-test] - [] -> [] [opt-env-conf-test]  cs -> intersperse ", " (map capabilityChunk cs) [opt-env-conf-test]  [opt-env-conf-test]  capabilityChunk :: Capability -> Chunk [opt-env-conf-test]  capabilityChunk = fore green . chunk . unCapability [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Output.hs:112:34-39 [opt-env-conf-test] @@ -109,7 +109,7 @@ [opt-env-conf-test]  cleanPackage pkg = [opt-env-conf-test]  T.unpack $ [opt-env-conf-test]  T.intercalate "-" $ [opt-env-conf-test] - takeWhile (not . maybe False (Char.isDigit . fst) . T.uncons) $ [opt-env-conf-test] + takeWhile (not . maybe True (Char.isDigit . fst) . T.uncons) $ [opt-env-conf-test]  T.splitOn "-" (T.pack pkg) [opt-env-conf-test]  [opt-env-conf-test]  indent :: [[Chunk]] -> [[Chunk]] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf-test] @@ -84,9 +84,8 @@ [opt-env-conf-test]  syntaxChunk = fore blue . chunk . T.pack [opt-env-conf-test]  [opt-env-conf-test]  capabilitiesChunks :: Set Capability -> [Chunk] [opt-env-conf-test]  capabilitiesChunks caps = case Set.toList caps of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - cs -> intersperse ", " (map capabilityChunk cs) [opt-env-conf-test]  [opt-env-conf-test]  capabilityChunk :: Capability -> Chunk [opt-env-conf-test]  capabilityChunk = fore green . chunk . unCapability [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:81:18-44 [opt-env-conf-test] @@ -78,7 +78,6 @@ [opt-env-conf-test]  helpChunk = fore blue . chunk . T.pack [opt-env-conf-test]  [opt-env-conf-test]  headerChunks :: Text -> [Chunk] [opt-env-conf-test] -headerChunks t = [fore cyan (chunk t), ":"] [opt-env-conf-test]  [opt-env-conf-test]  syntaxChunk :: String -> Chunk [opt-env-conf-test]  syntaxChunk = fore blue . chunk . T.pack [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:71:12-59 [opt-env-conf-test] @@ -68,7 +68,6 @@ [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:71:12-59 [opt-env-conf-test] @@ -68,7 +68,6 @@ [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:72:8-91 [opt-env-conf-test] @@ -69,7 +69,6 @@ [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test] - _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:72:8-91 [opt-env-conf-test] @@ -69,7 +69,6 @@ [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test] - _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf-test] @@ -66,10 +66,9 @@ [opt-env-conf-test]  defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test] - [] -> [] [opt-env-conf-test]  [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf-test] @@ -66,10 +66,9 @@ [opt-env-conf-test]  defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf-test] @@ -66,10 +66,9 @@ [opt-env-conf-test]  defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test] - _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:66:26-73 [opt-env-conf-test] @@ -63,7 +63,6 @@ [opt-env-conf-test]  confValChunk = fore white . chunk . T.pack . intercalate "." . NE.toList [opt-env-conf-test]  [opt-env-conf-test]  defaultValueChunks :: String -> [Chunk] [opt-env-conf-test] -defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf-test] @@ -154,19 +154,15 @@ [opt-env-conf-test]  directoryPathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test]  _ -> pure [] [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test] - Just (Rel rd) -> do [opt-env-conf-test] - let ad = baseDir rd [opt-env-conf-test] - (ds, _) <- listDirForgiving ad [opt-env-conf-test] - pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:98:12-21 [opt-env-conf-test] @@ -95,7 +95,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:81:18-44 [opt-env-conf-test] @@ -78,7 +78,6 @@ [opt-env-conf-test]  helpChunk = fore blue . chunk . T.pack [opt-env-conf-test]  [opt-env-conf-test]  headerChunks :: Text -> [Chunk] [opt-env-conf-test] -headerChunks t = [fore cyan (chunk t), ":"] [opt-env-conf-test]  [opt-env-conf-test]  syntaxChunk :: String -> Chunk [opt-env-conf-test]  syntaxChunk = fore blue . chunk . T.pack [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf-test] @@ -227,10 +227,7 @@ [opt-env-conf-test]  internalParser p = [opt-env-conf-test]  choice [opt-env-conf-test]  [ setting [opt-env-conf-test] - [ switch ShowVersion, [opt-env-conf-test] - long "version", [opt-env-conf-test] - hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf-test] @@ -70,28 +70,22 @@ [opt-env-conf-test]  filePathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  (dirsFromParentListing, filesFromParentListing) <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map fromRelFile $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  _ -> pure ([], []) [opt-env-conf-test] - Just (Abs ad) -> do [opt-env-conf-test] - (ds, fs) <- listDirForgiving ad [opt-env-conf-test] - pure [opt-env-conf-test] - ( map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds, [opt-env-conf-test] - map (fromAbsFile . (ad )) $ filter (not . hiddenRel) fs [opt-env-conf-test] - ) [opt-env-conf-test]  Just (Rel rd) -> do [opt-env-conf-test]  let ad = baseDir rd [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Output.hs:66:26-73 [opt-env-conf-test] @@ -63,7 +63,6 @@ [opt-env-conf-test]  confValChunk = fore white . chunk . T.pack . intercalate "." . NE.toList [opt-env-conf-test]  [opt-env-conf-test]  defaultValueChunks :: String -> [Chunk] [opt-env-conf-test] -defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf-test] @@ -227,10 +227,9 @@ [opt-env-conf-test]  internalParser p = [opt-env-conf-test]  choice [opt-env-conf-test]  [ setting [opt-env-conf-test] - [ switch ShowVersion, [opt-env-conf-test]  long "version", [opt-env-conf-test]  hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completer.hs:126:9-10 [opt-env-conf-test] @@ -123,11 +123,10 @@ [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test]  [ map fileResult filesFromPartialListing, [opt-env-conf-test]  map fileResult filesFromParentListing, [opt-env-conf-test]  map dirResult dirsFromPartialListing, [opt-env-conf-test] - map dirResult dirsFromParentListing [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  addPrefix :: String -> CompletionResult -> CompletionResult [opt-env-conf-test]  addPrefix pfx cr = cr {completionResultValue = pfx <> completionResultValue cr} [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf-test] @@ -105,7 +105,7 @@ [opt-env-conf-test]  else pure ([], []) [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if not (hiddenRel (filename af)) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving dir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf-test] @@ -232,11 +232,10 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf-test] @@ -232,11 +232,10 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf-test] @@ -142,7 +142,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  matchesExtension cr [opt-env-conf-test]  | "/" `isSuffixOf` completionResultValue cr = True [opt-env-conf-test] - | otherwise = any (`isSuffixOf` completionResultValue cr) exts [opt-env-conf-test] + | otherwise = not (any (`isSuffixOf` completionResultValue cr) exts) [opt-env-conf-test]  [opt-env-conf-test]  directoryPath :: Completer [opt-env-conf-test]  directoryPath = Completer $ \fp' -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completer.hs:73:56-12 [opt-env-conf-test] @@ -70,28 +70,21 @@ [opt-env-conf-test]  filePathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  (dirsFromParentListing, filesFromParentListing) <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map fromRelFile $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  _ -> pure ([], []) [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map (fromAbsFile . (ad )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test] - Just (Rel rd) -> do [opt-env-conf-test] - let ad = baseDir rd [opt-env-conf-test] - (ds, fs) <- listDirForgiving ad [opt-env-conf-test] - pure [opt-env-conf-test] - ( map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds, [opt-env-conf-test] - map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test] - ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:144:9-50 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  pure $ filter matchesExtension results [opt-env-conf-test]  where [opt-env-conf-test]  matchesExtension cr [opt-env-conf-test] - | "/" `isSuffixOf` completionResultValue cr = True [opt-env-conf-test] + | not ("/" `isSuffixOf` completionResultValue cr) = True [opt-env-conf-test]  | otherwise = any (`isSuffixOf` completionResultValue cr) exts [opt-env-conf-test]  [opt-env-conf-test]  directoryPath :: Completer [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:145:21-69 [opt-env-conf-test] @@ -142,7 +142,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  matchesExtension cr [opt-env-conf-test]  | "/" `isSuffixOf` completionResultValue cr = True [opt-env-conf-test] - | otherwise = any (`isSuffixOf` completionResultValue cr) exts [opt-env-conf-test] + | otherwise = False [opt-env-conf-test]  [opt-env-conf-test]  directoryPath :: Completer [opt-env-conf-test]  directoryPath = Completer $ \fp' -> do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:230:9-10 [opt-env-conf-test] @@ -227,10 +227,9 @@ [opt-env-conf-test]  internalParser p = [opt-env-conf-test]  choice [opt-env-conf-test]  [ setting [opt-env-conf-test]  [ switch ShowVersion, [opt-env-conf-test]  long "version", [opt-env-conf-test] - hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf-test] @@ -238,11 +238,7 @@ [opt-env-conf-test]  help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ switch RenderDocumentation, [opt-env-conf-test] - long "render-reference-documentation", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf-test] @@ -238,11 +238,10 @@ [opt-env-conf-test]  help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf-test] @@ -114,7 +114,7 @@ [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if not (hiddenRel rf) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf-test] @@ -251,12 +251,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader $ maybeReader parseAbsFile, [opt-env-conf-test] - long "bash-completion-script", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render the bash completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf-test] @@ -114,7 +114,7 @@ [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf-test] @@ -251,12 +251,11 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "bash-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the bash completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completer.hs:108:31-54 [opt-env-conf-test] @@ -105,7 +105,7 @@ [opt-env-conf-test]  else pure ([], []) [opt-env-conf-test]  Just (Abs af) -> do [opt-env-conf-test]  let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving dir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf-test] @@ -244,11 +244,10 @@ [opt-env-conf-test]  help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Render Nix options" [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:254:11-12 [opt-env-conf-test] @@ -251,12 +251,11 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "bash-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Render the bash completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf-test] @@ -244,11 +244,7 @@ [opt-env-conf-test]  help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ switch RenderNixosOptions, [opt-env-conf-test] - long "render-nix-options", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render Nix options" [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf-test] @@ -259,12 +259,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader $ maybeReader parseAbsFile, [opt-env-conf-test] - long "zsh-completion-script", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render the zsh completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:247:9-10 [opt-env-conf-test] @@ -244,11 +244,10 @@ [opt-env-conf-test]  help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render Nix options" [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Main.hs:284:20-24 [opt-env-conf-test] @@ -281,7 +281,7 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test] - [ switch True, [opt-env-conf-test] + [ switch False, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test]  value False, [opt-env-conf-test]  hidden, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf-test] @@ -267,12 +267,7 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader $ maybeReader parseAbsFile, [opt-env-conf-test] - long "fish-completion-script", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:241:9-10 [opt-env-conf-test] @@ -238,11 +238,10 @@ [opt-env-conf-test]  help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Main.hs:286:19-24 [opt-env-conf-test] @@ -283,7 +283,7 @@ [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test] - value False, [opt-env-conf-test] + value True, [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf-test] @@ -267,12 +267,11 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "fish-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:235:9-10 [opt-env-conf-test] @@ -232,11 +232,7 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ switch RenderMan, [opt-env-conf-test] - long "render-man-page", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf-test] @@ -281,12 +281,7 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test] - [ switch True, [opt-env-conf-test] - long "completion-enriched", [opt-env-conf-test] - value False, [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf-test] @@ -288,12 +288,7 @@ [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader auto, [opt-env-conf-test] - long "completion-index", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "The index between the arguments where completion was invoked." [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf-test] @@ -288,12 +288,11 @@ [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test] - [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test]  long "completion-index", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "The index between the arguments where completion was invoked." [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf-test] @@ -296,12 +296,11 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test] - [ option, [opt-env-conf-test]  reader str, [opt-env-conf-test]  long "completion-word", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "The words (arguments) that have already been typed" [opt-env-conf-test]  ] [opt-env-conf-test]  ), [opt-env-conf-test]  ParsedNormally <$> p [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf-test] @@ -296,12 +296,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader str, [opt-env-conf-test] - long "completion-word", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "The words (arguments) that have already been typed" [opt-env-conf-test]  ] [opt-env-conf-test]  ), [opt-env-conf-test]  ParsedNormally <$> p [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf-test] @@ -226,82 +226,4 @@ [opt-env-conf-test]  internalParser :: Parser a -> Parser (Internal a) [opt-env-conf-test]  internalParser p = [opt-env-conf-test]  choice [opt-env-conf-test] - [ setting [opt-env-conf-test] - [ switch ShowVersion, [opt-env-conf-test] - long "version", [opt-env-conf-test] - hidden [opt-env-conf-test] - ], [opt-env-conf-test] - setting [opt-env-conf-test] - [ switch RenderMan, [opt-env-conf-test] - long "render-man-page", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render a manpage" [opt-env-conf-test] - ], [opt-env-conf-test] - setting [opt-env-conf-test] - [ switch RenderDocumentation, [opt-env-conf-test] - long "render-reference-documentation", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render reference documentation" [opt-env-conf-test] - ], [opt-env-conf-test] - setting [opt-env-conf-test] - [ switch RenderNixosOptions, [opt-env-conf-test] - long "render-nix-options", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render Nix options" [opt-env-conf-test] - ], [opt-env-conf-test] - BashCompletionScript [opt-env-conf-test] - <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader $ maybeReader parseAbsFile, [opt-env-conf-test] - long "bash-completion-script", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render the bash completion script" [opt-env-conf-test] - ], [opt-env-conf-test] - ZshCompletionScript [opt-env-conf-test] - <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader $ maybeReader parseAbsFile, [opt-env-conf-test] - long "zsh-completion-script", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render the zsh completion script" [opt-env-conf-test] - ], [opt-env-conf-test] - ZshCompletionScript [opt-env-conf-test] - <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader $ maybeReader parseAbsFile, [opt-env-conf-test] - long "fish-completion-script", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Render the fish completion script" [opt-env-conf-test] - ], [opt-env-conf-test] - setting [opt-env-conf-test] - [ help "Query completion", [opt-env-conf-test] - switch CompletionQuery, [opt-env-conf-test] - -- Long string that no normal user would ever use. [opt-env-conf-test] - long "query-opt-env-conf-completion", [opt-env-conf-test] - hidden [opt-env-conf-test] - ] [opt-env-conf-test] - <*> setting [opt-env-conf-test] - [ switch True, [opt-env-conf-test] - long "completion-enriched", [opt-env-conf-test] - value False, [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "Whether to enable enriched completion" [opt-env-conf-test] - ] [opt-env-conf-test] - <*> setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader auto, [opt-env-conf-test] - long "completion-index", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "The index between the arguments where completion was invoked." [opt-env-conf-test] - ] [opt-env-conf-test] - <*> many [opt-env-conf-test] - ( setting [opt-env-conf-test] - [ option, [opt-env-conf-test] - reader str, [opt-env-conf-test] - long "completion-word", [opt-env-conf-test] - hidden, [opt-env-conf-test] - help "The words (arguments) that have already been typed" [opt-env-conf-test] - ] [opt-env-conf-test] - ), [opt-env-conf-test] - ParsedNormally <$> p [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf-test] @@ -198,11 +198,10 @@ [opt-env-conf-test]  let t = T.pack x [opt-env-conf-test]  in case T.stripPrefix "--settings-capabilities-disable-" t of [opt-env-conf-test]  Just capName -> go (disableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of [opt-env-conf-test] - Just capName -> go (enableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  let (finalCaps, rest) = go caps xs [opt-env-conf-test]  in (finalCaps, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  -- Internal structure to help us do what the framework [opt-env-conf-test]  -- is supposed to. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf-test] @@ -226,82 +226,77 @@ [opt-env-conf-test]  internalParser :: Parser a -> Parser (Internal a) [opt-env-conf-test]  internalParser p = [opt-env-conf-test]  choice [opt-env-conf-test] - [ setting [opt-env-conf-test] - [ switch ShowVersion, [opt-env-conf-test] - long "version", [opt-env-conf-test] - hidden [opt-env-conf-test] - ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render Nix options" [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "bash-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the bash completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "zsh-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the zsh completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "fish-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test]  -- Long string that no normal user would ever use. [opt-env-conf-test]  long "query-opt-env-conf-completion", [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test]  value False, [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test]  long "completion-index", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "The index between the arguments where completion was invoked." [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader str, [opt-env-conf-test]  long "completion-word", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "The words (arguments) that have already been typed" [opt-env-conf-test]  ] [opt-env-conf-test]  ), [opt-env-conf-test]  ParsedNormally <$> p [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf-test] @@ -196,13 +196,12 @@ [opt-env-conf-test]  [] -> (caps, []) [opt-env-conf-test]  (x : xs) -> [opt-env-conf-test]  let t = T.pack x [opt-env-conf-test]  in case T.stripPrefix "--settings-capabilities-disable-" t of [opt-env-conf-test] - Just capName -> go (disableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of [opt-env-conf-test]  Just capName -> go (enableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  let (finalCaps, rest) = go caps xs [opt-env-conf-test]  in (finalCaps, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  -- Internal structure to help us do what the framework [opt-env-conf-test]  -- is supposed to. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf-test] @@ -281,12 +281,11 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test]  value False, [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf-test] @@ -196,13 +196,8 @@ [opt-env-conf-test]  [] -> (caps, []) [opt-env-conf-test]  (x : xs) -> [opt-env-conf-test]  let t = T.pack x [opt-env-conf-test]  in case T.stripPrefix "--settings-capabilities-disable-" t of [opt-env-conf-test]  Just capName -> go (disableCapability (Capability capName) caps) xs [opt-env-conf-test] - Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of [opt-env-conf-test] - Just capName -> go (enableCapability (Capability capName) caps) xs [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - let (finalCaps, rest) = go caps xs [opt-env-conf-test] - in (finalCaps, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  -- Internal structure to help us do what the framework [opt-env-conf-test]  -- is supposed to. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:172:11-19 [opt-env-conf-test] @@ -169,7 +169,7 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  [] -> (False, []) [opt-env-conf-test]  (x : xs) [opt-env-conf-test] - | x == arg -> (True, xs) [opt-env-conf-test] + | True -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test]  in (found, x : rest) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Main.hs:170:14-19 [opt-env-conf-test] @@ -167,7 +167,7 @@ [opt-env-conf-test]  consumeExactArg arg = go [opt-env-conf-test]  where [opt-env-conf-test]  go = \case [opt-env-conf-test] - [] -> (False, []) [opt-env-conf-test] + [] -> (True, []) [opt-env-conf-test]  (x : xs) [opt-env-conf-test]  | x == arg -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Main.hs:172:24-28 [opt-env-conf-test] @@ -169,7 +169,7 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  [] -> (False, []) [opt-env-conf-test]  (x : xs) [opt-env-conf-test] - | x == arg -> (True, xs) [opt-env-conf-test] + | x == arg -> (False, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test]  in (found, x : rest) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:291:11-12 [opt-env-conf-test] @@ -288,12 +288,11 @@ [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test]  long "completion-index", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "The index between the arguments where completion was invoked." [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  | x == arg -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test] - in (found, x : rest) [opt-env-conf-test] + in (True, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  consumeDebugMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeDebugMode = consumeExactArg "--debug-optparse" [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  | x == arg -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test] - in (found, x : rest) [opt-env-conf-test] + in (not (found), x : rest) [opt-env-conf-test]  [opt-env-conf-test]  consumeDebugMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeDebugMode = consumeExactArg "--debug-optparse" [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:172:11-19 [opt-env-conf-test] @@ -169,7 +169,7 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  [] -> (False, []) [opt-env-conf-test]  (x : xs) [opt-env-conf-test] - | x == arg -> (True, xs) [opt-env-conf-test] + | not (x == arg) -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test]  in (found, x : rest) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf-test] @@ -181,7 +181,7 @@ [opt-env-conf-test]  consumeHelpMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeHelpMode as = [opt-env-conf-test]  let (found, as') = consumeExactArg "--help" as [opt-env-conf-test] - in if found [opt-env-conf-test] + in if not (found) [opt-env-conf-test]  then (True, as') [opt-env-conf-test]  else consumeExactArg "-h" as' [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf-test] @@ -181,7 +181,7 @@ [opt-env-conf-test]  consumeHelpMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeHelpMode as = [opt-env-conf-test]  let (found, as') = consumeExactArg "--help" as [opt-env-conf-test] - in if found [opt-env-conf-test] + in if True [opt-env-conf-test]  then (True, as') [opt-env-conf-test]  else consumeExactArg "-h" as' [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:184:10-15 [opt-env-conf-test] @@ -181,7 +181,7 @@ [opt-env-conf-test]  consumeHelpMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeHelpMode as = [opt-env-conf-test]  let (found, as') = consumeExactArg "--help" as [opt-env-conf-test] - in if found [opt-env-conf-test] + in if False [opt-env-conf-test]  then (True, as') [opt-env-conf-test]  else consumeExactArg "-h" as' [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:74:7-61 [opt-env-conf-test] @@ -71,7 +71,6 @@ [opt-env-conf-test]  case lintParser p of [opt-env-conf-test]  Just errs -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test] - hPutChunksLocaleWith tc stderr $ renderLintErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let docs = parserDocs p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf-test] @@ -80,7 +80,7 @@ [opt-env-conf-test]  let (debugMode, args) = consumeDebugMode allArgs [opt-env-conf-test]  [opt-env-conf-test]  mDebugMode <- [opt-env-conf-test] - if debugMode [opt-env-conf-test] + if True [opt-env-conf-test]  then Just <$> getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  else pure Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf-test] @@ -80,7 +80,7 @@ [opt-env-conf-test]  let (debugMode, args) = consumeDebugMode allArgs [opt-env-conf-test]  [opt-env-conf-test]  mDebugMode <- [opt-env-conf-test] - if debugMode [opt-env-conf-test] + if False [opt-env-conf-test]  then Just <$> getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  else pure Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf-test] @@ -80,7 +80,7 @@ [opt-env-conf-test]  let (debugMode, args) = consumeDebugMode allArgs [opt-env-conf-test]  [opt-env-conf-test]  mDebugMode <- [opt-env-conf-test] - if debugMode [opt-env-conf-test] + if not (debugMode) [opt-env-conf-test]  then Just <$> getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  else pure Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  let (helpMode, args') = consumeHelpMode args [opt-env-conf-test]  [opt-env-conf-test] - if helpMode [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  errOrDocs <- runHelpParser mDebugMode (Args.parseArgs args') p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  | x == arg -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test] - in (found, x : rest) [opt-env-conf-test] + in (False, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  consumeDebugMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeDebugMode = consumeExactArg "--debug-optparse" [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Main.hs:185:15-19 [opt-env-conf-test] @@ -182,7 +182,7 @@ [opt-env-conf-test]  consumeHelpMode as = [opt-env-conf-test]  let (found, as') = consumeExactArg "--help" as [opt-env-conf-test]  in if found [opt-env-conf-test] - then (True, as') [opt-env-conf-test] + then (False, as') [opt-env-conf-test]  else consumeExactArg "-h" as' [opt-env-conf-test]  [opt-env-conf-test]  consumeCheckMode :: [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:229:5-6 [opt-env-conf-test] @@ -226,82 +226,81 @@ [opt-env-conf-test]  internalParser :: Parser a -> Parser (Internal a) [opt-env-conf-test]  internalParser p = [opt-env-conf-test]  choice [opt-env-conf-test]  [ setting [opt-env-conf-test]  [ switch ShowVersion, [opt-env-conf-test]  long "version", [opt-env-conf-test]  hidden [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderMan, [opt-env-conf-test]  long "render-man-page", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render a manpage" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderDocumentation, [opt-env-conf-test]  long "render-reference-documentation", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render reference documentation" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ switch RenderNixosOptions, [opt-env-conf-test]  long "render-nix-options", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render Nix options" [opt-env-conf-test]  ], [opt-env-conf-test]  BashCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "bash-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the bash completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "zsh-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the zsh completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "fish-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test]  -- Long string that no normal user would ever use. [opt-env-conf-test]  long "query-opt-env-conf-completion", [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test]  value False, [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test]  long "completion-index", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "The index between the arguments where completion was invoked." [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader str, [opt-env-conf-test]  long "completion-word", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "The words (arguments) that have already been typed" [opt-env-conf-test]  ] [opt-env-conf-test]  ), [opt-env-conf-test] - ParsedNormally <$> p [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf-test] @@ -97,9 +97,8 @@ [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right mCommandDoc -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ case mCommandDoc of [opt-env-conf-test] - Nothing -> renderHelpPage progname version progDesc docs [opt-env-conf-test]  Just (path, cDoc) -> renderCommandHelpPage progname path cDoc [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  else do [opt-env-conf-test]  let (capabilities, args'') = consumeCapabilities args' [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  let (helpMode, args') = consumeHelpMode args [opt-env-conf-test]  [opt-env-conf-test] - if helpMode [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  errOrDocs <- runHelpParser mDebugMode (Args.parseArgs args') p [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:96:15-71 [opt-env-conf-test] @@ -93,7 +93,6 @@ [opt-env-conf-test]  case errOrDocs of [opt-env-conf-test]  Left errs -> do [opt-env-conf-test]  stderrTc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test] - hPutChunksLocaleWith stderrTc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right mCommandDoc -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf-test] @@ -108,7 +108,7 @@ [opt-env-conf-test]  let readyArgs = Args.parseArgs args''' [opt-env-conf-test]  [opt-env-conf-test]  let mConfig = Nothing -- We start with no config loaded. [opt-env-conf-test] - if checkMode [opt-env-conf-test] + if True [opt-env-conf-test]  then runSettingsCheck capabilities p readyArgs envVars mConfig [opt-env-conf-test]  else do [opt-env-conf-test]  let p' = internalParser p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf-test] @@ -108,7 +108,7 @@ [opt-env-conf-test]  let readyArgs = Args.parseArgs args''' [opt-env-conf-test]  [opt-env-conf-test]  let mConfig = Nothing -- We start with no config loaded. [opt-env-conf-test] - if checkMode [opt-env-conf-test] + if not (checkMode) [opt-env-conf-test]  then runSettingsCheck capabilities p readyArgs envVars mConfig [opt-env-conf-test]  else do [opt-env-conf-test]  let p' = internalParser p [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:126:19-69 [opt-env-conf-test] @@ -123,7 +123,6 @@ [opt-env-conf-test]  case errOrResult of [opt-env-conf-test]  Left errs -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test] - hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:132:21-88 [opt-env-conf-test] @@ -129,7 +129,6 @@ [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:137:21-98 [opt-env-conf-test] @@ -134,7 +134,6 @@ [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:142:21-96 [opt-env-conf-test] @@ -139,7 +139,6 @@ [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:146:21-97 [opt-env-conf-test] @@ -143,7 +143,6 @@ [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] - putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:89:10-18 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  let (helpMode, args') = consumeHelpMode args [opt-env-conf-test]  [opt-env-conf-test] - if helpMode [opt-env-conf-test] + if not (helpMode) [opt-env-conf-test]  then do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  errOrDocs <- runHelpParser mDebugMode (Args.parseArgs args') p [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:100:15-78 [opt-env-conf-test] @@ -97,9 +97,6 @@ [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right mCommandDoc -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ case mCommandDoc of [opt-env-conf-test] - Nothing -> renderHelpPage progname version progDesc docs [opt-env-conf-test] - Just (path, cDoc) -> renderCommandHelpPage progname path cDoc [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  else do [opt-env-conf-test]  let (capabilities, args'') = consumeCapabilities args' [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:154:21-66 [opt-env-conf-test] @@ -151,7 +151,6 @@ [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] - generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test] - runCompletionQuery p' enriched index ws [opt-env-conf-test] + runCompletionQuery p' True index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:150:21-67 [opt-env-conf-test] @@ -147,7 +147,6 @@ [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] - generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test] - runCompletionQuery p' enriched index ws [opt-env-conf-test] + runCompletionQuery p' False index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Main.hs:161:43-51 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test] - runCompletionQuery p' enriched index ws [opt-env-conf-test] + runCompletionQuery p' not (enriched) index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,37 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test] - ShowVersion -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Main.hs:111:14-23 [opt-env-conf-test] @@ -108,7 +108,7 @@ [opt-env-conf-test]  let readyArgs = Args.parseArgs args''' [opt-env-conf-test]  [opt-env-conf-test]  let mConfig = Nothing -- We start with no config loaded. [opt-env-conf-test] - if checkMode [opt-env-conf-test] + if False [opt-env-conf-test]  then runSettingsCheck capabilities p readyArgs envVars mConfig [opt-env-conf-test]  else do [opt-env-conf-test]  let p' = internalParser p [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,37 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - RenderMan -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:158:21-67 [opt-env-conf-test] @@ -155,7 +155,6 @@ [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test] - generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,37 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - RenderDocumentation -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - RenderNixosOptions -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - BashCompletionScript progPath -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:270:11-12 [opt-env-conf-test] @@ -267,12 +267,11 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "fish-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - ZshCompletionScript progPath -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - FishCompletionScript progPath -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,39 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - CompletionQuery enriched index ws -> do [opt-env-conf-test] - runCompletionQuery p' enriched index ws [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,41 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Validation.hs:81:46-17 [opt-env-conf-test] @@ -78,9 +78,8 @@ [opt-env-conf-test]  -- We could chose to skip the failures here if the first argument was a [opt-env-conf-test]  -- Right, but we'd prefer to see as many errors as possible. [opt-env-conf-test]  select (Success _) (Failure ne) = Failure ne [opt-env-conf-test]  select (Success e) (Success f) = Success $ case e of [opt-env-conf-test] - Left a -> f a [opt-env-conf-test]  Right b -> b [opt-env-conf-test]  [opt-env-conf-test]  validationFailure :: e -> Validation e a [opt-env-conf-test]  validationFailure e = Failure (e :| []) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf-test] @@ -259,12 +259,11 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "zsh-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "Render the zsh completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Validation.hs:81:46-17 [opt-env-conf-test] @@ -78,9 +78,8 @@ [opt-env-conf-test]  -- We could chose to skip the failures here if the first argument was a [opt-env-conf-test]  -- Right, but we'd prefer to see as many errors as possible. [opt-env-conf-test]  select (Success _) (Failure ne) = Failure ne [opt-env-conf-test]  select (Success e) (Success f) = Success $ case e of [opt-env-conf-test]  Left a -> f a [opt-env-conf-test] - Right b -> b [opt-env-conf-test]  [opt-env-conf-test]  validationFailure :: e -> Validation e a [opt-env-conf-test]  validationFailure e = Failure (e :| []) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Validation.hs:69:32-20 [opt-env-conf-test] @@ -66,9 +66,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  instance Applicative (Validation e) where [opt-env-conf-test]  pure = Success [opt-env-conf-test]  Failure e1 <*> b = Failure $ case b of [opt-env-conf-test] - Failure e2 -> e1 `NE.append` e2 [opt-env-conf-test]  Success _ -> e1 [opt-env-conf-test]  Success _ <*> Failure e2 = Failure e2 [opt-env-conf-test]  Success f <*> Success a = Success (f a) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf-test] @@ -97,9 +97,8 @@ [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right mCommandDoc -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ case mCommandDoc of [opt-env-conf-test]  Nothing -> renderHelpPage progname version progDesc docs [opt-env-conf-test] - Just (path, cDoc) -> renderCommandHelpPage progname path cDoc [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  else do [opt-env-conf-test]  let (capabilities, args'') = consumeCapabilities args' [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Main.hs:160:56-32 [opt-env-conf-test] @@ -157,9 +157,8 @@ [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test] - runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Validation.hs:69:32-20 [opt-env-conf-test] @@ -66,9 +66,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  instance Applicative (Validation e) where [opt-env-conf-test]  pure = Success [opt-env-conf-test]  Failure e1 <*> b = Failure $ case b of [opt-env-conf-test]  Failure e2 -> e1 `NE.append` e2 [opt-env-conf-test] - Success _ -> e1 [opt-env-conf-test]  Success _ <*> Failure e2 = Failure e2 [opt-env-conf-test]  Success f <*> Success a = Success (f a) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Check.hs:91:72-105 [opt-env-conf-test] @@ -88,7 +88,7 @@ [opt-env-conf-test]  -- ALL errors are missing capability errors [opt-env-conf-test]  mapM [opt-env-conf-test]  ( \case [opt-env-conf-test] - ParseError mLoc (ParseErrorMissingCapability cap) -> Just (MissingCapability mLoc cap) [opt-env-conf-test] + ParseError mLoc (ParseErrorMissingCapability cap) -> Nothing [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test]  errs [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Check.hs:95:11-40 [opt-env-conf-test] @@ -92,6 +92,5 @@ [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test]  errs [opt-env-conf-test]  in case mMissingCaps of [opt-env-conf-test] - Just ne -> CheckIncapable ne [opt-env-conf-test]  Nothing -> CheckFailed errs [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Check.hs:95:11-40 [opt-env-conf-test] @@ -92,6 +92,5 @@ [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test]  errs [opt-env-conf-test]  in case mMissingCaps of [opt-env-conf-test]  Just ne -> CheckIncapable ne [opt-env-conf-test] - Nothing -> CheckFailed errs [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Check.hs:81:10-40 [opt-env-conf-test] @@ -78,20 +78,19 @@ [opt-env-conf-test]  IO (CheckResult a) [opt-env-conf-test]  runSettingsCheckOn capabilities debugMode p args envVars mConfig = do [opt-env-conf-test]  errOrSets <- runParserOn capabilities (Just debugMode) p args envVars mConfig [opt-env-conf-test]  pure $ case errOrSets of [opt-env-conf-test] - Right a -> CheckSucceeded a [opt-env-conf-test]  Left errs -> [opt-env-conf-test]  -- If all the errors are missing capability errors, return [opt-env-conf-test]  -- CheckIncapable, otherwise CheckFailed [opt-env-conf-test]  let mMissingCaps = [opt-env-conf-test]  -- This MUST be mapM instead of mapMaybe because we need to ensure [opt-env-conf-test]  -- ALL errors are missing capability errors [opt-env-conf-test]  mapM [opt-env-conf-test]  ( \case [opt-env-conf-test]  ParseError mLoc (ParseErrorMissingCapability cap) -> Just (MissingCapability mLoc cap) [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test]  errs [opt-env-conf-test]  in case mMissingCaps of [opt-env-conf-test]  Just ne -> CheckIncapable ne [opt-env-conf-test]  Nothing -> CheckFailed errs [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Check.hs:34:25-18 [opt-env-conf-test] @@ -31,9 +31,8 @@ [opt-env-conf-test]  stderrTc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  errOrSets <- runSettingsCheckOn capabilities stderrTc p args envVars mConfig [opt-env-conf-test]  case errOrSets of [opt-env-conf-test]  CheckFailed errs -> do [opt-env-conf-test] - hPutChunksLocaleWith stderrTc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  CheckIncapable missingCaps -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout ["Could not complete parsing settings because of missing capabilities, but no errors were found so far."] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Check.hs:40:7-83 [opt-env-conf-test] @@ -37,7 +37,6 @@ [opt-env-conf-test]  CheckIncapable missingCaps -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout ["Could not complete parsing settings because of missing capabilities, but no errors were found so far."] [opt-env-conf-test] - hPutChunksLocaleWith stderrTc stderr $ renderMissingCapabilities missingCaps [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CheckSucceeded _ -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Check.hs:39:7-143 [opt-env-conf-test] @@ -36,7 +36,6 @@ [opt-env-conf-test]  exitFailure [opt-env-conf-test]  CheckIncapable missingCaps -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout ["Could not complete parsing settings because of missing capabilities, but no errors were found so far."] [opt-env-conf-test]  hPutChunksLocaleWith stderrTc stderr $ renderMissingCapabilities missingCaps [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CheckSucceeded _ -> do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Check.hs:44:7-71 [opt-env-conf-test] @@ -41,7 +41,6 @@ [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CheckSucceeded _ -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout ["Settings parsed successfully."] [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  [opt-env-conf-test]  renderMissingCapabilities :: NonEmpty MissingCapability -> [Chunk] [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Lint.hs:238:20-25 [opt-env-conf-test] @@ -235,7 +235,7 @@ [opt-env-conf-test]  lintParser = [opt-env-conf-test]  either Just (const Nothing) [opt-env-conf-test]  . validationToEither [opt-env-conf-test] - . (`runReader` False) -- Set to true for parsers that have a way to load conf [opt-env-conf-test] + . (`runReader` True) -- Set to true for parsers that have a way to load conf [opt-env-conf-test]  . runValidationT [opt-env-conf-test]  . go [opt-env-conf-test]  where [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Lint.hs:246:28-33 [opt-env-conf-test] @@ -243,7 +243,7 @@ [opt-env-conf-test]  -- 'many' is allowed only when every parse below consumes something. [opt-env-conf-test]  go :: Parser a -> ValidationT LintError (Reader Bool) Bool [opt-env-conf-test]  go = \case [opt-env-conf-test] - ParserPure _ -> pure False [opt-env-conf-test] + ParserPure _ -> pure True [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Check.hs:80:42-56 [opt-env-conf-test] @@ -77,7 +77,7 @@ [opt-env-conf-test]  Maybe JSON.Object -> [opt-env-conf-test]  IO (CheckResult a) [opt-env-conf-test]  runSettingsCheckOn capabilities debugMode p args envVars mConfig = do [opt-env-conf-test] - errOrSets <- runParserOn capabilities (Just debugMode) p args envVars mConfig [opt-env-conf-test] + errOrSets <- runParserOn capabilities (Nothing) p args envVars mConfig [opt-env-conf-test]  pure $ case errOrSets of [opt-env-conf-test]  Right a -> CheckSucceeded a [opt-env-conf-test]  Left errs -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Check.hs:81:10-40 [opt-env-conf-test] @@ -78,20 +78,5 @@ [opt-env-conf-test]  IO (CheckResult a) [opt-env-conf-test]  runSettingsCheckOn capabilities debugMode p args envVars mConfig = do [opt-env-conf-test]  errOrSets <- runParserOn capabilities (Just debugMode) p args envVars mConfig [opt-env-conf-test]  pure $ case errOrSets of [opt-env-conf-test]  Right a -> CheckSucceeded a [opt-env-conf-test] - Left errs -> [opt-env-conf-test] - -- If all the errors are missing capability errors, return [opt-env-conf-test] - -- CheckIncapable, otherwise CheckFailed [opt-env-conf-test] - let mMissingCaps = [opt-env-conf-test] - -- This MUST be mapM instead of mapMaybe because we need to ensure [opt-env-conf-test] - -- ALL errors are missing capability errors [opt-env-conf-test] - mapM [opt-env-conf-test] - ( \case [opt-env-conf-test] - ParseError mLoc (ParseErrorMissingCapability cap) -> Just (MissingCapability mLoc cap) [opt-env-conf-test] - _ -> Nothing [opt-env-conf-test] - ) [opt-env-conf-test] - errs [opt-env-conf-test] - in case mMissingCaps of [opt-env-conf-test] - Just ne -> CheckIncapable ne [opt-env-conf-test] - Nothing -> CheckFailed errs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (True || c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (False || c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 || False) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 || not (c2)) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (True) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (False) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 && c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (not (c1 || c2)) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure True [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure False [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure not ((c1 || c2)) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (True || c2) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (False || c2) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:254:15-17 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (not (c1) || c2) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 || True) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 || not (c2)) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (True) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (False) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:254:15-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (not (c1 || c2)) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure True -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure not ((c1 || c2)) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf-test] @@ -274,12 +274,11 @@ [opt-env-conf-test]  help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test]  [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test]  -- Long string that no normal user would ever use. [opt-env-conf-test]  long "query-opt-env-conf-completion", [opt-env-conf-test] - hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf-test] @@ -274,12 +274,11 @@ [opt-env-conf-test]  help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ help "Query completion", [opt-env-conf-test]  switch CompletionQuery, [opt-env-conf-test]  -- Long string that no normal user would ever use. [opt-env-conf-test]  long "query-opt-env-conf-completion", [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:14-24 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure False -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (True && c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf-test] @@ -198,11 +198,8 @@ [opt-env-conf-test]  let t = T.pack x [opt-env-conf-test]  in case T.stripPrefix "--settings-capabilities-disable-" t of [opt-env-conf-test]  Just capName -> go (disableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of [opt-env-conf-test]  Just capName -> go (enableCapability (Capability capName) caps) xs [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - let (finalCaps, rest) = go caps xs [opt-env-conf-test] - in (finalCaps, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  -- Internal structure to help us do what the framework [opt-env-conf-test]  -- is supposed to. [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (not (c1) || c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && True) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (False && c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 || True) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (not (c1) && c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && not (c2)) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:254:21-23 [opt-env-conf-test] @@ -251,7 +251,7 @@ [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 || False) -- TODO: is this right? [opt-env-conf-test]  ParserEmpty _ -> pure True [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && False) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure True -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (not (c1 && c2)) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (True) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (False) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  when (not c) $ [opt-env-conf-test]  mapValidationTFailure (LintError mLoc) $ [opt-env-conf-test]  validationTFailure LintErrorManyInfinite [opt-env-conf-test] - pure c [opt-env-conf-test] + pure False [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf-test] @@ -273,7 +273,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test] - if null cs [opt-env-conf-test] + if not (null cs) [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:280:20-63 [opt-env-conf-test] @@ -277,7 +277,7 @@ [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] - when (isNothing (find ((== d) . commandArg) cs)) $ [opt-env-conf-test] + when not ((isNothing (find ((== d) . commandArg) cs))) $ [opt-env-conf-test]  validationTFailure $ [opt-env-conf-test]  LintError mLoc $ [opt-env-conf-test]  LintErrorUnknownDefaultCommand d [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  when (not c) $ [opt-env-conf-test]  mapValidationTFailure (LintError mLoc) $ [opt-env-conf-test]  validationTFailure LintErrorManyInfinite [opt-env-conf-test] - pure c [opt-env-conf-test] + pure not (c) [opt-env-conf-test]  ParserSome mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  when (not c) $ [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  when (not c) $ [opt-env-conf-test]  mapValidationTFailure (LintError mLoc) $ [opt-env-conf-test]  validationTFailure LintErrorManyInfinite [opt-env-conf-test] - pure c [opt-env-conf-test] + pure False [opt-env-conf-test]  ParserSome mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  when (not c) $ [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf-test] @@ -273,7 +273,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test] - if null cs [opt-env-conf-test] + if True [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Lint.hs:278:16-53 [opt-env-conf-test] @@ -275,13 +275,8 @@ [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test]  if null cs [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test] - for_ mDefault $ \d -> [opt-env-conf-test] - when (isNothing (find ((== d) . commandArg) cs)) $ [opt-env-conf-test] - validationTFailure $ [opt-env-conf-test] - LintError mLoc $ [opt-env-conf-test] - LintErrorUnknownDefaultCommand d [opt-env-conf-test]  and <$> traverse (go . commandParser) cs -- TODO is this right? [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  when (not c) $ [opt-env-conf-test]  mapValidationTFailure (LintError mLoc) $ [opt-env-conf-test]  validationTFailure LintErrorManyInfinite [opt-env-conf-test] - pure c [opt-env-conf-test] + pure not (c) [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:266:14-15 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  when (not c) $ [opt-env-conf-test]  mapValidationTFailure (LintError mLoc) $ [opt-env-conf-test]  validationTFailure LintErrorManyInfinite [opt-env-conf-test] - pure c [opt-env-conf-test] + pure True [opt-env-conf-test]  ParserSome mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  when (not c) $ [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure not ((c1 && c2)) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:280:21-62 [opt-env-conf-test] @@ -277,7 +277,7 @@ [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] - when (isNothing (find ((== d) . commandArg) cs)) $ [opt-env-conf-test] + when (not (isNothing (find ((== d) . commandArg) cs))) $ [opt-env-conf-test]  validationTFailure $ [opt-env-conf-test]  LintError mLoc $ [opt-env-conf-test]  LintErrorUnknownDefaultCommand d [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ False || c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure False -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:272:14-15 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  when (not c) $ [opt-env-conf-test]  mapValidationTFailure (LintError mLoc) $ [opt-env-conf-test]  validationTFailure LintErrorManyInfinite [opt-env-conf-test] - pure c [opt-env-conf-test] + pure True [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ not (c1) || c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ True || c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:280:20-63 [opt-env-conf-test] @@ -277,7 +277,7 @@ [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] - when (isNothing (find ((== d) . commandArg) cs)) $ [opt-env-conf-test] + when True $ [opt-env-conf-test]  validationTFailure $ [opt-env-conf-test]  LintError mLoc $ [opt-env-conf-test]  LintErrorUnknownDefaultCommand d [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Lint.hs:255:29-33 [opt-env-conf-test] @@ -252,7 +252,7 @@ [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test] - ParserEmpty _ -> pure True [opt-env-conf-test] + ParserEmpty _ -> pure False [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:276:12-19 [opt-env-conf-test] @@ -273,7 +273,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> go p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test] - if null cs [opt-env-conf-test] + if False [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 && c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ not (c1 || c2) [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 || False [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ True || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ True [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 || not (c2) [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ not (settingTryArgument) || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:284:11-12 [opt-env-conf-test] @@ -281,12 +281,11 @@ [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test] - [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test]  value False, [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Whether to enable enriched completion" [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader auto, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 || True [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || False || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || settingTryOption || not (isJust settingSwitchValue), [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:280:21-62 [opt-env-conf-test] @@ -277,7 +277,7 @@ [opt-env-conf-test]  then validationTFailure $ LintError mLoc LintErrorNoCommands [opt-env-conf-test]  else do [opt-env-conf-test]  for_ mDefault $ \d -> [opt-env-conf-test] - when (isNothing (find ((== d) . commandArg) cs)) $ [opt-env-conf-test] + when (True) $ [opt-env-conf-test]  validationTFailure $ [opt-env-conf-test]  LintError mLoc $ [opt-env-conf-test]  LintErrorUnknownDefaultCommand d [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || False, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ True, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || settingTryOption && isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || settingTryOption || True, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || True || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || not (settingTryOption || isJust settingSwitchValue), [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || not (settingTryOption) || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ False || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || True, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || settingTryOption || False, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ False, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ False [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf-test] @@ -76,20 +76,19 @@ [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test] - [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf-test] @@ -76,20 +76,19 @@ [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:74:13-14 [opt-env-conf-test] @@ -71,27 +71,7 @@ [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [ "This ", [opt-env-conf-test] - functionChunk "setting", [opt-env-conf-test] - " parses nothing." [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [ [ "Add an ", [opt-env-conf-test] - functionChunk "argument", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "env", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "conf", [opt-env-conf-test] - ", or ", [opt-env-conf-test] - functionChunk "value", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:74:13-14 [opt-env-conf-test] @@ -71,27 +71,22 @@ [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [ "This ", [opt-env-conf-test] - functionChunk "setting", [opt-env-conf-test] - " parses nothing." [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:96:13-63 [opt-env-conf-test] @@ -93,7 +93,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] - [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:96:13-63 [opt-env-conf-test] @@ -93,7 +93,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] - [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf-test] @@ -94,7 +94,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf-test] @@ -94,7 +94,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:97:13-55 [opt-env-conf-test] @@ -94,7 +94,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:96:11-12 [opt-env-conf-test] @@ -93,9 +93,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] - [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:96:11-12 [opt-env-conf-test] @@ -93,9 +93,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] - [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf-test] @@ -337,7 +337,6 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test] - null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:100:13-65 [opt-env-conf-test] @@ -97,7 +97,6 @@ [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test] - [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf-test] @@ -339,5 +339,5 @@ [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test] -  null settingConfigVals [opt-env-conf-test] +  not (null settingConfigVals) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:100:13-65 [opt-env-conf-test] @@ -97,7 +97,6 @@ [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test] - [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf-test] @@ -98,7 +98,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:79:17-18 [opt-env-conf-test] @@ -76,20 +76,7 @@ [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test] - [ [ "Add an ", [opt-env-conf-test] - functionChunk "argument", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "env", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "conf", [opt-env-conf-test] - ", or ", [opt-env-conf-test] - functionChunk "value", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf-test] @@ -337,7 +337,4 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] - null settingEnvVars, [opt-env-conf-test] - null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf-test] @@ -99,19 +99,7 @@ [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] - [ "Try ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " ", [opt-env-conf-test] - chunk $ [opt-env-conf-test] - T.pack $ [opt-env-conf-test] - show $ [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> [] [opt-env-conf-test] - '-' : cs -> go cs [opt-env-conf-test] - c : cs -> c : cs [opt-env-conf-test] - in go $ NE.toList s, [opt-env-conf-test] - " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf-test] @@ -71,10 +71,9 @@ [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test] - " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf-test] @@ -99,19 +99,18 @@ [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] - [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf-test] @@ -98,7 +98,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:101:13-92 [opt-env-conf-test] @@ -98,7 +98,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf-test] @@ -338,6 +338,6 @@ [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] - null settingEnvVars, [opt-env-conf-test] + False, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:102:13-14 [opt-env-conf-test] @@ -99,19 +99,18 @@ [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test] - " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ not (settingTryArgument || settingTryOption || isJust settingSwitchValue), [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf-test] @@ -97,22 +97,21 @@ [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test] - [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf-test] @@ -97,22 +97,9 @@ [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] - [ "Try ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " ", [opt-env-conf-test] - chunk $ [opt-env-conf-test] - T.pack $ [opt-env-conf-test] - show $ [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> [] [opt-env-conf-test] - '-' : cs -> go cs [opt-env-conf-test] - c : cs -> c : cs [opt-env-conf-test] - in go $ NE.toList s, [opt-env-conf-test] - " instead." [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf-test] @@ -114,11 +114,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf-test] @@ -114,11 +114,10 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:117:13-14 [opt-env-conf-test] @@ -114,11 +114,10 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf-test] @@ -121,11 +121,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf-test] @@ -71,10 +71,9 @@ [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf-test] @@ -121,11 +121,10 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:124:13-14 [opt-env-conf-test] @@ -121,11 +121,10 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf-test] @@ -128,13 +128,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf-test] @@ -128,13 +128,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:131:13-14 [opt-env-conf-test] @@ -128,13 +128,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument && settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:74:17-18 [opt-env-conf-test] @@ -71,10 +71,7 @@ [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test] - [ [ [ "This ", [opt-env-conf-test] - functionChunk "setting", [opt-env-conf-test] - " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf-test] @@ -68,7 +68,6 @@ [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test] - [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf-test] @@ -68,7 +68,6 @@ [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test] - [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:71:12-51 [opt-env-conf-test] @@ -68,7 +68,6 @@ [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test] - [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf-test] @@ -339,5 +339,5 @@ [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test] - null settingConfigVals [opt-env-conf-test] + True [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf-test] @@ -336,8 +336,8 @@ [opt-env-conf-test]  pure $ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test] - and [opt-env-conf-test] + False [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:100:11-12 [opt-env-conf-test] @@ -97,22 +97,7 @@ [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test] - [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] - [ "Try ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " ", [opt-env-conf-test] - chunk $ [opt-env-conf-test] - T.pack $ [opt-env-conf-test] - show $ [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> [] [opt-env-conf-test] - '-' : cs -> go cs [opt-env-conf-test] - c : cs -> c : cs [opt-env-conf-test] - in go $ NE.toList s, [opt-env-conf-test] - " instead." [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf-test] @@ -336,8 +336,8 @@ [opt-env-conf-test]  pure $ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test] - and [opt-env-conf-test] + not (and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test] - ] [opt-env-conf-test] + ]) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf-test] @@ -338,6 +338,6 @@ [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] -  null settingEnvVars, [opt-env-conf-test] +  not (null settingEnvVars), [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf-test] @@ -339,5 +339,5 @@ [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test] - null settingConfigVals [opt-env-conf-test] + False [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:339:11-14 [opt-env-conf-test] @@ -336,8 +336,8 @@ [opt-env-conf-test]  pure $ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test] - and [opt-env-conf-test] + True [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf-test] @@ -338,6 +338,6 @@ [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] - null settingEnvVars, [opt-env-conf-test] + True, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf-test] @@ -337,7 +337,6 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:299:15-16 [opt-env-conf-test] @@ -296,12 +296,11 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  <*> many [opt-env-conf-test]  ( setting [opt-env-conf-test]  [ option, [opt-env-conf-test]  reader str, [opt-env-conf-test]  long "completion-word", [opt-env-conf-test]  hidden, [opt-env-conf-test] - help "The words (arguments) that have already been typed" [opt-env-conf-test]  ] [opt-env-conf-test]  ), [opt-env-conf-test]  ParsedNormally <$> p [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf-test] @@ -155,13 +155,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test] - [ [ functionChunk "switch", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf-test] @@ -146,13 +146,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf-test] @@ -164,15 +164,14 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test] - [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf-test] @@ -164,15 +164,14 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:167:13-14 [opt-env-conf-test] @@ -164,15 +164,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test] - [ [ functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf-test] @@ -137,13 +137,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf-test] @@ -146,13 +146,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:149:13-14 [opt-env-conf-test] @@ -146,13 +146,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf-test] @@ -137,13 +137,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:140:13-14 [opt-env-conf-test] @@ -137,13 +137,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf-test] @@ -155,13 +155,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:158:13-14 [opt-env-conf-test] @@ -155,13 +155,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test] - [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:211:11-12 [opt-env-conf-test] @@ -208,18 +208,7 @@ [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] - [ [ functionChunk "conf", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " was called with no way to load configuration." [opt-env-conf-test] - ], [opt-env-conf-test] - [ "You can load configuration with ", [opt-env-conf-test] - functionChunk "withConfig", [opt-env-conf-test] - ", or explicitly not load any configuration with ", [opt-env-conf-test] - functionChunk "withoutConfig", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:211:11-12 [opt-env-conf-test] @@ -208,18 +208,13 @@ [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] - [ [ functionChunk "conf", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " was called with no way to load configuration." [opt-env-conf-test] - ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf-test] @@ -221,11 +221,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test] - [ [ functionChunk "many", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "some", [opt-env-conf-test] - " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:207:11-12 [opt-env-conf-test] @@ -204,9 +204,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf-test] @@ -221,11 +221,10 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test] - [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:277:9-10 [opt-env-conf-test] @@ -274,12 +274,8 @@ [opt-env-conf-test]  help "Render the fish completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  setting [opt-env-conf-test] - [ help "Query completion", [opt-env-conf-test] - switch CompletionQuery, [opt-env-conf-test]  -- Long string that no normal user would ever use. [opt-env-conf-test] - long "query-opt-env-conf-completion", [opt-env-conf-test] - hidden [opt-env-conf-test]  ] [opt-env-conf-test]  <*> setting [opt-env-conf-test]  [ switch True, [opt-env-conf-test]  long "completion-enriched", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:196:13-14 [opt-env-conf-test] @@ -193,9 +193,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test] - [ [ functionChunk "commands", [opt-env-conf-test] - " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf-test] @@ -198,10 +198,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test] - [ [ functionChunk "defaultCommand", [opt-env-conf-test] - " was called with an unknown command: ", [opt-env-conf-test] - commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:208:13-44 [opt-env-conf-test] @@ -205,7 +205,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] - ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:196:13-14 [opt-env-conf-test] @@ -193,9 +193,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test] - [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf-test] @@ -198,10 +198,9 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test] - commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:201:13-14 [opt-env-conf-test] @@ -198,10 +198,9 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test] - [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:208:13-44 [opt-env-conf-test] @@ -205,7 +205,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] - ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf-test] @@ -204,7 +204,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf-test] @@ -204,7 +204,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:207:13-136 [opt-env-conf-test] @@ -204,7 +204,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf-test] @@ -213,12 +213,11 @@ [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf-test] @@ -213,12 +213,11 @@ [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test] - [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf-test] @@ -184,13 +184,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:216:13-14 [opt-env-conf-test] @@ -213,12 +213,7 @@ [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test] - [ "You can load configuration with ", [opt-env-conf-test] - functionChunk "withConfig", [opt-env-conf-test] - ", or explicitly not load any configuration with ", [opt-env-conf-test] - functionChunk "withoutConfig", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf-test] @@ -184,13 +184,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:187:13-14 [opt-env-conf-test] @@ -184,13 +184,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:224:11-12 [opt-env-conf-test] @@ -221,13 +221,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test] - [ [ functionChunk "many", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "some", [opt-env-conf-test] - " was called with a parser that may succeed without consuming anything." [opt-env-conf-test] - ], [opt-env-conf-test] - ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf-test] @@ -208,11 +208,7 @@ [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] - [ [ functionChunk "conf", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf-test] @@ -208,11 +208,10 @@ [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test] - " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:211:13-14 [opt-env-conf-test] @@ -208,11 +208,10 @@ [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test] - [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:207:11-12 [opt-env-conf-test] @@ -204,9 +204,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] - ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,145 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test] - LintErrorEmptySetting -> [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [ "This ", [opt-env-conf-test] - functionChunk "setting", [opt-env-conf-test] - " parses nothing." [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [ [ "Add an ", [opt-env-conf-test] - functionChunk "argument", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "env", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "conf", [opt-env-conf-test] - ", or ", [opt-env-conf-test] - functionChunk "value", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf-test] @@ -175,13 +175,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf-test] @@ -175,13 +175,12 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:224:11-12 [opt-env-conf-test] @@ -221,13 +221,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test] - [ [ functionChunk "many", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "some", [opt-env-conf-test] - " was called with a parser that may succeed without consuming anything." [opt-env-conf-test] - ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:178:13-14 [opt-env-conf-test] @@ -175,13 +175,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,166 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test] - LintErrorUndocumented -> [opt-env-conf-test] - [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,161 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoMetavarForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,161 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoReaderForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,151 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorDashInLong s -> [opt-env-conf-test] - [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] - [ "Try ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " ", [opt-env-conf-test] - chunk $ [opt-env-conf-test] - T.pack $ [opt-env-conf-test] - show $ [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> [] [opt-env-conf-test] - '-' : cs -> go cs [opt-env-conf-test] - c : cs -> c : cs [opt-env-conf-test] - in go $ NE.toList s, [opt-env-conf-test] - " instead." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,159 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoDashedForSwitch -> [opt-env-conf-test] - [ [ functionChunk "switch", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,157 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test] - [ [ functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,159 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoMetavarForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,163 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoCommands -> [opt-env-conf-test] - [ [ functionChunk "commands", [opt-env-conf-test] - " was called with an empty list." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,155 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorConfigWithoutLoad -> [opt-env-conf-test] - [ [ functionChunk "conf", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " was called with no way to load configuration." [opt-env-conf-test] - ], [opt-env-conf-test] - [ "You can load configuration with ", [opt-env-conf-test] - functionChunk "withConfig", [opt-env-conf-test] - ", or explicitly not load any configuration with ", [opt-env-conf-test] - functionChunk "withoutConfig", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,160 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorManyInfinite -> [opt-env-conf-test] - [ [ functionChunk "many", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "some", [opt-env-conf-test] - " was called with a parser that may succeed without consuming anything." [opt-env-conf-test] - ], [opt-env-conf-test] - ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test] - ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf-test] @@ -65,171 +65,7 @@ [opt-env-conf-test]  renderLintError :: LintError -> [[Chunk]] [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [[fore red "Invalid Setting:"]], [opt-env-conf-test] - case lintErrorMessage of [opt-env-conf-test] - LintErrorUndocumented -> [opt-env-conf-test] - [["missing ", functionChunk "help", "."]] [opt-env-conf-test] - LintErrorEmptySetting -> [opt-env-conf-test] - concat [opt-env-conf-test] - [ [ [ "This ", [opt-env-conf-test] - functionChunk "setting", [opt-env-conf-test] - " parses nothing." [opt-env-conf-test] - ] [opt-env-conf-test] - ], [opt-env-conf-test] - [ [ "Add an ", [opt-env-conf-test] - functionChunk "argument", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "env", [opt-env-conf-test] - ", ", [opt-env-conf-test] - functionChunk "conf", [opt-env-conf-test] - ", or ", [opt-env-conf-test] - functionChunk "value", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorDashInShort -> [opt-env-conf-test] - [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorDashInLong s -> [opt-env-conf-test] - [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test] - [ "Try ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " ", [opt-env-conf-test] - chunk $ [opt-env-conf-test] - T.pack $ [opt-env-conf-test] - show $ [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> [] [opt-env-conf-test] - '-' : cs -> go cs [opt-env-conf-test] - c : cs -> c : cs [opt-env-conf-test] - in go $ NE.toList s, [opt-env-conf-test] - " instead." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoReaderForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoMetavarForArgument -> [opt-env-conf-test] - [ [ functionChunk "argument", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoReaderForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoDashedForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoMetavarForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoDashedForSwitch -> [opt-env-conf-test] - [ [ functionChunk "switch", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test] - [ [ functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "switch", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoReaderForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoMetavarForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorNoCommands -> [opt-env-conf-test] - [ [ functionChunk "commands", [opt-env-conf-test] - " was called with an empty list." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorUnknownDefaultCommand c -> [opt-env-conf-test] - [ [ functionChunk "defaultCommand", [opt-env-conf-test] - " was called with an unknown command: ", [opt-env-conf-test] - commandChunk c [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] - ["Example: ", chunk $ T.pack e] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorConfigWithoutLoad -> [opt-env-conf-test] - [ [ functionChunk "conf", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " was called with no way to load configuration." [opt-env-conf-test] - ], [opt-env-conf-test] - [ "You can load configuration with ", [opt-env-conf-test] - functionChunk "withConfig", [opt-env-conf-test] - ", or explicitly not load any configuration with ", [opt-env-conf-test] - functionChunk "withoutConfig", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorManyInfinite -> [opt-env-conf-test] - [ [ functionChunk "many", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "some", [opt-env-conf-test] - " was called with a parser that may succeed without consuming anything." [opt-env-conf-test] - ], [opt-env-conf-test] - ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test] - ], [opt-env-conf-test] - maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  lintParser :: Parser a -> Maybe (NonEmpty LintError) [opt-env-conf-test]  lintParser = [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf-test] @@ -65,171 +65,170 @@ [opt-env-conf-test]  renderLintError :: LintError -> [[Chunk]] [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  lintParser :: Parser a -> Maybe (NonEmpty LintError) [opt-env-conf-test]  lintParser = [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,159 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoReaderForEnvVar -> [opt-env-conf-test] - [ [ functionChunk "env", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,164 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorUnreadableExample e -> [opt-env-conf-test] - [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test] - ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,159 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoMetavarForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "metavar", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,159 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoDashedForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "long", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "short", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,159 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorNoReaderForOption -> [opt-env-conf-test] - [ [ functionChunk "option", [opt-env-conf-test] - " or ", [opt-env-conf-test] - functionChunk "name", [opt-env-conf-test] - " has no ", [opt-env-conf-test] - functionChunk "reader", [opt-env-conf-test] - "." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,162 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test] - ] [opt-env-conf-test] - ] [opt-env-conf-test] - LintErrorUnknownDefaultCommand c -> [opt-env-conf-test] - [ [ functionChunk "defaultCommand", [opt-env-conf-test] - " was called with an unknown command: ", [opt-env-conf-test] - commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Lint.hs:69:7-12 [opt-env-conf-test] @@ -66,168 +66,164 @@ [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test] - LintErrorDashInShort -> [opt-env-conf-test] - [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test] - ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test] - ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/NonDet.hs:74:24-42 [opt-env-conf-test] @@ -71,7 +71,7 @@ [opt-env-conf-test]  runListTLazy = fmap g . unListT [opt-env-conf-test]  where [opt-env-conf-test]  g MNil = Nothing [opt-env-conf-test] - g (x `MCons` xs) = Just (x, ListT xs) [opt-env-conf-test] + g (x `MCons` xs) = Nothing [opt-env-conf-test]  [opt-env-conf-test]  runListTComplete :: (Monad m) => ListT m a -> m [a] [opt-env-conf-test]  runListTComplete = unListT >=> go [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:379:57-62 [opt-env-conf-test] @@ -376,7 +376,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Like 'env' but ignores any 'subEnv', 'subEnv_', or 'subAll'. [opt-env-conf-test]  unprefixedEnv :: String -> Builder a [opt-env-conf-test] -unprefixedEnv v = Builder [BuildAddEnv (EnvVarSetting v False)] [opt-env-conf-test] +unprefixedEnv v = Builder [BuildAddEnv (EnvVarSetting v True)] [opt-env-conf-test]  [opt-env-conf-test]  -- | Try to parse a configuration value at the given key. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf-test] @@ -424,11 +424,10 @@ [opt-env-conf-test]  name :: (HasCodec a) => String -> Builder a [opt-env-conf-test]  name s = [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ option, [opt-env-conf-test]  long (toArgCase s), [opt-env-conf-test]  env (toEnvCase s), [opt-env-conf-test] - conf (toConfigCase s) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Set the default value [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:277:43-47 [opt-env-conf-test] @@ -274,7 +274,7 @@ [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test] - BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test] + BuildTryOption -> s {settingTryOption = False} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:286:40-44 [opt-env-conf-test] @@ -283,7 +283,7 @@ [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test] - BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test] + BuildSetHidden -> s {settingHidden = False} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test] - BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf-test] @@ -424,11 +424,7 @@ [opt-env-conf-test]  name :: (HasCodec a) => String -> Builder a [opt-env-conf-test]  name s = [opt-env-conf-test]  mconcat [opt-env-conf-test] - [ option, [opt-env-conf-test] - long (toArgCase s), [opt-env-conf-test] - env (toEnvCase s), [opt-env-conf-test] - conf (toConfigCase s) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Set the default value [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Setting.hs:287:48-54 [opt-env-conf-test] @@ -284,7 +284,7 @@ [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test] - BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test] + BuildSetCompleter c -> s {settingCompleter = Nothing} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test] - BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Setting.hs:284:55-70 [opt-env-conf-test] @@ -281,7 +281,7 @@ [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test] - BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test] + BuildSetDefault a shown -> s {settingDefaultValue = Nothing} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:276:47-51 [opt-env-conf-test] @@ -273,7 +273,7 @@ [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test] - BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test] + BuildTryArgument -> s {settingTryArgument = False} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Setting.hs:278:52-58 [opt-env-conf-test] @@ -275,7 +275,7 @@ [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test] - BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test] + BuildSetSwitchValue a -> s {settingSwitchValue = Nothing} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:416:43-48 [opt-env-conf-test] @@ -413,7 +413,7 @@ [opt-env-conf-test]  let t = [opt-env-conf-test]  ConfigValSetting [opt-env-conf-test]  { configValSettingPath = k :| [], [opt-env-conf-test] - configValSettingAllowPrefix = False, [opt-env-conf-test] + configValSettingAllowPrefix = True, [opt-env-conf-test]  configValSettingCodec = c [opt-env-conf-test]  } [opt-env-conf-test]  in Builder [BuildAddConf t] [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:375:47-51 [opt-env-conf-test] @@ -372,7 +372,7 @@ [opt-env-conf-test]  -- [opt-env-conf-test]  -- Multiple 'env's will be tried in order. [opt-env-conf-test]  env :: String -> Builder a [opt-env-conf-test] -env v = Builder [BuildAddEnv (EnvVarSetting v True)] [opt-env-conf-test] +env v = Builder [BuildAddEnv (EnvVarSetting v False)] [opt-env-conf-test]  [opt-env-conf-test]  -- | Like 'env' but ignores any 'subEnv', 'subEnv_', or 'subAll'. [opt-env-conf-test]  unprefixedEnv :: String -> Builder a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test] - BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test] - BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Setting.hs:275:45-52 [opt-env-conf-test] @@ -272,7 +272,7 @@ [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test] - BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test] + BuildSetMetavar mv -> s {settingMetavar = Nothing} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Setting.hs:427:5-6 [opt-env-conf-test] @@ -424,11 +424,10 @@ [opt-env-conf-test]  name :: (HasCodec a) => String -> Builder a [opt-env-conf-test]  name s = [opt-env-conf-test]  mconcat [opt-env-conf-test] - [ option, [opt-env-conf-test]  long (toArgCase s), [opt-env-conf-test]  env (toEnvCase s), [opt-env-conf-test]  conf (toConfigCase s) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Set the default value [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:68:5-6 [opt-env-conf-test] @@ -65,171 +65,170 @@ [opt-env-conf-test]  renderLintError :: LintError -> [[Chunk]] [opt-env-conf-test]  renderLintError LintError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ [[fore red "Invalid Setting:"]], [opt-env-conf-test]  case lintErrorMessage of [opt-env-conf-test]  LintErrorUndocumented -> [opt-env-conf-test]  [["missing ", functionChunk "help", "."]] [opt-env-conf-test]  LintErrorEmptySetting -> [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [ "This ", [opt-env-conf-test]  functionChunk "setting", [opt-env-conf-test]  " parses nothing." [opt-env-conf-test]  ] [opt-env-conf-test]  ], [opt-env-conf-test]  [ [ "Add an ", [opt-env-conf-test]  functionChunk "argument", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "env", [opt-env-conf-test]  ", ", [opt-env-conf-test]  functionChunk "conf", [opt-env-conf-test]  ", or ", [opt-env-conf-test]  functionChunk "value", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInShort -> [opt-env-conf-test]  [ [functionChunk "short", " may not contain a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "short", " '-'."] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorDashInLong s -> [opt-env-conf-test]  [ [functionChunk "long", " may not start with a '-'."], [opt-env-conf-test]  ["Found ", functionChunk "long", " ", chunk $ T.pack $ show $ NE.toList s, "."], [opt-env-conf-test]  [ "Try ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " ", [opt-env-conf-test]  chunk $ [opt-env-conf-test]  T.pack $ [opt-env-conf-test]  show $ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  '-' : cs -> go cs [opt-env-conf-test]  c : cs -> c : cs [opt-env-conf-test]  in go $ NE.toList s, [opt-env-conf-test]  " instead." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForArgument -> [opt-env-conf-test]  [ [ functionChunk "argument", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForOption -> [opt-env-conf-test]  [ [ functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoDashedForSwitch -> [opt-env-conf-test]  [ [ functionChunk "switch", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoOptionOrSwitchForDashed -> [opt-env-conf-test]  [ [ functionChunk "long", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "short", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "option", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "switch", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoReaderForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "reader", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoMetavarForEnvVar -> [opt-env-conf-test]  [ [ functionChunk "env", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " has no ", [opt-env-conf-test]  functionChunk "metavar", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorNoCommands -> [opt-env-conf-test]  [ [ functionChunk "commands", [opt-env-conf-test]  " was called with an empty list." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnknownDefaultCommand c -> [opt-env-conf-test]  [ [ functionChunk "defaultCommand", [opt-env-conf-test]  " was called with an unknown command: ", [opt-env-conf-test]  commandChunk c [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorUnreadableExample e -> [opt-env-conf-test]  [ [functionChunk "example", " was called with an example that none of the ", functionChunk "reader", "s succeed in reading."], [opt-env-conf-test]  ["Example: ", chunk $ T.pack e] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorConfigWithoutLoad -> [opt-env-conf-test]  [ [ functionChunk "conf", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "name", [opt-env-conf-test]  " was called with no way to load configuration." [opt-env-conf-test]  ], [opt-env-conf-test]  [ "You can load configuration with ", [opt-env-conf-test]  functionChunk "withConfig", [opt-env-conf-test]  ", or explicitly not load any configuration with ", [opt-env-conf-test]  functionChunk "withoutConfig", [opt-env-conf-test]  "." [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test]  " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test] - maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  lintParser :: Parser a -> Maybe (NonEmpty LintError) [opt-env-conf-test]  lintParser = [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test] - BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:397:43-47 [opt-env-conf-test] @@ -394,7 +394,7 @@ [opt-env-conf-test]  let t = [opt-env-conf-test]  ConfigValSetting [opt-env-conf-test]  { configValSettingPath = k :| [], [opt-env-conf-test] - configValSettingAllowPrefix = True, [opt-env-conf-test] + configValSettingAllowPrefix = False, [opt-env-conf-test]  configValSettingCodec = c [opt-env-conf-test]  } [opt-env-conf-test]  in Builder [BuildAddConf t] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test] - BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Lint.hs:224:13-14 [opt-env-conf-test] @@ -221,11 +221,10 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  LintErrorManyInfinite -> [opt-env-conf-test]  [ [ functionChunk "many", [opt-env-conf-test]  " or ", [opt-env-conf-test]  functionChunk "some", [opt-env-conf-test] - " was called with a parser that may succeed without consuming anything." [opt-env-conf-test]  ], [opt-env-conf-test]  ["This is not allowed because the parser would run infinitely."] [opt-env-conf-test]  ], [opt-env-conf-test]  maybe [] (pure . ("Defined at: " :) . pure . srcLocChunk) lintErrorSrcLoc [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf-test] @@ -200,7 +200,7 @@ [opt-env-conf-test]  let Setting _ _ _ _ _ _ _ _ _ _ _ _ _ _ = undefined [opt-env-conf-test]  in showParen True $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] - . showsPrec 11 settingDasheds [opt-env-conf-test] + . showsPrec 0 settingDasheds [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf-test] @@ -231,7 +231,7 @@ [opt-env-conf-test]  showConfigValSettingABit :: ConfigValSetting a -> ShowS [opt-env-conf-test]  showConfigValSettingABit ConfigValSetting {..} = [opt-env-conf-test]  showString "ConfigValSetting " [opt-env-conf-test] - . showsPrec 11 configValSettingPath [opt-env-conf-test] + . showsPrec 1 configValSettingPath [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showString (showCodecABit configValSettingCodec) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf-test] @@ -231,7 +231,7 @@ [opt-env-conf-test]  showConfigValSettingABit :: ConfigValSetting a -> ShowS [opt-env-conf-test]  showConfigValSettingABit ConfigValSetting {..} = [opt-env-conf-test]  showString "ConfigValSetting " [opt-env-conf-test] - . showsPrec 11 configValSettingPath [opt-env-conf-test] + . showsPrec 0 configValSettingPath [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showString (showCodecABit configValSettingCodec) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test] - BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test] - BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test] - BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test] - BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test] - BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test] - BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf-test] @@ -204,7 +204,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryArgument [opt-env-conf-test] + . showsPrec -11 settingTryArgument [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test] - BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf-test] @@ -204,7 +204,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryArgument [opt-env-conf-test] + . showsPrec 11 not (settingTryArgument) [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf-test] @@ -204,7 +204,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryArgument [opt-env-conf-test] + . showsPrec 1 settingTryArgument [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf-test] @@ -208,7 +208,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryOption [opt-env-conf-test] + . showsPrec 11 not (settingTryOption) [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf-test] @@ -216,7 +216,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingDefaultValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingExamples [opt-env-conf-test] + . showsPrec 0 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf-test] @@ -216,7 +216,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingDefaultValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingExamples [opt-env-conf-test] + . showsPrec 1 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf-test] @@ -210,7 +210,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingTryOption [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingEnvVars [opt-env-conf-test] + . showsPrec -11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (showNonEmptyWith showConfigValSettingABit) settingConfigVals [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf-test] @@ -210,7 +210,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingTryOption [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingEnvVars [opt-env-conf-test] + . showsPrec 1 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (showNonEmptyWith showConfigValSettingABit) settingConfigVals [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:219:23-25 [opt-env-conf-test] @@ -216,7 +216,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingDefaultValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingExamples [opt-env-conf-test] + . showsPrec -11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:213:23-25 [opt-env-conf-test] @@ -210,7 +210,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingTryOption [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingEnvVars [opt-env-conf-test] + . showsPrec 0 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (showNonEmptyWith showConfigValSettingABit) settingConfigVals [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf-test] @@ -208,7 +208,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryOption [opt-env-conf-test] + . showsPrec 11 False [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:211:26-42 [opt-env-conf-test] @@ -208,7 +208,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryOption [opt-env-conf-test] + . showsPrec 11 True [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf-test] @@ -208,7 +208,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryOption [opt-env-conf-test] + . showsPrec -11 settingTryOption [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf-test] @@ -208,7 +208,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryOption [opt-env-conf-test] + . showsPrec 1 settingTryOption [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:211:23-25 [opt-env-conf-test] @@ -208,7 +208,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryOption [opt-env-conf-test] + . showsPrec 0 settingTryOption [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingEnvVars [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Main.hs:262:11-12 [opt-env-conf-test] @@ -259,12 +259,11 @@ [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test] - [ option, [opt-env-conf-test]  reader $ maybeReader parseAbsFile, [opt-env-conf-test]  long "zsh-completion-script", [opt-env-conf-test]  hidden, [opt-env-conf-test]  help "Render the zsh completion script" [opt-env-conf-test]  ], [opt-env-conf-test]  ZshCompletionScript [opt-env-conf-test]  <$> setting [opt-env-conf-test]  [ option, [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test]  BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test] - BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:273:30-113 [opt-env-conf-test] @@ -270,22 +270,21 @@ [opt-env-conf-test]  applyBuildInstructions is s = foldr applyBuildInstruction s is [opt-env-conf-test]  [opt-env-conf-test]  applyBuildInstruction :: BuildInstruction a -> Setting a -> Setting a [opt-env-conf-test]  applyBuildInstruction bi s = case bi of [opt-env-conf-test]  BuildAddHelp h -> s {settingHelp = Just $ maybe h (<> h) (settingHelp s)} [opt-env-conf-test]  BuildSetMetavar mv -> s {settingMetavar = Just mv} [opt-env-conf-test]  BuildTryArgument -> s {settingTryArgument = True} [opt-env-conf-test]  BuildTryOption -> s {settingTryOption = True} [opt-env-conf-test]  BuildSetSwitchValue a -> s {settingSwitchValue = Just a} [opt-env-conf-test] - BuildAddReader r -> s {settingReaders = r : settingReaders s} [opt-env-conf-test]  BuildAddLong l -> s {settingDasheds = DashedLong l : settingDasheds s} [opt-env-conf-test]  BuildAddShort c -> s {settingDasheds = DashedShort c : settingDasheds s} [opt-env-conf-test]  BuildAddEnv v -> s {settingEnvVars = Just $ maybe (v :| []) (v <|) $ settingEnvVars s} [opt-env-conf-test]  BuildAddConf t -> s {settingConfigVals = Just $ maybe (t :| []) (t <|) $ settingConfigVals s} [opt-env-conf-test]  BuildSetDefault a shown -> s {settingDefaultValue = Just (a, shown)} [opt-env-conf-test]  BuildAddExample e -> s {settingExamples = e : settingExamples s} [opt-env-conf-test]  BuildSetHidden -> s {settingHidden = True} [opt-env-conf-test]  BuildSetCompleter c -> s {settingCompleter = Just c} [opt-env-conf-test]  BuildAddRequiredCapability c -> s {settingRequiredCapabilities = Set.insert c (settingRequiredCapabilities s)} [opt-env-conf-test]  [opt-env-conf-test]  instance Semigroup (Builder f) where [opt-env-conf-test]  (<>) (Builder f1) (Builder f2) = Builder (f1 <> f2) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:201:17-21 [opt-env-conf-test] @@ -198,7 +198,7 @@ [opt-env-conf-test]  showSettingABit :: Setting a -> ShowS [opt-env-conf-test]  showSettingABit Setting {..} = [opt-env-conf-test]  let Setting _ _ _ _ _ _ _ _ _ _ _ _ _ _ = undefined [opt-env-conf-test] - in showParen True $ [opt-env-conf-test] + in showParen False $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 settingDasheds [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf-test] @@ -218,7 +218,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHidden [opt-env-conf-test] + . showsPrec 11 False [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf-test] @@ -218,7 +218,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHidden [opt-env-conf-test] + . showsPrec 11 not (settingHidden) [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf-test] @@ -220,7 +220,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingMetavar [opt-env-conf-test] + . showsPrec 0 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf-test] @@ -220,7 +220,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingMetavar [opt-env-conf-test] + . showsPrec 1 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:240:41-45 [opt-env-conf-test] @@ -237,7 +237,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  showMaybeWith :: (a -> ShowS) -> Maybe a -> ShowS [opt-env-conf-test]  showMaybeWith _ Nothing = showString "Nothing" [opt-env-conf-test] -showMaybeWith func (Just a) = showParen True $ showString "Just " . func a [opt-env-conf-test] +showMaybeWith func (Just a) = showParen False $ showString "Just " . func a [opt-env-conf-test]  [opt-env-conf-test]  showNonEmptyWith :: (a -> ShowS) -> NonEmpty a -> ShowS [opt-env-conf-test]  showNonEmptyWith func (a :| as) = [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf-test] @@ -222,7 +222,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHelp [opt-env-conf-test] + . showsPrec 0 settingHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingCompleter [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:221:26-39 [opt-env-conf-test] @@ -218,7 +218,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHidden [opt-env-conf-test] + . showsPrec 11 True [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf-test] @@ -204,7 +204,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryArgument [opt-env-conf-test] + . showsPrec 11 False [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf-test] @@ -218,7 +218,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHidden [opt-env-conf-test] + . showsPrec -11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:234:17-19 [opt-env-conf-test] @@ -231,7 +231,7 @@ [opt-env-conf-test]  showConfigValSettingABit :: ConfigValSetting a -> ShowS [opt-env-conf-test]  showConfigValSettingABit ConfigValSetting {..} = [opt-env-conf-test]  showString "ConfigValSetting " [opt-env-conf-test] - . showsPrec 11 configValSettingPath [opt-env-conf-test] + . showsPrec -11 configValSettingPath [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showString (showCodecABit configValSettingCodec) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:223:23-25 [opt-env-conf-test] @@ -220,7 +220,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingMetavar [opt-env-conf-test] + . showsPrec -11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf-test] @@ -222,7 +222,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHelp [opt-env-conf-test] + . showsPrec 1 settingHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingCompleter [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:225:23-25 [opt-env-conf-test] @@ -222,7 +222,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHelp [opt-env-conf-test] + . showsPrec -11 settingHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingCompleter [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf-test] @@ -218,7 +218,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHidden [opt-env-conf-test] + . showsPrec 1 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:221:23-25 [opt-env-conf-test] @@ -218,7 +218,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingExamples [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingHidden [opt-env-conf-test] + . showsPrec 0 settingHidden [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 settingMetavar [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf-test] @@ -200,7 +200,7 @@ [opt-env-conf-test]  let Setting _ _ _ _ _ _ _ _ _ _ _ _ _ _ = undefined [opt-env-conf-test]  in showParen True $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] - . showsPrec 11 settingDasheds [opt-env-conf-test] + . showsPrec -11 settingDasheds [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:207:23-25 [opt-env-conf-test] @@ -204,7 +204,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryArgument [opt-env-conf-test] + . showsPrec 0 settingTryArgument [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:203:23-25 [opt-env-conf-test] @@ -200,7 +200,7 @@ [opt-env-conf-test]  let Setting _ _ _ _ _ _ _ _ _ _ _ _ _ _ = undefined [opt-env-conf-test]  in showParen True $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] - . showsPrec 11 settingDasheds [opt-env-conf-test] + . showsPrec 1 settingDasheds [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:207:26-44 [opt-env-conf-test] @@ -204,7 +204,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith (\_ -> showString "_") settingReaders [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingTryArgument [opt-env-conf-test] + . showsPrec 11 True [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingSwitchValue [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf-test] @@ -162,7 +162,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixConfigValSetting :: String -> ConfigValSetting a -> ConfigValSetting a [opt-env-conf-test]  prefixConfigValSetting prefix c = [opt-env-conf-test] - if configValSettingAllowPrefix c [opt-env-conf-test] + if True [opt-env-conf-test]  then c {configValSettingPath = prefix NE.<| configValSettingPath c} [opt-env-conf-test]  else c [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf-test] @@ -145,7 +145,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] - if envVarSettingAllowPrefix e [opt-env-conf-test] + if True [opt-env-conf-test]  then e {envVarSettingVar = prefix <> envVarSettingVar e} [opt-env-conf-test]  else e [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf-test] @@ -162,7 +162,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixConfigValSetting :: String -> ConfigValSetting a -> ConfigValSetting a [opt-env-conf-test]  prefixConfigValSetting prefix c = [opt-env-conf-test] - if configValSettingAllowPrefix c [opt-env-conf-test] + if False [opt-env-conf-test]  then c {configValSettingPath = prefix NE.<| configValSettingPath c} [opt-env-conf-test]  else c [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf-test] @@ -170,9 +170,8 @@ [opt-env-conf-test]  suffixConfigValSettingKey suffix c = c {configValSettingPath = suffixPath $ configValSettingPath c} [opt-env-conf-test]  where [opt-env-conf-test]  suffixPath :: NonEmpty String -> NonEmpty String [opt-env-conf-test]  suffixPath (f :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> (f <> suffix) :| [] [opt-env-conf-test] - Just ne -> f NE.<| suffixPath ne [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'mempty' 'Setting' to build up a setting from. [opt-env-conf-test]  emptySetting :: Setting a [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:183:28-33 [opt-env-conf-test] @@ -180,7 +180,7 @@ [opt-env-conf-test]  Setting [opt-env-conf-test]  { settingDasheds = [], [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test] - settingTryArgument = False, [opt-env-conf-test] + settingTryArgument = True, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf-test] @@ -145,7 +145,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] - if envVarSettingAllowPrefix e [opt-env-conf-test] + if False [opt-env-conf-test]  then e {envVarSettingVar = prefix <> envVarSettingVar e} [opt-env-conf-test]  else e [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf-test] @@ -162,7 +162,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixConfigValSetting :: String -> ConfigValSetting a -> ConfigValSetting a [opt-env-conf-test]  prefixConfigValSetting prefix c = [opt-env-conf-test] - if configValSettingAllowPrefix c [opt-env-conf-test] + if not (configValSettingAllowPrefix c) [opt-env-conf-test]  then c {configValSettingPath = prefix NE.<| configValSettingPath c} [opt-env-conf-test]  else c [opt-env-conf-test]  [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:185:26-31 [opt-env-conf-test] @@ -182,7 +182,7 @@ [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test] - settingTryOption = False, [opt-env-conf-test] + settingTryOption = True, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingMetavar = Nothing, [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf-test] @@ -226,7 +226,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingCompleter [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingRequiredCapabilities [opt-env-conf-test] + . showsPrec 1 settingRequiredCapabilities [opt-env-conf-test]  [opt-env-conf-test]  showConfigValSettingABit :: ConfigValSetting a -> ShowS [opt-env-conf-test]  showConfigValSettingABit ConfigValSetting {..} = [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf-test] @@ -170,9 +170,8 @@ [opt-env-conf-test]  suffixConfigValSettingKey suffix c = c {configValSettingPath = suffixPath $ configValSettingPath c} [opt-env-conf-test]  where [opt-env-conf-test]  suffixPath :: NonEmpty String -> NonEmpty String [opt-env-conf-test]  suffixPath (f :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> (f <> suffix) :| [] [opt-env-conf-test]  Just ne -> f NE.<| suffixPath ne [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'mempty' 'Setting' to build up a setting from. [opt-env-conf-test]  emptySetting :: Setting a [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf-test] @@ -226,7 +226,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingCompleter [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingRequiredCapabilities [opt-env-conf-test] + . showsPrec -11 settingRequiredCapabilities [opt-env-conf-test]  [opt-env-conf-test]  showConfigValSettingABit :: ConfigValSetting a -> ShowS [opt-env-conf-test]  showConfigValSettingABit ConfigValSetting {..} = [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:229:23-25 [opt-env-conf-test] @@ -226,7 +226,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showMaybeWith (\_ -> showString "_") settingCompleter [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 settingRequiredCapabilities [opt-env-conf-test] + . showsPrec 0 settingRequiredCapabilities [opt-env-conf-test]  [opt-env-conf-test]  showConfigValSettingABit :: ConfigValSetting a -> ShowS [opt-env-conf-test]  showConfigValSettingABit ConfigValSetting {..} = [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:244:13-17 [opt-env-conf-test] @@ -241,7 +241,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  showNonEmptyWith :: (a -> ShowS) -> NonEmpty a -> ShowS [opt-env-conf-test]  showNonEmptyWith func (a :| as) = [opt-env-conf-test] - showParen True $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  func a [opt-env-conf-test]  . showString " :| " [opt-env-conf-test]  . showListWith func as [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf-test] @@ -124,7 +124,7 @@ [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf-test] @@ -122,7 +122,7 @@ [opt-env-conf-test]  SettingHash [opt-env-conf-test]  ( 42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test] - `hashWithSalt` settingTryArgument [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf-test] @@ -120,7 +120,7 @@ [opt-env-conf-test]  hashSetting :: Setting a -> SettingHash [opt-env-conf-test]  hashSetting Setting {..} = [opt-env-conf-test]  SettingHash [opt-env-conf-test] - ( 42 [opt-env-conf-test] + ( 0 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf-test] @@ -120,7 +120,7 @@ [opt-env-conf-test]  hashSetting :: Setting a -> SettingHash [opt-env-conf-test]  hashSetting Setting {..} = [opt-env-conf-test]  SettingHash [opt-env-conf-test] - ( 42 [opt-env-conf-test] + ( -42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Setting.hs:191:23-28 [opt-env-conf-test] @@ -188,7 +188,7 @@ [opt-env-conf-test]  settingMetavar = Nothing, [opt-env-conf-test]  settingHelp = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] - settingHidden = False, [opt-env-conf-test] + settingHidden = True, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test]  settingRequiredCapabilities = Set.empty [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf-test] @@ -124,7 +124,7 @@ [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf-test] @@ -122,7 +122,7 @@ [opt-env-conf-test]  SettingHash [opt-env-conf-test]  ( 42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test] - `hashWithSalt` settingTryArgument [opt-env-conf-test] + `hashWithSalt` not (settingTryArgument) [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf-test] @@ -145,7 +145,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] - if envVarSettingAllowPrefix e [opt-env-conf-test] + if not (envVarSettingAllowPrefix e) [opt-env-conf-test]  then e {envVarSettingVar = prefix <> envVarSettingVar e} [opt-env-conf-test]  else e [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf-test] @@ -125,7 +125,7 @@ [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] - `hashWithSalt` settingTryOption [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  `hashWithSalt` (snd <$> settingDefaultValue) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf-test] @@ -125,7 +125,7 @@ [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] - `hashWithSalt` settingTryOption [opt-env-conf-test] + `hashWithSalt` not (settingTryOption) [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  `hashWithSalt` (snd <$> settingDefaultValue) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  -- | Which readers should be tried to parse a value from a string [opt-env-conf-test]  settingReaders :: ![Reader a], [opt-env-conf-test]  -- | Whether the readers should be used to parsed arguments [opt-env-conf-test] - settingTryArgument :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  -- | What value to parse when the switch exists. [opt-env-conf-test]  -- [opt-env-conf-test]  -- Nothing means this is not a switch. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf-test] @@ -93,7 +93,7 @@ [opt-env-conf-test]  settingSwitchValue :: !(Maybe a), [opt-env-conf-test]  -- | Whether the dasheds should be tried together with the readers as [opt-env-conf-test]  -- options. [opt-env-conf-test] - settingTryOption :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  -- | Which env vars can be read. [opt-env-conf-test]  settingEnvVars :: !(Maybe (NonEmpty EnvVarSetting)), [opt-env-conf-test]  -- | Which and how to parse config values [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf-test] @@ -103,7 +103,7 @@ [opt-env-conf-test]  -- | Example values [opt-env-conf-test]  settingExamples :: ![String], [opt-env-conf-test]  -- | Whether to hide docs [opt-env-conf-test] - settingHidden :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  -- | Which metavar should be show in documentation [opt-env-conf-test]  settingMetavar :: !(Maybe Metavar), [opt-env-conf-test]  settingHelp :: !(Maybe String), [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:127:13-80 [opt-env-conf-test] @@ -124,7 +124,6 @@ [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:127:13-80 [opt-env-conf-test] @@ -124,7 +124,6 @@ [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:127:11-12 [opt-env-conf-test] @@ -124,9 +124,7 @@ [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test] - [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:127:11-12 [opt-env-conf-test] @@ -124,9 +124,8 @@ [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:132:11-12 [opt-env-conf-test] @@ -129,9 +129,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test] - [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test] - ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:132:11-12 [opt-env-conf-test] @@ -129,9 +129,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test] - [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:93:11-53 [opt-env-conf-test] @@ -90,7 +90,6 @@ [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test] - ParseErrorEmptySetting -> [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test] - ParseErrorNoReaders -> [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test] - ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test] - ParseErrorEmpty -> [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test] - ParseErrorCheckFailed _ err -> [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test] - ParseErrorMissingArgument o -> [opt-env-conf-test] - [ "Missing argument: " [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test] - ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingOption o -> [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test] - ParseErrorArgumentRead md errs -> [opt-env-conf-test] - ["Failed to read argument: "] [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorOptionRead md errs -> [opt-env-conf-test] - ["Failed to read option: "] [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorMissingSwitch o -> [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test] - : maybe [] renderEnvDoc md [opt-env-conf-test] - ParseErrorEnvRead md errs -> [opt-env-conf-test] - ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,60 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingEnvVar md -> [opt-env-conf-test] - ["Missing env var: "] [opt-env-conf-test] - : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingConfVal md -> [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data EnvVarSetting = EnvVarSetting [opt-env-conf-test]  { envVarSettingVar :: !String, [opt-env-conf-test] - envVarSettingAllowPrefix :: !Bool [opt-env-conf-test] + True :: !Bool [opt-env-conf-test]  } [opt-env-conf-test]  deriving (Show, Eq) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf-test] @@ -156,7 +156,7 @@ [opt-env-conf-test]  = forall void. [opt-env-conf-test]  ConfigValSetting [opt-env-conf-test]  { configValSettingPath :: !(NonEmpty String), [opt-env-conf-test] - configValSettingAllowPrefix :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  configValSettingCodec :: !(ValueCodec void (Maybe a)) [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test] - ParseErrorConfigRead md s -> [opt-env-conf-test] - ["Failed to parse configuration: "] [opt-env-conf-test] - : maybe [] renderConfDoc md [opt-env-conf-test] - ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf-test] @@ -103,7 +103,7 @@ [opt-env-conf-test]  -- | Example values [opt-env-conf-test]  settingExamples :: ![String], [opt-env-conf-test]  -- | Whether to hide docs [opt-env-conf-test] - settingHidden :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  -- | Which metavar should be show in documentation [opt-env-conf-test]  settingMetavar :: !(Maybe Metavar), [opt-env-conf-test]  settingHelp :: !(Maybe String), [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf-test] @@ -93,7 +93,7 @@ [opt-env-conf-test]  settingSwitchValue :: !(Maybe a), [opt-env-conf-test]  -- | Whether the dasheds should be tried together with the readers as [opt-env-conf-test]  -- options. [opt-env-conf-test] -  settingTryOption :: !Bool, [opt-env-conf-test] +  not (settingTryOption) :: !Bool, [opt-env-conf-test]  -- | Which env vars can be read. [opt-env-conf-test]  settingEnvVars :: !(Maybe (NonEmpty EnvVarSetting)), [opt-env-conf-test]  -- | Which and how to parse config values [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,60 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test] - ParseErrorMissingCommand cs -> [opt-env-conf-test] - ["Missing command, available commands:"] [opt-env-conf-test] - : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,58 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test] - [fore blue "available commands:"] [opt-env-conf-test] - ] [opt-env-conf-test] - ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data EnvVarSetting = EnvVarSetting [opt-env-conf-test]  { envVarSettingVar :: !String, [opt-env-conf-test] - envVarSettingAllowPrefix :: !Bool [opt-env-conf-test] + False :: !Bool [opt-env-conf-test]  } [opt-env-conf-test]  deriving (Show, Eq) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,58 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test] - ParseErrorAllOrNothing locs -> [opt-env-conf-test] - [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test] - ["The following settings have been parsed:"] [opt-env-conf-test] - ] [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test] - ParseErrorUnrecognised leftovers -> [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  -- | Which readers should be tried to parse a value from a string [opt-env-conf-test]  settingReaders :: ![Reader a], [opt-env-conf-test]  -- | Whether the readers should be used to parsed arguments [opt-env-conf-test] -  settingTryArgument :: !Bool, [opt-env-conf-test] +  not (settingTryArgument) :: !Bool, [opt-env-conf-test]  -- | What value to parse when the switch exists. [opt-env-conf-test]  -- [opt-env-conf-test]  -- Nothing means this is not a switch. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test] - ParseErrorMissingCapability cap -> [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:96:5-21 [opt-env-conf-test] @@ -93,7 +93,7 @@ [opt-env-conf-test]  settingSwitchValue :: !(Maybe a), [opt-env-conf-test]  -- | Whether the dasheds should be tried together with the readers as [opt-env-conf-test]  -- options. [opt-env-conf-test] - settingTryOption :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  -- | Which env vars can be read. [opt-env-conf-test]  settingEnvVars :: !(Maybe (NonEmpty EnvVarSetting)), [opt-env-conf-test]  -- | Which and how to parse config values [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf-test] @@ -142,7 +142,4 @@ [opt-env-conf-test]  [opt-env-conf-test]  availableCommandsLines :: [CommandDoc a] -> [[Chunk]] [opt-env-conf-test]  availableCommandsLines = map $ \CommandDoc {..} -> [opt-env-conf-test] - [ commandChunk commandDocArgument, [opt-env-conf-test] - ": ", [opt-env-conf-test] - helpChunk commandDocHelp [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:89:5-23 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  -- | Which readers should be tried to parse a value from a string [opt-env-conf-test]  settingReaders :: ![Reader a], [opt-env-conf-test]  -- | Whether the readers should be used to parsed arguments [opt-env-conf-test] - settingTryArgument :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  -- | What value to parse when the switch exists. [opt-env-conf-test]  -- [opt-env-conf-test]  -- Nothing means this is not a switch. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  hashWithSalt salt EnvVarSetting {..} = [opt-env-conf-test]  salt [opt-env-conf-test]  `hashWithSalt` envVarSettingVar [opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:93:11-53 [opt-env-conf-test] @@ -90,7 +90,6 @@ [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf-test] @@ -156,7 +156,7 @@ [opt-env-conf-test]  = forall void. [opt-env-conf-test]  ConfigValSetting [opt-env-conf-test]  { configValSettingPath :: !(NonEmpty String), [opt-env-conf-test] -  configValSettingAllowPrefix :: !Bool, [opt-env-conf-test] +  not (configValSettingAllowPrefix) :: !Bool, [opt-env-conf-test]  configValSettingCodec :: !(ValueCodec void (Maybe a)) [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf-test] @@ -156,7 +156,7 @@ [opt-env-conf-test]  = forall void. [opt-env-conf-test]  ConfigValSetting [opt-env-conf-test]  { configValSettingPath :: !(NonEmpty String), [opt-env-conf-test] - configValSettingAllowPrefix :: !Bool, [opt-env-conf-test] + False :: !Bool, [opt-env-conf-test]  configValSettingCodec :: !(ValueCodec void (Maybe a)) [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:89:11-12 [opt-env-conf-test] @@ -86,9 +86,7 @@ [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf-test] @@ -142,7 +142,6 @@ [opt-env-conf-test]  [opt-env-conf-test]  availableCommandsLines :: [CommandDoc a] -> [[Chunk]] [opt-env-conf-test]  availableCommandsLines = map $ \CommandDoc {..} -> [opt-env-conf-test] - [ commandChunk commandDocArgument, [opt-env-conf-test]  ": ", [opt-env-conf-test]  helpChunk commandDocHelp [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  hashWithSalt salt EnvVarSetting {..} = [opt-env-conf-test]  salt [opt-env-conf-test]  `hashWithSalt` envVarSettingVar [opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix [opt-env-conf-test] + `hashWithSalt` not (envVarSettingAllowPrefix) [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data EnvVarSetting = EnvVarSetting [opt-env-conf-test]  { envVarSettingVar :: !String, [opt-env-conf-test] -  envVarSettingAllowPrefix :: !Bool [opt-env-conf-test] +  not (envVarSettingAllowPrefix) :: !Bool [opt-env-conf-test]  } [opt-env-conf-test]  deriving (Show, Eq) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:89:11-12 [opt-env-conf-test] @@ -86,9 +86,8 @@ [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  hashWithSalt salt EnvVarSetting {..} = [opt-env-conf-test]  salt [opt-env-conf-test]  `hashWithSalt` envVarSettingVar [opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:145:3-4 [opt-env-conf-test] @@ -142,7 +142,6 @@ [opt-env-conf-test]  [opt-env-conf-test]  availableCommandsLines :: [CommandDoc a] -> [[Chunk]] [opt-env-conf-test]  availableCommandsLines = map $ \CommandDoc {..} -> [opt-env-conf-test]  [ commandChunk commandDocArgument, [opt-env-conf-test]  ": ", [opt-env-conf-test] - helpChunk commandDocHelp [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf-test] @@ -124,7 +124,7 @@ [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] + `hashWithSalt` not (isJust settingSwitchValue) [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Setting.hs:106:5-18 [opt-env-conf-test] @@ -103,7 +103,7 @@ [opt-env-conf-test]  -- | Example values [opt-env-conf-test]  settingExamples :: ![String], [opt-env-conf-test]  -- | Whether to hide docs [opt-env-conf-test] -  settingHidden :: !Bool, [opt-env-conf-test] +  not (settingHidden) :: !Bool, [opt-env-conf-test]  -- | Which metavar should be show in documentation [opt-env-conf-test]  settingMetavar :: !(Maybe Metavar), [opt-env-conf-test]  settingHelp :: !(Maybe String), [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf-test] @@ -122,7 +122,7 @@ [opt-env-conf-test]  SettingHash [opt-env-conf-test]  ( 42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test] - `hashWithSalt` settingTryArgument [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Setting.hs:123:7-9 [opt-env-conf-test] @@ -120,7 +120,7 @@ [opt-env-conf-test]  hashSetting :: Setting a -> SettingHash [opt-env-conf-test]  hashSetting Setting {..} = [opt-env-conf-test]  SettingHash [opt-env-conf-test] - ( 42 [opt-env-conf-test] + ( 1 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf-test] @@ -125,7 +125,7 @@ [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] - `hashWithSalt` settingTryOption [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  `hashWithSalt` (snd <$> settingDefaultValue) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:83:5-6 [opt-env-conf-test] @@ -80,65 +80,7 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ case parseErrorMessage of [opt-env-conf-test] - ParseErrorEmpty -> [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test] - ParseErrorEmptySetting -> [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test] - ParseErrorNoReaders -> [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test] - ] [opt-env-conf-test] - ParseErrorCheckFailed _ err -> [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test] - ParseErrorMissingArgument o -> [opt-env-conf-test] - [ "Missing argument: " [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test] - ] [opt-env-conf-test] - ParseErrorArgumentRead md errs -> [opt-env-conf-test] - ["Failed to read argument: "] [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingOption o -> [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorMissingSwitch o -> [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorOptionRead md errs -> [opt-env-conf-test] - ["Failed to read option: "] [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingEnvVar md -> [opt-env-conf-test] - ["Missing env var: "] [opt-env-conf-test] - : maybe [] renderEnvDoc md [opt-env-conf-test] - ParseErrorEnvRead md errs -> [opt-env-conf-test] - ["Failed to read env var: "] [opt-env-conf-test] - : maybe [] renderEnvDoc md [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingConfVal md -> [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test] - ParseErrorConfigRead md s -> [opt-env-conf-test] - ["Failed to parse configuration: "] [opt-env-conf-test] - : maybe [] renderConfDoc md [opt-env-conf-test] - ++ [[chunk $ T.pack s]] [opt-env-conf-test] - ParseErrorMissingCommand cs -> [opt-env-conf-test] - ["Missing command, available commands:"] [opt-env-conf-test] - : availableCommandsLines cs [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test] - [fore blue "available commands:"] [opt-env-conf-test] - ] [opt-env-conf-test] - ++ availableCommandsLines cs [opt-env-conf-test] - ParseErrorAllOrNothing locs -> [opt-env-conf-test] - [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test] - ["The following settings have been parsed:"] [opt-env-conf-test] - ] [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test] - ParseErrorUnrecognised leftovers -> [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test] - ParseErrorMissingCapability cap -> [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test] - maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  availableCommandsLines :: [CommandDoc a] -> [[Chunk]] [opt-env-conf-test]  availableCommandsLines = map $ \CommandDoc {..} -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf-test] @@ -52,7 +52,7 @@ [opt-env-conf-test]  ParseErrorEmpty -> True [opt-env-conf-test]  ParseErrorEmptySetting -> False [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test] - ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test] + ParseErrorCheckFailed forgivable _ -> True [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:54:26-31 [opt-env-conf-test] @@ -51,7 +51,7 @@ [opt-env-conf-test]  errorMessageIsForgivable = \case [opt-env-conf-test]  ParseErrorEmpty -> True [opt-env-conf-test]  ParseErrorEmptySetting -> False [opt-env-conf-test] - ParseErrorNoReaders -> False [opt-env-conf-test] + ParseErrorNoReaders -> True [opt-env-conf-test]  ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:53:29-34 [opt-env-conf-test] @@ -50,7 +50,7 @@ [opt-env-conf-test]  errorMessageIsForgivable :: ParseErrorMessage -> Bool [opt-env-conf-test]  errorMessageIsForgivable = \case [opt-env-conf-test]  ParseErrorEmpty -> True [opt-env-conf-test] - ParseErrorEmptySetting -> False [opt-env-conf-test] + ParseErrorEmptySetting -> True [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test]  ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:57:33-38 [opt-env-conf-test] @@ -54,7 +54,7 @@ [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test]  ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test] - ParseErrorArgumentRead _ _ -> False [opt-env-conf-test] + ParseErrorArgumentRead _ _ -> True [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test]  ParseErrorOptionRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingOption _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:56:34-38 [opt-env-conf-test] @@ -53,7 +53,7 @@ [opt-env-conf-test]  ParseErrorEmptySetting -> False [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test]  ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test] - ParseErrorMissingArgument _ -> True [opt-env-conf-test] + ParseErrorMissingArgument _ -> False [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test]  ParseErrorOptionRead _ _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:58:32-36 [opt-env-conf-test] @@ -55,7 +55,7 @@ [opt-env-conf-test]  ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingSwitch _ -> True [opt-env-conf-test] + ParseErrorMissingSwitch _ -> False [opt-env-conf-test]  ParseErrorOptionRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingOption _ -> True [opt-env-conf-test]  ParseErrorMissingEnvVar _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:59:31-36 [opt-env-conf-test] @@ -56,7 +56,7 @@ [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test] - ParseErrorOptionRead _ _ -> False [opt-env-conf-test] + ParseErrorOptionRead _ _ -> True [opt-env-conf-test]  ParseErrorMissingOption _ -> True [opt-env-conf-test]  ParseErrorMissingEnvVar _ -> True [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:52:22-26 [opt-env-conf-test] @@ -49,7 +49,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  errorMessageIsForgivable :: ParseErrorMessage -> Bool [opt-env-conf-test]  errorMessageIsForgivable = \case [opt-env-conf-test] - ParseErrorEmpty -> True [opt-env-conf-test] + ParseErrorEmpty -> False [opt-env-conf-test]  ParseErrorEmptySetting -> False [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test]  ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:62:28-33 [opt-env-conf-test] @@ -59,7 +59,7 @@ [opt-env-conf-test]  ParseErrorOptionRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingOption _ -> True [opt-env-conf-test]  ParseErrorMissingEnvVar _ -> True [opt-env-conf-test] - ParseErrorEnvRead _ _ -> False [opt-env-conf-test] + ParseErrorEnvRead _ _ -> True [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:63:33-37 [opt-env-conf-test] @@ -60,7 +60,7 @@ [opt-env-conf-test]  ParseErrorMissingOption _ -> True [opt-env-conf-test]  ParseErrorMissingEnvVar _ -> True [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingConfVal _ -> True [opt-env-conf-test] + ParseErrorMissingConfVal _ -> False [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Error.hs:83:5-6 [opt-env-conf-test] @@ -80,65 +80,8 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test] - [ case parseErrorMessage of [opt-env-conf-test] - ParseErrorEmpty -> [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test] - ParseErrorEmptySetting -> [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test] - ParseErrorNoReaders -> [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test] - ] [opt-env-conf-test] - ParseErrorCheckFailed _ err -> [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test] - ParseErrorMissingArgument o -> [opt-env-conf-test] - [ "Missing argument: " [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test] - ] [opt-env-conf-test] - ParseErrorArgumentRead md errs -> [opt-env-conf-test] - ["Failed to read argument: "] [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingOption o -> [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorMissingSwitch o -> [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorOptionRead md errs -> [opt-env-conf-test] - ["Failed to read option: "] [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingEnvVar md -> [opt-env-conf-test] - ["Missing env var: "] [opt-env-conf-test] - : maybe [] renderEnvDoc md [opt-env-conf-test] - ParseErrorEnvRead md errs -> [opt-env-conf-test] - ["Failed to read env var: "] [opt-env-conf-test] - : maybe [] renderEnvDoc md [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingConfVal md -> [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test] - ParseErrorConfigRead md s -> [opt-env-conf-test] - ["Failed to parse configuration: "] [opt-env-conf-test] - : maybe [] renderConfDoc md [opt-env-conf-test] - ++ [[chunk $ T.pack s]] [opt-env-conf-test] - ParseErrorMissingCommand cs -> [opt-env-conf-test] - ["Missing command, available commands:"] [opt-env-conf-test] - : availableCommandsLines cs [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test] - [fore blue "available commands:"] [opt-env-conf-test] - ] [opt-env-conf-test] - ++ availableCommandsLines cs [opt-env-conf-test] - ParseErrorAllOrNothing locs -> [opt-env-conf-test] - [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test] - ["The following settings have been parsed:"] [opt-env-conf-test] - ] [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test] - ParseErrorUnrecognised leftovers -> [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test] - ParseErrorMissingCapability cap -> [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  availableCommandsLines :: [CommandDoc a] -> [[Chunk]] [opt-env-conf-test]  availableCommandsLines = map $ \CommandDoc {..} -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf-test] @@ -349,7 +349,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  consumeDashedSwitch dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if True [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test]  then Just Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf-test] @@ -349,7 +349,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  consumeDashedSwitch dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if False [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test]  then Just Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:352:6-12 [opt-env-conf-test] @@ -349,7 +349,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  consumeDashedSwitch dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if not (isLong) [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test]  then Just Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf-test] @@ -351,7 +351,7 @@ [opt-env-conf-test]  consumeDashedSwitch dasheds isLong cs = [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test] - if DashedLong cs `elem` dasheds [opt-env-conf-test] + if True [opt-env-conf-test]  then Just Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else consumeChar (shortDasheds dasheds) cs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf-test] @@ -351,7 +351,7 @@ [opt-env-conf-test]  consumeDashedSwitch dasheds isLong cs = [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test] - if DashedLong cs `elem` dasheds [opt-env-conf-test] + if False [opt-env-conf-test]  then Just Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else consumeChar (shortDasheds dasheds) cs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:354:10-38 [opt-env-conf-test] @@ -351,7 +351,7 @@ [opt-env-conf-test]  consumeDashedSwitch dasheds isLong cs = [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test] - if DashedLong cs `elem` dasheds [opt-env-conf-test] + if not (DashedLong cs `elem` dasheds) [opt-env-conf-test]  then Just Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else consumeChar (shortDasheds dasheds) cs [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:355:14-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test] - then Just Nothing [opt-env-conf-test] + then Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else consumeChar (shortDasheds dasheds) cs [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:324:16-25 [opt-env-conf-test] @@ -321,9 +321,8 @@ [opt-env-conf-test]  consumeSwitch dasheds as = do [opt-env-conf-test]  case go (argsBefore as) of [opt-env-conf-test]  Just newBefores -> Just $ as {argsBefore = newBefores} [opt-env-conf-test]  Nothing -> case go (argsAfter as) of [opt-env-conf-test] - Just newAfters -> Just $ as {argsAfter = newAfters} [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  where [opt-env-conf-test]  go :: [Tomb Arg] -> Maybe [Tomb Arg] [opt-env-conf-test]  go = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:324:16-25 [opt-env-conf-test] @@ -321,9 +321,8 @@ [opt-env-conf-test]  consumeSwitch dasheds as = do [opt-env-conf-test]  case go (argsBefore as) of [opt-env-conf-test]  Just newBefores -> Just $ as {argsBefore = newBefores} [opt-env-conf-test]  Nothing -> case go (argsAfter as) of [opt-env-conf-test]  Just newAfters -> Just $ as {argsAfter = newAfters} [opt-env-conf-test] - Nothing -> Nothing [opt-env-conf-test]  where [opt-env-conf-test]  go :: [Tomb Arg] -> Maybe [Tomb Arg] [opt-env-conf-test]  go = \case [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf-test] @@ -331,7 +331,7 @@ [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test] - ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test] + ArgDashed isLong cs -> case consumeDashedSwitch dasheds True cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf-test] @@ -331,7 +331,7 @@ [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test] - ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test] + ArgDashed isLong cs -> case consumeDashedSwitch dasheds not (isLong) cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:334:65-71 [opt-env-conf-test] @@ -331,7 +331,7 @@ [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test] - ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test] + ArgDashed isLong cs -> case consumeDashedSwitch dasheds False cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test] - let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] + let rest' = if True then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test] - let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] + let rest' = if False then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:338:28-41 [opt-env-conf-test] @@ -335,7 +335,7 @@ [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test] - let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] + let rest' = if not (needTombstone) then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] - in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test] + in Just $ Live (ArgDashed True cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] - in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test] + in Just $ Live (ArgDashed False cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] - in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test] + in Just $ Live (ArgDashed not (isLong) cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf-test] @@ -331,12 +331,11 @@ [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test] - Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf-test] @@ -331,12 +331,11 @@ [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:334:32-59 [opt-env-conf-test] @@ -331,12 +331,9 @@ [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test] - Just (Just (cs', needTombstone)) -> [opt-env-conf-test] - let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] - in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf-test] @@ -329,17 +329,16 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test] - ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test]  [opt-env-conf-test]  -- Can consume anywhere in a folded dashed, return True if it was the last [opt-env-conf-test]  -- character because then we need a tombstone. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf-test] @@ -329,17 +329,11 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test] - ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test] - Nothing -> (Live o :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just $ Dead : rest [opt-env-conf-test] - Just (Just (cs', needTombstone)) -> [opt-env-conf-test] - let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] - in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test]  [opt-env-conf-test]  -- Can consume anywhere in a folded dashed, return True if it was the last [opt-env-conf-test]  -- character because then we need a tombstone. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:332:26-29 [opt-env-conf-test] @@ -329,17 +329,14 @@ [opt-env-conf-test]  go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> (Dead :) <$> go rest [opt-env-conf-test]  (Live o : rest) -> case o of [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> case consumeDashedSwitch dasheds isLong cs of [opt-env-conf-test]  Nothing -> (Live o :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test]  in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test] - _ -> do [opt-env-conf-test] - os <- go rest [opt-env-conf-test] - pure $ Live o : os [opt-env-conf-test]  [opt-env-conf-test]  -- Can consume anywhere in a folded dashed, return True if it was the last [opt-env-conf-test]  -- character because then we need a tombstone. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:309:11-43 [opt-env-conf-test] @@ -306,9 +306,8 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go acc ne = [opt-env-conf-test]  let (a, mRest) = NE.uncons ne [opt-env-conf-test]  in case mRest of [opt-env-conf-test] - Nothing -> (NE.nonEmpty $ reverse acc, a) [opt-env-conf-test]  Just rest -> go (a : acc) rest [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume a switch. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:309:11-43 [opt-env-conf-test] @@ -306,9 +306,8 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go acc ne = [opt-env-conf-test]  let (a, mRest) = NE.uncons ne [opt-env-conf-test]  in case mRest of [opt-env-conf-test]  Nothing -> (NE.nonEmpty $ reverse acc, a) [opt-env-conf-test] - Just rest -> go (a : acc) rest [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume a switch. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf-test] @@ -290,7 +290,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe (Maybe (NonEmpty Char)) [opt-env-conf-test]  consumeDashedOption dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if True [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test]  then Just Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf-test] @@ -290,7 +290,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe (Maybe (NonEmpty Char)) [opt-env-conf-test]  consumeDashedOption dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if False [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test]  then Just Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:293:6-12 [opt-env-conf-test] @@ -290,7 +290,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe (Maybe (NonEmpty Char)) [opt-env-conf-test]  consumeDashedOption dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if not (isLong) [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test]  then Just Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf-test] @@ -292,7 +292,7 @@ [opt-env-conf-test]  consumeDashedOption dasheds isLong cs = [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test] - if DashedLong cs `elem` dasheds [opt-env-conf-test] + if True [opt-env-conf-test]  then Just Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf-test] @@ -292,7 +292,7 @@ [opt-env-conf-test]  consumeDashedOption dasheds isLong cs = [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test] - if DashedLong cs `elem` dasheds [opt-env-conf-test] + if False [opt-env-conf-test]  then Just Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:295:10-38 [opt-env-conf-test] @@ -292,7 +292,7 @@ [opt-env-conf-test]  consumeDashedOption dasheds isLong cs = [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test] - if DashedLong cs `elem` dasheds [opt-env-conf-test] + if not (DashedLong cs `elem` dasheds) [opt-env-conf-test]  then Just Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:296:14-26 [opt-env-conf-test] @@ -293,7 +293,7 @@ [opt-env-conf-test]  if isLong [opt-env-conf-test]  then [opt-env-conf-test]  if DashedLong cs `elem` dasheds [opt-env-conf-test] - then Just Nothing [opt-env-conf-test] + then Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test]  let (mRest, c) = unsnocNE cs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf-test] @@ -297,7 +297,7 @@ [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test]  let (mRest, c) = unsnocNE cs [opt-env-conf-test] - in if DashedShort c `elem` dasheds [opt-env-conf-test] + in if True [opt-env-conf-test]  then Just mRest [opt-env-conf-test]  else Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf-test] @@ -297,7 +297,7 @@ [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test]  let (mRest, c) = unsnocNE cs [opt-env-conf-test] - in if DashedShort c `elem` dasheds [opt-env-conf-test] + in if False [opt-env-conf-test]  then Just mRest [opt-env-conf-test]  else Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:300:14-42 [opt-env-conf-test] @@ -297,7 +297,7 @@ [opt-env-conf-test]  else Nothing [opt-env-conf-test]  else [opt-env-conf-test]  let (mRest, c) = unsnocNE cs [opt-env-conf-test] - in if DashedShort c `elem` dasheds [opt-env-conf-test] + in if not (DashedShort c `elem` dasheds) [opt-env-conf-test]  then Just mRest [opt-env-conf-test]  else Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:301:18-28 [opt-env-conf-test] @@ -298,7 +298,7 @@ [opt-env-conf-test]  else [opt-env-conf-test]  let (mRest, c) = unsnocNE cs [opt-env-conf-test]  in if DashedShort c `elem` dasheds [opt-env-conf-test] - then Just mRest [opt-env-conf-test] + then Nothing [opt-env-conf-test]  else Nothing [opt-env-conf-test]  [opt-env-conf-test]  unsnocNE :: NonEmpty a -> (Maybe (NonEmpty a), a) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:282:7-23 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | True && not (null rest) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:282:7-23 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | not (c `elem` dasheds) && not (null rest) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:282:32-41 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds && not (True) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:282:32-41 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds && not (not (null rest)) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:282:31-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds && not True -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:282:31-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds && not not ((null rest)) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:282:27-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds && True -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:282:27-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds && not (not (null rest)) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | True -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | c `elem` dasheds || not (null rest) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:282:7-42 [opt-env-conf-test] @@ -279,7 +279,7 @@ [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test] - | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] + | not (c `elem` dasheds && not (null rest)) -> [opt-env-conf-test]  Just rest [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:283:9-18 [opt-env-conf-test] @@ -280,7 +280,7 @@ [opt-env-conf-test]  consumeShortDashedShorthandOption dasheds = \case [opt-env-conf-test]  (c :| rest) [opt-env-conf-test]  | c `elem` dasheds && not (null rest) -> [opt-env-conf-test] - Just rest [opt-env-conf-test] + Nothing [opt-env-conf-test]  _ -> Nothing [opt-env-conf-test]  [opt-env-conf-test]  -- Can consume only the last in a folded dashed [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf-test] @@ -255,7 +255,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeDashedShorthandOption dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if True [opt-env-conf-test]  then consumeLongDashedShorthandOption (longDasheds dasheds) cs [opt-env-conf-test]  else consumeShortDashedShorthandOption (shortDasheds dasheds) cs [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf-test] @@ -255,7 +255,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeDashedShorthandOption dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if False [opt-env-conf-test]  then consumeLongDashedShorthandOption (longDasheds dasheds) cs [opt-env-conf-test]  else consumeShortDashedShorthandOption (shortDasheds dasheds) cs [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:258:6-12 [opt-env-conf-test] @@ -255,7 +255,7 @@ [opt-env-conf-test]  NonEmpty Char -> [opt-env-conf-test]  Maybe String [opt-env-conf-test]  consumeDashedShorthandOption dasheds isLong cs = [opt-env-conf-test] - if isLong [opt-env-conf-test] + if not (isLong) [opt-env-conf-test]  then consumeLongDashedShorthandOption (longDasheds dasheds) cs [opt-env-conf-test]  else consumeShortDashedShorthandOption (shortDasheds dasheds) cs [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  renderArg = \case [opt-env-conf-test]  ArgBareDoubleDash -> "--" [opt-env-conf-test]  ArgBareDash -> "-" [opt-env-conf-test] - ArgDashed l cs -> (if l then "--" else "-") <> NE.toList cs [opt-env-conf-test] + ArgDashed l cs -> (if True then "--" else "-") <> NE.toList cs [opt-env-conf-test]  ArgPlain a -> a [opt-env-conf-test]  [opt-env-conf-test]  -- | An abstraction over '[String]' that makes it easier to implement [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  renderArg = \case [opt-env-conf-test]  ArgBareDoubleDash -> "--" [opt-env-conf-test]  ArgBareDash -> "-" [opt-env-conf-test] - ArgDashed l cs -> (if l then "--" else "-") <> NE.toList cs [opt-env-conf-test] + ArgDashed l cs -> (if False then "--" else "-") <> NE.toList cs [opt-env-conf-test]  ArgPlain a -> a [opt-env-conf-test]  [opt-env-conf-test]  -- | An abstraction over '[String]' that makes it easier to implement [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:89:25-26 [opt-env-conf-test] @@ -86,7 +86,7 @@ [opt-env-conf-test]  renderArg = \case [opt-env-conf-test]  ArgBareDoubleDash -> "--" [opt-env-conf-test]  ArgBareDash -> "-" [opt-env-conf-test] - ArgDashed l cs -> (if l then "--" else "-") <> NE.toList cs [opt-env-conf-test] + ArgDashed l cs -> (if not (l) then "--" else "-") <> NE.toList cs [opt-env-conf-test]  ArgPlain a -> a [opt-env-conf-test]  [opt-env-conf-test]  -- | An abstraction over '[String]' that makes it easier to implement [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:133:33-47 [opt-env-conf-test] @@ -130,10 +130,9 @@ [opt-env-conf-test]  -- things like a default command. [opt-env-conf-test]  let addConsumeNothing = \case [opt-env-conf-test]  [] -> [(Nothing, as)] [opt-env-conf-test]  r@(t@(mA, _) : rest) -> case mA of [opt-env-conf-test]  -- If not consuming anything is already an option, don't add it to the end. [opt-env-conf-test] - Nothing -> r [opt-env-conf-test]  Just _ -> t : addConsumeNothing rest [opt-env-conf-test]  [opt-env-conf-test]  addConsumeNothing $ case argsAfter as of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:133:33-47 [opt-env-conf-test] @@ -130,10 +130,9 @@ [opt-env-conf-test]  -- things like a default command. [opt-env-conf-test]  let addConsumeNothing = \case [opt-env-conf-test]  [] -> [(Nothing, as)] [opt-env-conf-test]  r@(t@(mA, _) : rest) -> case mA of [opt-env-conf-test]  -- If not consuming anything is already an option, don't add it to the end. [opt-env-conf-test]  Nothing -> r [opt-env-conf-test] - Just _ -> t : addConsumeNothing rest [opt-env-conf-test]  [opt-env-conf-test]  addConsumeNothing $ case argsAfter as of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:148:35-45 [opt-env-conf-test] @@ -145,7 +145,7 @@ [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test] - ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test] + ArgPlain plain -> [(Nothing, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:150:32-40 [opt-env-conf-test] @@ -147,7 +147,7 @@ [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test] - ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test] + ArgBareDash -> [(Nothing, consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:154:25-34 [opt-env-conf-test] @@ -151,7 +151,7 @@ [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test] - [] -> [(Just "--", consumed)] [opt-env-conf-test] + [] -> [(Nothing, consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:168:45-60 [opt-env-conf-test] @@ -165,7 +165,7 @@ [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test] - (Live a' : rest) -> Just (a', rest) [opt-env-conf-test] + (Live a' : rest) -> Nothing [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf-test] @@ -166,17 +166,16 @@ [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test] - Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf-test] @@ -166,17 +166,8 @@ [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test] - Just (firstLive, rest) -> [opt-env-conf-test] - -- We need to leave the dead argument there so that [opt-env-conf-test] - -- we don't consume the double-dash as an argument [opt-env-conf-test] - -- after consuming all the arguments after it as bare [opt-env-conf-test] - -- arguments. [opt-env-conf-test] - [ ( Just $ renderArg firstLive, [opt-env-conf-test] - Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test] - ) [opt-env-conf-test] - ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf-test] @@ -149,34 +149,33 @@ [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test] - [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf-test] @@ -149,34 +149,33 @@ [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test] - [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf-test] @@ -149,34 +149,18 @@ [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test] - _ -> [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test] - (Dead : rest) -> go rest [opt-env-conf-test] - (Live a' : rest) -> Just (a', rest) [opt-env-conf-test] - in case go afters of [opt-env-conf-test] - Nothing -> [(Nothing, as)] [opt-env-conf-test] - Just (firstLive, rest) -> [opt-env-conf-test] - -- We need to leave the dead argument there so that [opt-env-conf-test] - -- we don't consume the double-dash as an argument [opt-env-conf-test] - -- after consuming all the arguments after it as bare [opt-env-conf-test] - -- arguments. [opt-env-conf-test] - [ ( Just $ renderArg firstLive, [opt-env-conf-test] - Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test] - ) [opt-env-conf-test] - ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:187:31-49 [opt-env-conf-test] @@ -184,7 +184,7 @@ [opt-env-conf-test]  -- TODO we need to continue looking too [opt-env-conf-test]  let switchCase = [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] + ++ [ (Nothing, consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:201:39-57 [opt-env-conf-test] @@ -198,7 +198,7 @@ [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] + ++ [ (Nothing, consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:204:65-82 [opt-env-conf-test] @@ -201,7 +201,6 @@ [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:204:65-82 [opt-env-conf-test] @@ -201,7 +201,6 @@ [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:205:39-58 [opt-env-conf-test] @@ -202,7 +202,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] + ++ [ (Nothing, Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:205:77-91 [opt-env-conf-test] @@ -202,7 +202,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:205:77-91 [opt-env-conf-test] @@ -202,7 +202,6 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:206:39-57 [opt-env-conf-test] @@ -203,7 +203,7 @@ [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test] + (Nothing, consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:205:36-37 [opt-env-conf-test] @@ -202,9 +202,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:205:36-37 [opt-env-conf-test] @@ -202,9 +202,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:198:27-37 [opt-env-conf-test] @@ -195,16 +195,12 @@ [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:198:27-37 [opt-env-conf-test] @@ -195,16 +195,11 @@ [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test] - _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf-test] @@ -186,26 +186,25 @@ [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test] - [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf-test] @@ -186,26 +186,25 @@ [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test] - (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:189:21-26 [opt-env-conf-test] @@ -186,26 +186,10 @@ [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test] - (Live a' : rest) -> [opt-env-conf-test] - -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is an option and the live is the value [opt-env-conf-test] - -- * The dashed is a switch and the live is an argument [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - ( case a' of [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf-test] @@ -143,69 +143,68 @@ [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test] - ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  -- TODO we need to continue looking too [opt-env-conf-test]  let switchCase = [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf-test] @@ -143,69 +143,68 @@ [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test] - ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  -- TODO we need to continue looking too [opt-env-conf-test]  let switchCase = [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf-test] @@ -143,69 +143,41 @@ [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test] - ArgBareDoubleDash -> case afters of [opt-env-conf-test] - -- If it's the last argument, consume it as an argument [opt-env-conf-test] - [] -> [(Just "--", consumed)] [opt-env-conf-test] - -- If there's only a dead argument after the double dash, that [opt-env-conf-test] - -- means we've been parsing bare args and are now done. [opt-env-conf-test] - -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test] - -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test] - [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test] - -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test] - -- In order to not have to maintain whether the cursor is after [opt-env-conf-test] - -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test] - -- pop the args as they come. [opt-env-conf-test] - _ -> [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test] - (Dead : rest) -> go rest [opt-env-conf-test] - (Live a' : rest) -> Just (a', rest) [opt-env-conf-test] - in case go afters of [opt-env-conf-test] - Nothing -> [(Nothing, as)] [opt-env-conf-test] - Just (firstLive, rest) -> [opt-env-conf-test] - -- We need to leave the dead argument there so that [opt-env-conf-test] - -- we don't consume the double-dash as an argument [opt-env-conf-test] - -- after consuming all the arguments after it as bare [opt-env-conf-test] - -- arguments. [opt-env-conf-test] - [ ( Just $ renderArg firstLive, [opt-env-conf-test] - Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test] - ) [opt-env-conf-test] - ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  -- TODO we need to continue looking too [opt-env-conf-test]  let switchCase = [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:146:23-26 [opt-env-conf-test] @@ -143,69 +143,40 @@ [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - -- TODO we need to continue looking too [opt-env-conf-test] - let switchCase = [opt-env-conf-test] - consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - in case afters of [opt-env-conf-test] - -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test] - [] -> switchCase [opt-env-conf-test] - (Dead : _) -> switchCase [opt-env-conf-test] - (Live a' : rest) -> [opt-env-conf-test] - -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is an option and the live is the value [opt-env-conf-test] - -- * The dashed is a switch and the live is an argument [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - ( case a' of [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:143:11-26 [opt-env-conf-test] @@ -140,72 +140,71 @@ [opt-env-conf-test]  (firstArg : afters) -> [opt-env-conf-test]  let befores = argsBefore as [opt-env-conf-test]  consumed = Args (befores ++ [Dead]) afters [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test] - Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  -- TODO we need to continue looking too [opt-env-conf-test]  let switchCase = [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:143:11-26 [opt-env-conf-test] @@ -140,72 +140,9 @@ [opt-env-conf-test]  (firstArg : afters) -> [opt-env-conf-test]  let befores = argsBefore as [opt-env-conf-test]  consumed = Args (befores ++ [Dead]) afters [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test] - Live a -> case a of [opt-env-conf-test] - -- Plain argument: that's the only option, consume it. [opt-env-conf-test] - ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test] - -- A single dash is always an argument [opt-env-conf-test] - ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test] - -- Bare double-dash [opt-env-conf-test] - ArgBareDoubleDash -> case afters of [opt-env-conf-test] - -- If it's the last argument, consume it as an argument [opt-env-conf-test] - [] -> [(Just "--", consumed)] [opt-env-conf-test] - -- If there's only a dead argument after the double dash, that [opt-env-conf-test] - -- means we've been parsing bare args and are now done. [opt-env-conf-test] - -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test] - -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test] - [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test] - -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test] - -- In order to not have to maintain whether the cursor is after [opt-env-conf-test] - -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test] - -- pop the args as they come. [opt-env-conf-test] - _ -> [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test] - (Dead : rest) -> go rest [opt-env-conf-test] - (Live a' : rest) -> Just (a', rest) [opt-env-conf-test] - in case go afters of [opt-env-conf-test] - Nothing -> [(Nothing, as)] [opt-env-conf-test] - Just (firstLive, rest) -> [opt-env-conf-test] - -- We need to leave the dead argument there so that [opt-env-conf-test] - -- we don't consume the double-dash as an argument [opt-env-conf-test] - -- after consuming all the arguments after it as bare [opt-env-conf-test] - -- arguments. [opt-env-conf-test] - [ ( Just $ renderArg firstLive, [opt-env-conf-test] - Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test] - ) [opt-env-conf-test] - ] [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - -- TODO we need to continue looking too [opt-env-conf-test] - let switchCase = [opt-env-conf-test] - consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - in case afters of [opt-env-conf-test] - -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test] - [] -> switchCase [opt-env-conf-test] - (Dead : _) -> switchCase [opt-env-conf-test] - (Live a' : rest) -> [opt-env-conf-test] - -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is an option and the live is the value [opt-env-conf-test] - -- * The dashed is a switch and the live is an argument [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - ( case a' of [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:138:23-26 [opt-env-conf-test] @@ -135,77 +135,76 @@ [opt-env-conf-test]  Nothing -> r [opt-env-conf-test]  Just _ -> t : addConsumeNothing rest [opt-env-conf-test]  [opt-env-conf-test]  addConsumeNothing $ case argsAfter as of [opt-env-conf-test] - [] -> [] [opt-env-conf-test]  (firstArg : afters) -> [opt-env-conf-test]  let befores = argsBefore as [opt-env-conf-test]  consumed = Args (befores ++ [Dead]) afters [opt-env-conf-test]  in case firstArg of [opt-env-conf-test]  -- Skip any dead argument [opt-env-conf-test]  Dead -> consumeArgument consumed [opt-env-conf-test]  Live a -> case a of [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test]  [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  -- TODO we need to continue looking too [opt-env-conf-test]  let switchCase = [opt-env-conf-test]  consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  in case afters of [opt-env-conf-test]  -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test]  [] -> switchCase [opt-env-conf-test]  (Dead : _) -> switchCase [opt-env-conf-test]  (Live a' : rest) -> [opt-env-conf-test]  -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is an option and the live is the value [opt-env-conf-test]  -- * The dashed is a switch and the live is an argument [opt-env-conf-test]  -- * The dashed is an argument [opt-env-conf-test]  ( case a' of [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test]  ++ [ (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  _ -> [opt-env-conf-test]  consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test]  ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test]  (Just (renderArg a), consumed) [opt-env-conf-test]  ] [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:222:31-71 [opt-env-conf-test] @@ -219,7 +219,7 @@ [opt-env-conf-test]  consumeOption :: [Dashed] -> Args -> Maybe (String, Args) [opt-env-conf-test]  consumeOption dasheds as = do [opt-env-conf-test]  case go (argsBefore as) of [opt-env-conf-test] - Just (val, newBefores) -> Just (val, as {argsBefore = newBefores}) [opt-env-conf-test] + Just (val, newBefores) -> Nothing [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  -- TODO option value on the border [opt-env-conf-test]  case go (argsAfter as) of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:138:23-26 [opt-env-conf-test] @@ -135,77 +135,8 @@ [opt-env-conf-test]  Nothing -> r [opt-env-conf-test]  Just _ -> t : addConsumeNothing rest [opt-env-conf-test]  [opt-env-conf-test]  addConsumeNothing $ case argsAfter as of [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - (firstArg : afters) -> [opt-env-conf-test] - let befores = argsBefore as [opt-env-conf-test] - consumed = Args (befores ++ [Dead]) afters [opt-env-conf-test] - in case firstArg of [opt-env-conf-test] - -- Skip any dead argument [opt-env-conf-test] - Dead -> consumeArgument consumed [opt-env-conf-test] - Live a -> case a of [opt-env-conf-test] - -- Plain argument: that's the only option, consume it. [opt-env-conf-test] - ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test] - -- A single dash is always an argument [opt-env-conf-test] - ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test] - -- Bare double-dash [opt-env-conf-test] - ArgBareDoubleDash -> case afters of [opt-env-conf-test] - -- If it's the last argument, consume it as an argument [opt-env-conf-test] - [] -> [(Just "--", consumed)] [opt-env-conf-test] - -- If there's only a dead argument after the double dash, that [opt-env-conf-test] - -- means we've been parsing bare args and are now done. [opt-env-conf-test] - -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test] - -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test] - [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test] - -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test] - -- In order to not have to maintain whether the cursor is after [opt-env-conf-test] - -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test] - -- pop the args as they come. [opt-env-conf-test] - _ -> [opt-env-conf-test] - let go = \case [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test] - (Dead : rest) -> go rest [opt-env-conf-test] - (Live a' : rest) -> Just (a', rest) [opt-env-conf-test] - in case go afters of [opt-env-conf-test] - Nothing -> [(Nothing, as)] [opt-env-conf-test] - Just (firstLive, rest) -> [opt-env-conf-test] - -- We need to leave the dead argument there so that [opt-env-conf-test] - -- we don't consume the double-dash as an argument [opt-env-conf-test] - -- after consuming all the arguments after it as bare [opt-env-conf-test] - -- arguments. [opt-env-conf-test] - [ ( Just $ renderArg firstLive, [opt-env-conf-test] - Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test] - ) [opt-env-conf-test] - ] [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - -- TODO we need to continue looking too [opt-env-conf-test] - let switchCase = [opt-env-conf-test] - consumeArgument (Args (befores ++ [firstArg]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - in case afters of [opt-env-conf-test] - -- Last argument is is dashed, that's the same as being followed by a dead argument [opt-env-conf-test] - [] -> switchCase [opt-env-conf-test] - (Dead : _) -> switchCase [opt-env-conf-test] - (Live a' : rest) -> [opt-env-conf-test] - -- Live after dashed, three options, in order that they should be considered: [opt-env-conf-test] - -- * The dashed is an option and the live is the value [opt-env-conf-test] - -- * The dashed is a switch and the live is an argument [opt-env-conf-test] - -- * The dashed is an argument [opt-env-conf-test] - ( case a' of [opt-env-conf-test] - ArgDashed {} -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a]) afters) [opt-env-conf-test] - ++ [ (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - _ -> [opt-env-conf-test] - consumeArgument (Args (befores ++ [Live a, Live a']) rest) [opt-env-conf-test] - ++ [ (Just (renderArg a'), Args (befores ++ [Live a, Dead]) rest), [opt-env-conf-test] - (Just (renderArg a), consumed) [opt-env-conf-test] - ] [opt-env-conf-test] - ) [opt-env-conf-test]  [opt-env-conf-test]  -- | Consume an option. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:226:34-72 [opt-env-conf-test] @@ -223,7 +223,7 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  -- TODO option value on the border [opt-env-conf-test]  case go (argsAfter as) of [opt-env-conf-test] - Just (val, newAfters) -> Just (val, as {argsAfter = newAfters}) [opt-env-conf-test] + Just (val, newAfters) -> Nothing [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  where [opt-env-conf-test]  go :: [Tomb Arg] -> Maybe (String, [Tomb Arg]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:225:7-27 [opt-env-conf-test] @@ -222,9 +222,8 @@ [opt-env-conf-test]  Just (val, newBefores) -> Just (val, as {argsBefore = newBefores}) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  -- TODO option value on the border [opt-env-conf-test]  case go (argsAfter as) of [opt-env-conf-test] - Just (val, newAfters) -> Just (val, as {argsAfter = newAfters}) [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test]  where [opt-env-conf-test]  go :: [Tomb Arg] -> Maybe (String, [Tomb Arg]) [opt-env-conf-test]  go = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:225:7-27 [opt-env-conf-test] @@ -222,9 +222,8 @@ [opt-env-conf-test]  Just (val, newBefores) -> Just (val, as {argsBefore = newBefores}) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  -- TODO option value on the border [opt-env-conf-test]  case go (argsAfter as) of [opt-env-conf-test]  Just (val, newAfters) -> Just (val, as {argsAfter = newAfters}) [opt-env-conf-test] - Nothing -> Nothing [opt-env-conf-test]  where [opt-env-conf-test]  go :: [Tomb Arg] -> Maybe (String, [Tomb Arg]) [opt-env-conf-test]  go = \case [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf-test] @@ -237,7 +237,7 @@ [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test] - case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test] + case consumeDashedShorthandOption dasheds True cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf-test] @@ -237,7 +237,7 @@ [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test] - case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test] + case consumeDashedShorthandOption dasheds False cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:240:55-61 [opt-env-conf-test] @@ -237,7 +237,7 @@ [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test] - case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test] + case consumeDashedShorthandOption dasheds not (isLong) cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:241:25-46 [opt-env-conf-test] @@ -238,7 +238,7 @@ [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test] - Just v -> Just (v, Dead : rest) [opt-env-conf-test] + Just v -> Nothing [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test]  if c `elem` cs [opt-env-conf-test] - then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test] + then Just $ (\ne -> (ne, not (null rest))) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test]  new <- go rest' [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf-test] @@ -242,7 +242,7 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test] - case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] + case consumeDashedOption dasheds True cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:406:20-28 [opt-env-conf-test] @@ -403,7 +403,6 @@ [opt-env-conf-test]  [opt-env-conf-test]  renderDashed :: Dashed -> String [opt-env-conf-test]  renderDashed = \case [opt-env-conf-test] - DashedShort c -> ['-', c] [opt-env-conf-test]  DashedLong cs -> '-' : '-' : NE.toList cs [opt-env-conf-test]  [opt-env-conf-test]  prefixDashed :: String -> Dashed -> Dashed [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test]  if c `elem` cs [opt-env-conf-test] - then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test] + then Just $ (\ne -> (ne, True)) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test]  new <- go rest' [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf-test] @@ -242,7 +242,7 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test] - case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] + case consumeDashedOption dasheds False cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf-test] @@ -245,7 +245,7 @@ [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] + Just (Just cs') -> Just (renderArg v, Live (ArgDashed False cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf-test] @@ -245,7 +245,7 @@ [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] + Just (Just cs') -> Just (renderArg v, Live (ArgDashed not (isLong) cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:248:42-104 [opt-env-conf-test] @@ -245,7 +245,7 @@ [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] + Just (Just cs') -> Nothing [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf-test] @@ -242,10 +242,9 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] - Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf-test] @@ -242,10 +242,9 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:245:21-104 [opt-env-conf-test] @@ -242,10 +242,9 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf-test] @@ -245,7 +245,7 @@ [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] + Just (Just cs') -> Just (renderArg v, Live (ArgDashed True cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:247:39-71 [opt-env-conf-test] @@ -244,7 +244,7 @@ [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] + Just Nothing -> Nothing [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:245:54-60 [opt-env-conf-test] @@ -242,7 +242,7 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test] - case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] + case consumeDashedOption dasheds not (isLong) cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:243:17-53 [opt-env-conf-test] @@ -240,13 +240,12 @@ [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] - _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:243:17-53 [opt-env-conf-test] @@ -240,13 +240,8 @@ [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test] - (Live v : rest') -> [opt-env-conf-test] - case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] - Nothing -> second (Live k :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:240:13-53 [opt-env-conf-test] @@ -237,16 +237,15 @@ [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test] - Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf-test] @@ -233,21 +233,20 @@ [opt-env-conf-test]  (Dead : rest) -> second (Dead :) <$> go rest [opt-env-conf-test]  -- If we find a live key, try to consume it. [opt-env-conf-test]  (Live k : rest) -> [opt-env-conf-test]  case k of [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test] - _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test]  [Dashed] -> [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:387:23-41 [opt-env-conf-test] @@ -384,7 +384,7 @@ [opt-env-conf-test]  live = [opt-env-conf-test]  mapMaybe [opt-env-conf-test]  ( \case [opt-env-conf-test] - Live a -> Just (renderArg a) [opt-env-conf-test] + Live a -> Nothing [opt-env-conf-test]  Dead -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Args.hs:79:26-30 [opt-env-conf-test] @@ -76,7 +76,7 @@ [opt-env-conf-test]  parseArg = \case [opt-env-conf-test]  '-' : '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDoubleDash [opt-env-conf-test] - Just ne -> ArgDashed True ne [opt-env-conf-test] + Just ne -> ArgDashed False ne [opt-env-conf-test]  '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDash [opt-env-conf-test]  Just ne -> ArgDashed False ne [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:77:23-33 [opt-env-conf-test] @@ -74,9 +74,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  parseArg :: String -> Arg [opt-env-conf-test]  parseArg = \case [opt-env-conf-test]  '-' : '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> ArgBareDoubleDash [opt-env-conf-test]  Just ne -> ArgDashed True ne [opt-env-conf-test]  '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDash [opt-env-conf-test]  Just ne -> ArgDashed False ne [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:77:23-33 [opt-env-conf-test] @@ -74,9 +74,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  parseArg :: String -> Arg [opt-env-conf-test]  parseArg = \case [opt-env-conf-test]  '-' : '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDoubleDash [opt-env-conf-test] - Just ne -> ArgDashed True ne [opt-env-conf-test]  '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDash [opt-env-conf-test]  Just ne -> ArgDashed False ne [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Args.hs:82:26-31 [opt-env-conf-test] @@ -79,7 +79,7 @@ [opt-env-conf-test]  Just ne -> ArgDashed True ne [opt-env-conf-test]  '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDash [opt-env-conf-test] - Just ne -> ArgDashed False ne [opt-env-conf-test] + Just ne -> ArgDashed True ne [opt-env-conf-test]  s -> ArgPlain s [opt-env-conf-test]  [opt-env-conf-test]  renderArg :: Arg -> String [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:80:17-34 [opt-env-conf-test] @@ -77,9 +77,8 @@ [opt-env-conf-test]  '-' : '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDoubleDash [opt-env-conf-test]  Just ne -> ArgDashed True ne [opt-env-conf-test]  '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> ArgBareDash [opt-env-conf-test]  Just ne -> ArgDashed False ne [opt-env-conf-test]  s -> ArgPlain s [opt-env-conf-test]  [opt-env-conf-test]  renderArg :: Arg -> String [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:80:17-34 [opt-env-conf-test] @@ -77,9 +77,8 @@ [opt-env-conf-test]  '-' : '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDoubleDash [opt-env-conf-test]  Just ne -> ArgDashed True ne [opt-env-conf-test]  '-' : rest -> case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> ArgBareDash [opt-env-conf-test] - Just ne -> ArgDashed False ne [opt-env-conf-test]  s -> ArgPlain s [opt-env-conf-test]  [opt-env-conf-test]  renderArg :: Arg -> String [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf-test] @@ -396,10 +396,9 @@ [opt-env-conf-test]  instance Validity Dashed [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Dashed where [opt-env-conf-test]  fromString s = case fromString s of [opt-env-conf-test] - ArgDashed True cs -> DashedLong cs [opt-env-conf-test]  ArgDashed False (c :| []) -> DashedShort c [opt-env-conf-test]  _ -> error "Invalid dashed" [opt-env-conf-test]  [opt-env-conf-test]  renderDashed :: Dashed -> String [opt-env-conf-test]  renderDashed = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf-test] @@ -396,10 +396,9 @@ [opt-env-conf-test]  instance Validity Dashed [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Dashed where [opt-env-conf-test]  fromString s = case fromString s of [opt-env-conf-test]  ArgDashed True cs -> DashedLong cs [opt-env-conf-test] - ArgDashed False (c :| []) -> DashedShort c [opt-env-conf-test]  _ -> error "Invalid dashed" [opt-env-conf-test]  [opt-env-conf-test]  renderDashed :: Dashed -> String [opt-env-conf-test]  renderDashed = \case [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf-test] @@ -396,10 +396,9 @@ [opt-env-conf-test]  instance Validity Dashed [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Dashed where [opt-env-conf-test]  fromString s = case fromString s of [opt-env-conf-test]  ArgDashed True cs -> DashedLong cs [opt-env-conf-test]  ArgDashed False (c :| []) -> DashedShort c [opt-env-conf-test] - _ -> error "Invalid dashed" [opt-env-conf-test]  [opt-env-conf-test]  renderDashed :: Dashed -> String [opt-env-conf-test]  renderDashed = \case [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] + ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ True [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] + ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ False [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] + ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ not (c /= '-') [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Args.hs:67:26-31 [opt-env-conf-test] @@ -64,7 +64,7 @@ [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test] + ('-' : _) -> True [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Args.hs:68:18-22 [opt-env-conf-test] @@ -65,7 +65,7 @@ [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test] + _ -> False [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,9 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] + ArgPlain s -> declare "does not start with a dash" $ True-> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,9 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] + ArgPlain s -> declare "does not start with a dash" $ False-> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,9 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] + ArgPlain s -> declare "does not start with a dash" $ not (case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test] + _ -> True) [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,8 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,8 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf-test] @@ -233,21 +233,10 @@ [opt-env-conf-test]  (Dead : rest) -> second (Dead :) <$> go rest [opt-env-conf-test]  -- If we find a live key, try to consume it. [opt-env-conf-test]  (Live k : rest) -> [opt-env-conf-test]  case k of [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test] - ArgDashed isLong cs -> [opt-env-conf-test] - case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test] - Just v -> Just (v, Dead : rest) [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - case rest of [opt-env-conf-test] - (Live v : rest') -> [opt-env-conf-test] - case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] - Nothing -> second (Live k :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] - _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test]  [Dashed] -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf-test] @@ -61,12 +61,11 @@ [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:240:13-53 [opt-env-conf-test] @@ -237,16 +237,8 @@ [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test]  ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - case rest of [opt-env-conf-test] - (Live v : rest') -> [opt-env-conf-test] - case consumeDashedOption dasheds isLong cs of [opt-env-conf-test] - Nothing -> second (Live k :) <$> go rest [opt-env-conf-test] - Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] - _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf-test] @@ -61,12 +61,9 @@ [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf-test] @@ -61,12 +61,11 @@ [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test] - _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf-test] @@ -60,14 +60,7 @@ [opt-env-conf-test]  instance Validity Arg where [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test] - [ genericValidate arg, [opt-env-conf-test] - case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test] - _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test]  fromString = parseArg [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf-test] @@ -60,14 +60,13 @@ [opt-env-conf-test]  instance Validity Arg where [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test] - [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test]  fromString = parseArg [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf-test] @@ -93,6 +93,5 @@ [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test]  (OptionTypeSubmodule m1, OptionTypeSubmodule m2) -> OptionTypeSubmodule $ M.unionWith combineOption m1 m2 [opt-env-conf-test] - _ -> OptionTypeOneOf [ot1, ot2] [opt-env-conf-test]  goCommand :: Command a -> Map Text Option [opt-env-conf-test]  goCommand = go . commandParser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Args.hs:236:9-45 [opt-env-conf-test] @@ -233,21 +233,20 @@ [opt-env-conf-test]  (Dead : rest) -> second (Dead :) <$> go rest [opt-env-conf-test]  -- If we find a live key, try to consume it. [opt-env-conf-test]  (Live k : rest) -> [opt-env-conf-test]  case k of [opt-env-conf-test]  -- We can either consume it as-is, or as a shorthand option. [opt-env-conf-test] - ArgBareDoubleDash -> Nothing [opt-env-conf-test]  ArgDashed isLong cs -> [opt-env-conf-test]  case consumeDashedShorthandOption dasheds isLong cs of [opt-env-conf-test]  Just v -> Just (v, Dead : rest) [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  case rest of [opt-env-conf-test]  (Live v : rest') -> [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test]  Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  consumeDashedShorthandOption :: [opt-env-conf-test]  [Dashed] -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf-test] @@ -91,8 +91,7 @@ [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test] - (OptionTypeSubmodule m1, OptionTypeSubmodule m2) -> OptionTypeSubmodule $ M.unionWith combineOption m1 m2 [opt-env-conf-test]  _ -> OptionTypeOneOf [ot1, ot2] [opt-env-conf-test]  goCommand :: Command a -> Map Text Option [opt-env-conf-test]  goCommand = go . commandParser [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Nix.hs:90:47-55 [opt-env-conf-test] @@ -87,7 +87,7 @@ [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test]  (Nothing, _) -> o2 [opt-env-conf-test] - (Just ot1, Nothing) -> o2 {optionType = Just ot1} [opt-env-conf-test] + (Just ot1, Nothing) -> o2 {optionType = Nothing} [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf-test] @@ -93,6 +93,5 @@ [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test]  (OptionTypeSubmodule m1, OptionTypeSubmodule m2) -> OptionTypeSubmodule $ M.unionWith combineOption m1 m2 [opt-env-conf-test] - _ -> OptionTypeOneOf [ot1, ot2] [opt-env-conf-test]  goCommand :: Command a -> Map Text Option [opt-env-conf-test]  goCommand = go . commandParser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf-test] @@ -91,8 +91,7 @@ [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test]  (OptionTypeSubmodule m1, OptionTypeSubmodule m2) -> OptionTypeSubmodule $ M.unionWith combineOption m1 m2 [opt-env-conf-test] - _ -> OptionTypeOneOf [ot1, ot2] [opt-env-conf-test]  goCommand :: Command a -> Map Text Option [opt-env-conf-test]  goCommand = go . commandParser [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> not $ True [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf-test] @@ -361,7 +361,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test] - if c `elem` cs [opt-env-conf-test] + if False [opt-env-conf-test]  then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf-test] @@ -361,7 +361,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test] - if c `elem` cs [opt-env-conf-test] + if not (c `elem` cs) [opt-env-conf-test]  then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Args.hs:372:27-31 [opt-env-conf-test] @@ -369,7 +369,7 @@ [opt-env-conf-test]  pure $ [opt-env-conf-test]  Just $ [opt-env-conf-test]  maybe [opt-env-conf-test] - (c :| [], True) [opt-env-conf-test] + (c :| [], False) [opt-env-conf-test]  (first (c NE.<|)) [opt-env-conf-test]  new [opt-env-conf-test]  [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:67:31-36 [opt-env-conf-test] @@ -64,7 +64,7 @@ [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test] - ParseErrorAllOrNothing _ -> False [opt-env-conf-test] + ParseErrorAllOrNothing _ -> True [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test]  ParseErrorMissingCapability _ -> False [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> True [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> not $ not (null cs) [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:364:10-21 [opt-env-conf-test] @@ -361,7 +361,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test] - if c `elem` cs [opt-env-conf-test] + if True [opt-env-conf-test]  then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> False [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> not (not $ null cs) [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> not $ False [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:64:31-36 [opt-env-conf-test] @@ -61,7 +61,7 @@ [opt-env-conf-test]  ParseErrorMissingEnvVar _ -> True [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test] - ParseErrorConfigRead _ _ -> False [opt-env-conf-test] + ParseErrorConfigRead _ _ -> True [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:406:20-28 [opt-env-conf-test] @@ -403,7 +403,6 @@ [opt-env-conf-test]  [opt-env-conf-test]  renderDashed :: Dashed -> String [opt-env-conf-test]  renderDashed = \case [opt-env-conf-test] - DashedShort c -> ['-', c] [opt-env-conf-test]  DashedLong cs -> '-' : '-' : NE.toList cs [opt-env-conf-test]  [opt-env-conf-test]  prefixDashed :: String -> Dashed -> Dashed [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:426:25-31 [opt-env-conf-test] @@ -423,6 +423,6 @@ [opt-env-conf-test]  longDasheds = [opt-env-conf-test]  mapMaybe [opt-env-conf-test]  ( \case [opt-env-conf-test] - DashedLong l -> Just l [opt-env-conf-test] + DashedLong l -> Nothing [opt-env-conf-test]  DashedShort _ -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:69:36-41 [opt-env-conf-test] @@ -66,7 +66,7 @@ [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test] - ParseErrorMissingCapability _ -> False [opt-env-conf-test] + ParseErrorMissingCapability _ -> True [opt-env-conf-test]  [opt-env-conf-test]  eraseErrorSrcLocs :: (Functor f) => f ParseError -> f ParseError [opt-env-conf-test]  eraseErrorSrcLocs = fmap eraseErrorSrcLoc [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Args.hs:418:26-32 [opt-env-conf-test] @@ -415,7 +415,7 @@ [opt-env-conf-test]  shortDasheds = [opt-env-conf-test]  mapMaybe [opt-env-conf-test]  ( \case [opt-env-conf-test] - DashedShort c -> Just c [opt-env-conf-test] + DashedShort c -> Nothing [opt-env-conf-test]  DashedLong _ -> Nothing [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:66:40-45 [opt-env-conf-test] @@ -63,7 +63,7 @@ [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] - ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test] + ParseErrorUnrecognisedCommand _ _ -> True [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test]  ParseErrorMissingCapability _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:61:32-36 [opt-env-conf-test] @@ -58,7 +58,7 @@ [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test]  ParseErrorOptionRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingOption _ -> True [opt-env-conf-test] - ParseErrorMissingEnvVar _ -> True [opt-env-conf-test] + ParseErrorMissingEnvVar _ -> False [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:60:32-36 [opt-env-conf-test] @@ -57,7 +57,7 @@ [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test]  ParseErrorOptionRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingOption _ -> True [opt-env-conf-test] + ParseErrorMissingOption _ -> False [opt-env-conf-test]  ParseErrorMissingEnvVar _ -> True [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Error.hs:68:31-36 [opt-env-conf-test] @@ -65,7 +65,7 @@ [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test] - ParseErrorUnrecognised _ -> False [opt-env-conf-test] + ParseErrorUnrecognised _ -> True [opt-env-conf-test]  ParseErrorMissingCapability _ -> False [opt-env-conf-test]  [opt-env-conf-test]  eraseErrorSrcLocs :: (Functor f) => f ParseError -> f ParseError [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test]  if c `elem` cs [opt-env-conf-test] - then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test] + then Just $ (\ne -> (ne, False)) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test]  new <- go rest' [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf-test] @@ -52,7 +52,7 @@ [opt-env-conf-test]  ParseErrorEmpty -> True [opt-env-conf-test]  ParseErrorEmptySetting -> False [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test] - ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test] + ParseErrorCheckFailed forgivable _ -> False [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf-test] @@ -513,9 +513,8 @@ [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test]  Nothing -> pure $ Right Nothing [opt-env-conf-test]  Just ((result, _), _) -> pure $ case result of [opt-env-conf-test] - Failure errs -> Left errs [opt-env-conf-test]  Success mDocs -> Right mDocs [opt-env-conf-test]  where [opt-env-conf-test]  -- We try to parse the commands as deep as possible and ignore everything else. [opt-env-conf-test]  go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc))) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf-test] @@ -513,9 +513,8 @@ [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test]  Nothing -> pure $ Right Nothing [opt-env-conf-test]  Just ((result, _), _) -> pure $ case result of [opt-env-conf-test]  Failure errs -> Left errs [opt-env-conf-test] - Success mDocs -> Right mDocs [opt-env-conf-test]  where [opt-env-conf-test]  -- We try to parse the commands as deep as possible and ignore everything else. [opt-env-conf-test]  go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc))) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf-test] @@ -511,11 +511,10 @@ [opt-env-conf-test]  ppEnvIndent = 0 [opt-env-conf-test]  } [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test] - Nothing -> pure $ Right Nothing [opt-env-conf-test]  Just ((result, _), _) -> pure $ case result of [opt-env-conf-test]  Failure errs -> Left errs [opt-env-conf-test]  Success mDocs -> Right mDocs [opt-env-conf-test]  where [opt-env-conf-test]  -- We try to parse the commands as deep as possible and ignore everything else. [opt-env-conf-test]  go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc))) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf-test] @@ -511,11 +511,8 @@ [opt-env-conf-test]  ppEnvIndent = 0 [opt-env-conf-test]  } [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test]  Nothing -> pure $ Right Nothing [opt-env-conf-test] - Just ((result, _), _) -> pure $ case result of [opt-env-conf-test] - Failure errs -> Left errs [opt-env-conf-test] - Success mDocs -> Right mDocs [opt-env-conf-test]  where [opt-env-conf-test]  -- We try to parse the commands as deep as possible and ignore everything else. [opt-env-conf-test]  go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc))) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:38:19-53 [opt-env-conf-test] @@ -35,7 +35,6 @@ [opt-env-conf-test]  ("# " <>) [opt-env-conf-test]  [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test]  "This file was generated by running", [opt-env-conf-test] - unwords [progname, "--render-nix-options"], [opt-env-conf-test]  T.unpack content [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:535:35-33 [opt-env-conf-test] @@ -532,12 +532,11 @@ [opt-env-conf-test]  mf <- go ff [opt-env-conf-test]  ma <- go fa [opt-env-conf-test]  pure $ ma <|> mf -- Reverse order [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test] - debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  me <- go fe [opt-env-conf-test]  mf <- go ff [opt-env-conf-test]  pure $ mf <|> me -- Reverse order [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  pure Nothing [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:529:31-33 [opt-env-conf-test] @@ -526,12 +526,11 @@ [opt-env-conf-test]  ParserPure _ -> do [opt-env-conf-test]  debug [syntaxChunk "pure value"] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  ParserAp ff fa -> do [opt-env-conf-test] - debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mf <- go ff [opt-env-conf-test]  ma <- go fa [opt-env-conf-test]  pure $ ma <|> mf -- Reverse order [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf-test] @@ -546,13 +546,10 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug ["Left side succeeded."] [opt-env-conf-test] - pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf-test] @@ -546,13 +546,10 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["Left side failed, trying right side."] [opt-env-conf-test] - ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:544:32-37 [opt-env-conf-test] @@ -541,18 +541,17 @@ [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test] - debug [syntaxChunk "Alt"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:553:30-37 [opt-env-conf-test] @@ -550,9 +550,8 @@ [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf-test] @@ -554,7 +554,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:556:35-31 [opt-env-conf-test] @@ -553,9 +553,8 @@ [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf-test] @@ -554,7 +554,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf-test] @@ -557,7 +557,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf-test] @@ -557,7 +557,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:557:21-66 [opt-env-conf-test] @@ -554,7 +554,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:560:21-66 [opt-env-conf-test] @@ -557,7 +557,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Run.hs:511:27-28 [opt-env-conf-test] @@ -508,7 +508,7 @@ [opt-env-conf-test]  { ppEnvEnv = EnvMap.empty, [opt-env-conf-test]  ppEnvConf = Nothing, [opt-env-conf-test]  ppEnvDebug = mDebugMode, [opt-env-conf-test] - ppEnvIndent = 0 [opt-env-conf-test] + ppEnvIndent = 1 [opt-env-conf-test]  } [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:562:43-31 [opt-env-conf-test] @@ -559,9 +559,8 @@ [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf-test] @@ -563,7 +563,6 @@ [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test] - debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf-test] @@ -563,7 +563,6 @@ [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test] - debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:566:21-79 [opt-env-conf-test] @@ -563,7 +563,6 @@ [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test] - debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:565:42-31 [opt-env-conf-test] @@ -562,9 +562,8 @@ [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test] - debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf-test] @@ -566,7 +566,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mNewConfig <- go pc [opt-env-conf-test]  mRes <- go pa [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf-test] @@ -560,7 +560,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf-test] @@ -566,7 +566,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mNewConfig <- go pc [opt-env-conf-test]  mRes <- go pa [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf-test] @@ -560,7 +560,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:559:35-31 [opt-env-conf-test] @@ -556,9 +556,8 @@ [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf-test] @@ -635,7 +635,7 @@ [opt-env-conf-test]  (errOrRes, s') <- ppNonDetList results [opt-env-conf-test]  case errOrRes of [opt-env-conf-test]  Failure errs -> [opt-env-conf-test] - if all errorIsForgivable errs [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  else ppErrors' errs [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:703:3-20 [opt-env-conf-test] @@ -700,11 +700,8 @@ [opt-env-conf-test]  ppOpt :: [Dashed] -> PP (Maybe String) [opt-env-conf-test]  ppOpt ds = do [opt-env-conf-test]  args <- gets ppStateArgs [opt-env-conf-test]  case Args.consumeOption ds args of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test] - Just (a, args') -> do [opt-env-conf-test] - modify' (\s -> s {ppStateArgs = args'}) [opt-env-conf-test] - pure (Just a) [opt-env-conf-test]  [opt-env-conf-test]  ppSwitch :: [Dashed] -> PP (Maybe ()) [opt-env-conf-test]  ppSwitch ds = do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf-test] @@ -635,7 +635,7 @@ [opt-env-conf-test]  (errOrRes, s') <- ppNonDetList results [opt-env-conf-test]  case errOrRes of [opt-env-conf-test]  Failure errs -> [opt-env-conf-test] - if all errorIsForgivable errs [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  else ppErrors' errs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:638:10-36 [opt-env-conf-test] @@ -635,7 +635,7 @@ [opt-env-conf-test]  (errOrRes, s') <- ppNonDetList results [opt-env-conf-test]  case errOrRes of [opt-env-conf-test]  Failure errs -> [opt-env-conf-test] - if all errorIsForgivable errs [opt-env-conf-test] + if not (all errorIsForgivable errs) [opt-env-conf-test]  then do [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  else ppErrors' errs [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Run.hs:707:13-19 [opt-env-conf-test] @@ -704,7 +704,7 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just (a, args') -> do [opt-env-conf-test]  modify' (\s -> s {ppStateArgs = args'}) [opt-env-conf-test] - pure (Just a) [opt-env-conf-test] + pure (Nothing) [opt-env-conf-test]  [opt-env-conf-test]  ppSwitch :: [Dashed] -> PP (Maybe ()) [opt-env-conf-test]  ppSwitch ds = do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:712:3-21 [opt-env-conf-test] @@ -709,11 +709,10 @@ [opt-env-conf-test]  ppSwitch :: [Dashed] -> PP (Maybe ()) [opt-env-conf-test]  ppSwitch ds = do [opt-env-conf-test]  args <- gets ppStateArgs [opt-env-conf-test]  case Args.consumeSwitch ds args of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test]  Just args' -> do [opt-env-conf-test]  modify' (\s -> s {ppStateArgs = args'}) [opt-env-conf-test]  pure (Just ()) [opt-env-conf-test]  [opt-env-conf-test]  ppErrors' :: NonEmpty ParseError -> PP a [opt-env-conf-test]  ppErrors' = PP . lift . ValidationT . lift . pure . Failure [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:703:3-20 [opt-env-conf-test] @@ -700,11 +700,10 @@ [opt-env-conf-test]  ppOpt :: [Dashed] -> PP (Maybe String) [opt-env-conf-test]  ppOpt ds = do [opt-env-conf-test]  args <- gets ppStateArgs [opt-env-conf-test]  case Args.consumeOption ds args of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test]  Just (a, args') -> do [opt-env-conf-test]  modify' (\s -> s {ppStateArgs = args'}) [opt-env-conf-test]  pure (Just a) [opt-env-conf-test]  [opt-env-conf-test]  ppSwitch :: [Dashed] -> PP (Maybe ()) [opt-env-conf-test]  ppSwitch ds = do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:712:3-21 [opt-env-conf-test] @@ -709,11 +709,8 @@ [opt-env-conf-test]  ppSwitch :: [Dashed] -> PP (Maybe ()) [opt-env-conf-test]  ppSwitch ds = do [opt-env-conf-test]  args <- gets ppStateArgs [opt-env-conf-test]  case Args.consumeSwitch ds args of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test] - Just args' -> do [opt-env-conf-test] - modify' (\s -> s {ppStateArgs = args'}) [opt-env-conf-test] - pure (Just ()) [opt-env-conf-test]  [opt-env-conf-test]  ppErrors' :: NonEmpty ParseError -> PP a [opt-env-conf-test]  ppErrors' = PP . lift . ValidationT . lift . pure . Failure [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Run.hs:716:13-20 [opt-env-conf-test] @@ -713,7 +713,7 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just args' -> do [opt-env-conf-test]  modify' (\s -> s {ppStateArgs = args'}) [opt-env-conf-test] - pure (Just ()) [opt-env-conf-test] + pure (Nothing) [opt-env-conf-test]  [opt-env-conf-test]  ppErrors' :: NonEmpty ParseError -> PP a [opt-env-conf-test]  ppErrors' = PP . lift . ValidationT . lift . pure . Failure [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:485:20-25 [opt-env-conf-test] @@ -482,9 +482,8 @@ [opt-env-conf-test]  tryReaders :: NonEmpty (Reader a) -> String -> Either (NonEmpty String) a [opt-env-conf-test]  tryReaders rs s = left NE.reverse $ go rs [opt-env-conf-test]  where [opt-env-conf-test]  go (r :| rl) = case runReader r s of [opt-env-conf-test]  Left err -> go' (err :| []) rl [opt-env-conf-test] - Right a -> Right a [opt-env-conf-test]  go' errs = \case [opt-env-conf-test]  [] -> Left errs [opt-env-conf-test]  (r : rl) -> case runReader r s of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf-test] @@ -474,9 +474,8 @@ [opt-env-conf-test]  | Found a [opt-env-conf-test]  [opt-env-conf-test]  requireReaders :: [Reader a] -> PP (NonEmpty (Reader a)) [opt-env-conf-test]  requireReaders rs = case NE.nonEmpty rs of [opt-env-conf-test] - Nothing -> ppError Nothing ParseErrorNoReaders [opt-env-conf-test]  Just ne -> pure ne [opt-env-conf-test]  [opt-env-conf-test]  -- Try the readers in order [opt-env-conf-test]  tryReaders :: NonEmpty (Reader a) -> String -> Either (NonEmpty String) a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf-test] @@ -474,9 +474,8 @@ [opt-env-conf-test]  | Found a [opt-env-conf-test]  [opt-env-conf-test]  requireReaders :: [Reader a] -> PP (NonEmpty (Reader a)) [opt-env-conf-test]  requireReaders rs = case NE.nonEmpty rs of [opt-env-conf-test]  Nothing -> ppError Nothing ParseErrorNoReaders [opt-env-conf-test] - Just ne -> pure ne [opt-env-conf-test]  [opt-env-conf-test]  -- Try the readers in order [opt-env-conf-test]  tryReaders :: NonEmpty (Reader a) -> String -> Either (NonEmpty String) a [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:464:22-66 [opt-env-conf-test] @@ -461,11 +461,8 @@ [opt-env-conf-test]  PP a [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities func = [opt-env-conf-test]  case missingCapabilities capabilities requiredCapabilities of [opt-env-conf-test]  Just missings -> do [opt-env-conf-test] - debug $ [opt-env-conf-test] - "Missing capabilities: " [opt-env-conf-test] - : capabilitiesChunks (Set.fromList (NE.toList missings)) [opt-env-conf-test]  ppErrors mLoc $ NE.map ParseErrorMissingCapability missings [opt-env-conf-test]  Nothing -> func [opt-env-conf-test]  [opt-env-conf-test]  data ParseResult a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:490:19-27 [opt-env-conf-test] @@ -487,9 +487,8 @@ [opt-env-conf-test]  Right a -> Right a [opt-env-conf-test]  go' errs = \case [opt-env-conf-test]  [] -> Left errs [opt-env-conf-test]  (r : rl) -> case runReader r s of [opt-env-conf-test] - Left err -> go' (err <| errs) rl [opt-env-conf-test]  Right a -> Right a [opt-env-conf-test]  [opt-env-conf-test]  runHelpParser :: [opt-env-conf-test]  -- DebugMode [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:463:3-20 [opt-env-conf-test] @@ -460,13 +460,8 @@ [opt-env-conf-test]  PP a -> [opt-env-conf-test]  PP a [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities func = [opt-env-conf-test]  case missingCapabilities capabilities requiredCapabilities of [opt-env-conf-test] - Just missings -> do [opt-env-conf-test] - debug $ [opt-env-conf-test] - "Missing capabilities: " [opt-env-conf-test] - : capabilitiesChunks (Set.fromList (NE.toList missings)) [opt-env-conf-test] - ppErrors mLoc $ NE.map ParseErrorMissingCapability missings [opt-env-conf-test]  Nothing -> func [opt-env-conf-test]  [opt-env-conf-test]  data ParseResult a [opt-env-conf-test]  = NotRun [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:463:3-20 [opt-env-conf-test] @@ -460,13 +460,12 @@ [opt-env-conf-test]  PP a -> [opt-env-conf-test]  PP a [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities func = [opt-env-conf-test]  case missingCapabilities capabilities requiredCapabilities of [opt-env-conf-test]  Just missings -> do [opt-env-conf-test]  debug $ [opt-env-conf-test]  "Missing capabilities: " [opt-env-conf-test]  : capabilitiesChunks (Set.fromList (NE.toList missings)) [opt-env-conf-test]  ppErrors mLoc $ NE.map ParseErrorMissingCapability missings [opt-env-conf-test] - Nothing -> func [opt-env-conf-test]  [opt-env-conf-test]  data ParseResult a [opt-env-conf-test]  = NotRun [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:582:17-47 [opt-env-conf-test] @@ -579,21 +579,10 @@ [opt-env-conf-test]  forM_ mDefault $ \d -> debug ["default:", chunk $ T.pack $ show d] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mS <- ppArg [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["No argument found for choosing a command."] [opt-env-conf-test]  pure Nothing [opt-env-conf-test] - Just s -> do [opt-env-conf-test] - case find ((== s) . commandArg) cs of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["Argument found, but no matching command: ", chunk $ T.pack $ show s] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test] - mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test] - pure $ case mRes of [opt-env-conf-test] - Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test] - Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test]  deriving [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Run.hs:75:27-28 [opt-env-conf-test] @@ -72,7 +72,7 @@ [opt-env-conf-test]  { ppEnvEnv = envVars, [opt-env-conf-test]  ppEnvConf = mConfig, [opt-env-conf-test]  ppEnvDebug = mDebugMode, [opt-env-conf-test] - ppEnvIndent = 0 [opt-env-conf-test] + ppEnvIndent = 1 [opt-env-conf-test]  } [opt-env-conf-test]  let go' = do [opt-env-conf-test]  result <- go parser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:80:9-79 [opt-env-conf-test] @@ -77,9 +77,8 @@ [opt-env-conf-test]  let go' = do [opt-env-conf-test]  result <- go parser [opt-env-conf-test]  leftoverArgs <- gets ppStateArgs [opt-env-conf-test]  case recogniseLeftovers leftoverArgs of [opt-env-conf-test] - Nothing -> pure result [opt-env-conf-test]  Just leftovers -> ppError Nothing $ ParseErrorUnrecognised leftovers [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test]  Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:97:31-41 [opt-env-conf-test] @@ -94,9 +94,8 @@ [opt-env-conf-test]  pure $ [opt-env-conf-test]  Left $ [opt-env-conf-test]  -- Only show source locations in debug mode. [opt-env-conf-test]  let f = case mDebugMode of [opt-env-conf-test] - Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:80:9-79 [opt-env-conf-test] @@ -77,9 +77,8 @@ [opt-env-conf-test]  let go' = do [opt-env-conf-test]  result <- go parser [opt-env-conf-test]  leftoverArgs <- gets ppStateArgs [opt-env-conf-test]  case recogniseLeftovers leftoverArgs of [opt-env-conf-test]  Nothing -> pure result [opt-env-conf-test] - Just leftovers -> ppError Nothing $ ParseErrorUnrecognised leftovers [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test]  Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:97:31-41 [opt-env-conf-test] @@ -94,9 +94,8 @@ [opt-env-conf-test]  pure $ [opt-env-conf-test]  Left $ [opt-env-conf-test]  -- Only show source locations in debug mode. [opt-env-conf-test]  let f = case mDebugMode of [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test] - Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:92:15-43 [opt-env-conf-test] @@ -89,18 +89,10 @@ [opt-env-conf-test]  let goNexts ns = do [opt-env-conf-test]  -- TODO: Consider keeping around all errors? [opt-env-conf-test]  mNext <- runNonDetTLazy ns [opt-env-conf-test]  case mNext of [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - pure $ [opt-env-conf-test] - Left $ [opt-env-conf-test] - -- Only show source locations in debug mode. [opt-env-conf-test] - let f = case mDebugMode of [opt-env-conf-test] - Nothing -> eraseErrorSrcLocs [opt-env-conf-test] - Just _ -> id [opt-env-conf-test] - in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test]  Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:92:15-43 [opt-env-conf-test] @@ -89,18 +89,15 @@ [opt-env-conf-test]  let goNexts ns = do [opt-env-conf-test]  -- TODO: Consider keeping around all errors? [opt-env-conf-test]  mNext <- runNonDetTLazy ns [opt-env-conf-test]  case mNext of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  pure $ [opt-env-conf-test]  Left $ [opt-env-conf-test]  -- Only show source locations in debug mode. [opt-env-conf-test]  let f = case mDebugMode of [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test] - Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test] - Success a -> pure (Right a) [opt-env-conf-test] - Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:582:17-47 [opt-env-conf-test] @@ -579,21 +579,18 @@ [opt-env-conf-test]  forM_ mDefault $ \d -> debug ["default:", chunk $ T.pack $ show d] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mS <- ppArg [opt-env-conf-test]  case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["No argument found for choosing a command."] [opt-env-conf-test] - pure Nothing [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Argument found, but no matching command: ", chunk $ T.pack $ show s] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test]  pure $ case mRes of [opt-env-conf-test]  Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test]  Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test]  deriving [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:86:36-26 [opt-env-conf-test] @@ -83,25 +83,24 @@ [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test]  Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test]  Just ((errOrRes, _), nexts) -> case errOrRes of [opt-env-conf-test] - Success a -> pure (Right a) [opt-env-conf-test]  Failure firstErrors -> [opt-env-conf-test]  let goNexts ns = do [opt-env-conf-test]  -- TODO: Consider keeping around all errors? [opt-env-conf-test]  mNext <- runNonDetTLazy ns [opt-env-conf-test]  case mNext of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  pure $ [opt-env-conf-test]  Left $ [opt-env-conf-test]  -- Only show source locations in debug mode. [opt-env-conf-test]  let f = case mDebugMode of [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test]  Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test]  Parser a -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:587:21-47 [opt-env-conf-test] @@ -584,16 +584,13 @@ [opt-env-conf-test]  debug ["No argument found for choosing a command."] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["Argument found, but no matching command: ", chunk $ T.pack $ show s] [opt-env-conf-test] - pure Nothing [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test]  pure $ case mRes of [opt-env-conf-test]  Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test]  Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test]  deriving [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:594:32-47 [opt-env-conf-test] @@ -591,9 +591,8 @@ [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test]  pure $ case mRes of [opt-env-conf-test]  Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test] - Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test]  deriving [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:569:21-72 [opt-env-conf-test] @@ -566,7 +566,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mNewConfig <- go pc [opt-env-conf-test]  mRes <- go pa [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:568:44-43 [opt-env-conf-test] @@ -565,12 +565,11 @@ [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mNewConfig <- go pc [opt-env-conf-test]  mRes <- go pa [opt-env-conf-test]  pure $ mRes <|> mNewConfig -- Reverse order [opt-env-conf-test]  ParserSetting mLoc _ -> do [opt-env-conf-test]  debug [syntaxChunk "Setting", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  pure Nothing [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:594:32-47 [opt-env-conf-test] @@ -591,9 +591,8 @@ [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test]  pure $ case mRes of [opt-env-conf-test] - Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test]  Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test]  deriving [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Run.hs:595:38-78 [opt-env-conf-test] @@ -592,7 +592,7 @@ [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test]  pure $ case mRes of [opt-env-conf-test] - Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test] + Nothing -> Nothing [opt-env-conf-test]  Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:485:20-25 [opt-env-conf-test] @@ -482,9 +482,8 @@ [opt-env-conf-test]  tryReaders :: NonEmpty (Reader a) -> String -> Either (NonEmpty String) a [opt-env-conf-test]  tryReaders rs s = left NE.reverse $ go rs [opt-env-conf-test]  where [opt-env-conf-test]  go (r :| rl) = case runReader r s of [opt-env-conf-test] - Left err -> go' (err :| []) rl [opt-env-conf-test]  Right a -> Right a [opt-env-conf-test]  go' errs = \case [opt-env-conf-test]  [] -> Left errs [opt-env-conf-test]  (r : rl) -> case runReader r s of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:101:41-43 [opt-env-conf-test] @@ -98,9 +98,8 @@ [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test] - Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf-test] @@ -81,27 +81,26 @@ [opt-env-conf-test]  Nothing -> pure result [opt-env-conf-test]  Just leftovers -> ppError Nothing $ ParseErrorUnrecognised leftovers [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test] - Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test]  Just ((errOrRes, _), nexts) -> case errOrRes of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test]  Failure firstErrors -> [opt-env-conf-test]  let goNexts ns = do [opt-env-conf-test]  -- TODO: Consider keeping around all errors? [opt-env-conf-test]  mNext <- runNonDetTLazy ns [opt-env-conf-test]  case mNext of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  pure $ [opt-env-conf-test]  Left $ [opt-env-conf-test]  -- Only show source locations in debug mode. [opt-env-conf-test]  let f = case mDebugMode of [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test]  Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test]  Parser a -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:86:36-26 [opt-env-conf-test] @@ -83,25 +83,8 @@ [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test]  Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test]  Just ((errOrRes, _), nexts) -> case errOrRes of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test] - Failure firstErrors -> [opt-env-conf-test] - let goNexts ns = do [opt-env-conf-test] - -- TODO: Consider keeping around all errors? [opt-env-conf-test] - mNext <- runNonDetTLazy ns [opt-env-conf-test] - case mNext of [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - pure $ [opt-env-conf-test] - Left $ [opt-env-conf-test] - -- Only show source locations in debug mode. [opt-env-conf-test] - let f = case mDebugMode of [opt-env-conf-test] - Nothing -> eraseErrorSrcLocs [opt-env-conf-test] - Just _ -> id [opt-env-conf-test] - in f firstErrors [opt-env-conf-test] - Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test] - Success a -> pure (Right a) [opt-env-conf-test] - Failure _ -> goNexts ns' [opt-env-conf-test] - in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test]  Parser a -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf-test] @@ -114,7 +114,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test] - debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:563:21-74 [opt-env-conf-test] @@ -560,7 +560,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Run.hs:644:14-20 [opt-env-conf-test] @@ -641,7 +641,7 @@ [opt-env-conf-test]  else ppErrors' errs [opt-env-conf-test]  Success a -> do [opt-env-conf-test]  put s' -- Only set state if parsing succeeded. [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  [opt-env-conf-test]  ppNonDet :: NonDetT IO a -> PP a [opt-env-conf-test]  ppNonDet = PP . lift . lift . lift [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:636:3-20 [opt-env-conf-test] @@ -633,15 +633,10 @@ [opt-env-conf-test]  e <- ask [opt-env-conf-test]  results <- liftIO $ runPP pp s e [opt-env-conf-test]  (errOrRes, s') <- ppNonDetList results [opt-env-conf-test]  case errOrRes of [opt-env-conf-test] - Failure errs -> [opt-env-conf-test] - if all errorIsForgivable errs [opt-env-conf-test] - then do [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - else ppErrors' errs [opt-env-conf-test]  Success a -> do [opt-env-conf-test]  put s' -- Only set state if parsing succeeded. [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  [opt-env-conf-test]  ppNonDet :: NonDetT IO a -> PP a [opt-env-conf-test]  ppNonDet = PP . lift . lift . lift [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf-test] @@ -85,10 +85,9 @@ [opt-env-conf-test]  in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test]  (Nothing, _) -> o2 [opt-env-conf-test]  (Just ot1, Nothing) -> o2 {optionType = Just ot1} [opt-env-conf-test] - (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf-test] @@ -33,11 +33,7 @@ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  ("# " <>) [opt-env-conf-test] - [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test] - "This file was generated by running", [opt-env-conf-test] - unwords [progname, "--render-nix-options"], [opt-env-conf-test] - T.unpack content [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  renderSettingsNixOptions :: forall a. (HasParser a) => Text [opt-env-conf-test]  renderSettingsNixOptions = renderParserNixOptions (settingsParser :: Parser a) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf-test] @@ -33,11 +33,10 @@ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  ("# " <>) [opt-env-conf-test] - [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test]  "This file was generated by running", [opt-env-conf-test]  unwords [progname, "--render-nix-options"], [opt-env-conf-test]  T.unpack content [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  renderSettingsNixOptions :: forall a. (HasParser a) => Text [opt-env-conf-test]  renderSettingsNixOptions = renderParserNixOptions (settingsParser :: Parser a) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:38:19-53 [opt-env-conf-test] @@ -35,7 +35,6 @@ [opt-env-conf-test]  ("# " <>) [opt-env-conf-test]  [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test]  "This file was generated by running", [opt-env-conf-test] - unwords [progname, "--render-nix-options"], [opt-env-conf-test]  T.unpack content [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:75:35-98 [opt-env-conf-test] @@ -72,17 +72,10 @@ [opt-env-conf-test]  let codecTups = maybe [] NE.toList (settingConfigVals s) [opt-env-conf-test]  in M.unionsWith combineOption $ flip map codecTups $ \ConfigValSetting {..} -> [opt-env-conf-test]  let go' :: NonEmpty Text -> Map Text Option [opt-env-conf-test]  go' (p :| ps) = case NE.nonEmpty ps of [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - let oc = [opt-env-conf-test] - maybe [opt-env-conf-test] - (optionalFieldWith' p configValSettingCodec) [opt-env-conf-test] - (optionalFieldWith p configValSettingCodec) [opt-env-conf-test] - (T.pack <$> settingHelp s) [opt-env-conf-test] - in objectCodecNixOptions oc [opt-env-conf-test]  Just rest -> [opt-env-conf-test]  let m = go' rest [opt-env-conf-test]  in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Nix.hs:85:69-97 [opt-env-conf-test] @@ -82,7 +82,7 @@ [opt-env-conf-test]  in objectCodecNixOptions oc [opt-env-conf-test]  Just rest -> [opt-env-conf-test]  let m = go' rest [opt-env-conf-test] - in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test] + in M.singleton p $ emptyOption {optionType = Nothing} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf-test] @@ -114,7 +114,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test] - debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:116:27-37 [opt-env-conf-test] @@ -113,9 +113,8 @@ [opt-env-conf-test]  ParserAp ff fa -> do [opt-env-conf-test]  debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test] - debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ select (go fe) (go ff) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Nix.hs:36:9-10 [opt-env-conf-test] @@ -33,11 +33,10 @@ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  ("# " <>) [opt-env-conf-test]  [ "DO NOT EDIT THIS FILE DIRECTLY", [opt-env-conf-test]  "This file was generated by running", [opt-env-conf-test]  unwords [progname, "--render-nix-options"], [opt-env-conf-test] - T.unpack content [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  renderSettingsNixOptions :: forall a. (HasParser a) => Text [opt-env-conf-test]  renderSettingsNixOptions = renderParserNixOptions (settingsParser :: Parser a) [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:119:29-42 [opt-env-conf-test] @@ -116,9 +116,8 @@ [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test] - debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ select (go fe) (go ff) [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  debug [syntaxChunk "Alt"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf-test] @@ -148,7 +148,6 @@ [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  e <- ask [opt-env-conf-test]  s <- get [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf-test] @@ -148,7 +148,6 @@ [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  e <- ask [opt-env-conf-test]  s <- get [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if not $ True [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if not $ False [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if not $ not (all errorIsForgivable errs) [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if True [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf-test] @@ -132,7 +132,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:151:15-68 [opt-env-conf-test] @@ -148,7 +148,6 @@ [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  e <- ask [opt-env-conf-test]  s <- get [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:127:11-31 [opt-env-conf-test] @@ -124,13 +124,10 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug ["Left side succeeded."] [opt-env-conf-test] - pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:131:24-31 [opt-env-conf-test] @@ -128,9 +128,8 @@ [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf-test] @@ -141,7 +141,6 @@ [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  a <- go p' [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf-test] @@ -132,7 +132,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test] - if null parsedSettingsMap [opt-env-conf-test] + if not (null parsedSettingsMap) [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:158:11-112 [opt-env-conf-test] @@ -155,26 +155,25 @@ [opt-env-conf-test]  results <- liftIO $ runPP (go p') s e [opt-env-conf-test]  (result, s') <- ppNonDetList results [opt-env-conf-test]  put s' [opt-env-conf-test]  case result of [opt-env-conf-test] - Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test]  if not $ all errorIsForgivable errs [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test]  let settingsMap = parserSettingsMap p' [opt-env-conf-test]  -- Settings that have been parsed [opt-env-conf-test]  parsedMap <- gets ppStateParsedSettings [opt-env-conf-test]  -- Settings that have been parsed below [opt-env-conf-test]  let parsedSettingsMap = settingsMap `M.intersection` parsedMap [opt-env-conf-test]  -- If any settings have been parsed below, and parsing still failed [opt-env-conf-test]  -- (this is the case because we're in the failure branch) [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test]  if null parsedSettingsMap [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null requiredCapabilities)) $ [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:158:11-112 [opt-env-conf-test] @@ -155,26 +155,8 @@ [opt-env-conf-test]  results <- liftIO $ runPP (go p') s e [opt-env-conf-test]  (result, s') <- ppNonDetList results [opt-env-conf-test]  put s' [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test] - Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] - then ppErrors' errs [opt-env-conf-test] - else do [opt-env-conf-test] - -- Settings available below [opt-env-conf-test] - let settingsMap = parserSettingsMap p' [opt-env-conf-test] - -- Settings that have been parsed [opt-env-conf-test] - parsedMap <- gets ppStateParsedSettings [opt-env-conf-test] - -- Settings that have been parsed below [opt-env-conf-test] - let parsedSettingsMap = settingsMap `M.intersection` parsedMap [opt-env-conf-test] - -- If any settings have been parsed below, and parsing still failed [opt-env-conf-test] - -- (this is the case because we're in the failure branch) [opt-env-conf-test] - -- with only forgivable errors [opt-env-conf-test] - -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test] - -- then this should be an unforgivable error. [opt-env-conf-test] - if null parsedSettingsMap [opt-env-conf-test] - then ppErrors' errs [opt-env-conf-test] - else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null requiredCapabilities)) $ [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf-test] @@ -132,7 +132,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf-test] @@ -193,7 +193,7 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] + debug ["failed, forgivable: ", chunk $ T.pack $ show not (forgivable)] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf-test] @@ -193,7 +193,6 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf-test] @@ -193,7 +193,6 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf-test] @@ -194,7 +194,7 @@ [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test]  debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] - ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test] + ppError mLoc $ ParseErrorCheckFailed True err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf-test] @@ -194,7 +194,7 @@ [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test]  debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] - ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test] + ppError mLoc $ ParseErrorCheckFailed False err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf-test] @@ -194,7 +194,7 @@ [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test]  debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] - ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test] + ppError mLoc $ ParseErrorCheckFailed not (forgivable) err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:195:29-70 [opt-env-conf-test] @@ -192,9 +192,8 @@ [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities $ do [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:194:15-25 [opt-env-conf-test] @@ -191,13 +191,10 @@ [opt-env-conf-test]  ppIndent $ [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities $ do [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test] - Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] - ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test]  debug [syntaxChunk "Commands", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  forM_ mDefault $ \d -> debug ["default:", chunk $ T.pack $ show d] [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf-test] @@ -193,7 +193,7 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] + debug ["failed, forgivable: ", chunk $ T.pack $ show True] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:152:20-112 [opt-env-conf-test] @@ -149,32 +149,31 @@ [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  e <- ask [opt-env-conf-test]  s <- get [opt-env-conf-test]  results <- liftIO $ runPP (go p') s e [opt-env-conf-test]  (result, s') <- ppNonDetList results [opt-env-conf-test] - put s' [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test]  if not $ all errorIsForgivable errs [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test]  let settingsMap = parserSettingsMap p' [opt-env-conf-test]  -- Settings that have been parsed [opt-env-conf-test]  parsedMap <- gets ppStateParsedSettings [opt-env-conf-test]  -- Settings that have been parsed below [opt-env-conf-test]  let parsedSettingsMap = settingsMap `M.intersection` parsedMap [opt-env-conf-test]  -- If any settings have been parsed below, and parsing still failed [opt-env-conf-test]  -- (this is the case because we're in the failure branch) [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test]  if null parsedSettingsMap [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null requiredCapabilities)) $ [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:150:37-112 [opt-env-conf-test] @@ -147,34 +147,33 @@ [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  e <- ask [opt-env-conf-test]  s <- get [opt-env-conf-test]  results <- liftIO $ runPP (go p') s e [opt-env-conf-test]  (result, s') <- ppNonDetList results [opt-env-conf-test]  put s' [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test]  if not $ all errorIsForgivable errs [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test]  let settingsMap = parserSettingsMap p' [opt-env-conf-test]  -- Settings that have been parsed [opt-env-conf-test]  parsedMap <- gets ppStateParsedSettings [opt-env-conf-test]  -- Settings that have been parsed below [opt-env-conf-test]  let parsedSettingsMap = settingsMap `M.intersection` parsedMap [opt-env-conf-test]  -- If any settings have been parsed below, and parsing still failed [opt-env-conf-test]  -- (this is the case because we're in the failure branch) [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test]  if null parsedSettingsMap [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null requiredCapabilities)) $ [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:216:25-85 [opt-env-conf-test] @@ -213,7 +213,6 @@ [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test]  Just dc -> do [opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:194:15-25 [opt-env-conf-test] @@ -191,13 +191,10 @@ [opt-env-conf-test]  ppIndent $ [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities $ do [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test]  debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test] - Right b -> do [opt-env-conf-test] - debug ["succeeded"] [opt-env-conf-test] - pure b [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> do [opt-env-conf-test]  debug [syntaxChunk "Commands", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  forM_ mDefault $ \d -> debug ["default:", chunk $ T.pack $ show d] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:216:25-85 [opt-env-conf-test] @@ -213,7 +213,6 @@ [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test]  Just dc -> do [opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:215:28-40 [opt-env-conf-test] @@ -212,9 +212,8 @@ [opt-env-conf-test]  find ((== d) . commandArg) cs [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test]  Just dc -> do [opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:213:15-40 [opt-env-conf-test] @@ -210,11 +210,8 @@ [opt-env-conf-test]  let mDefaultCommand = do [opt-env-conf-test]  d <- mDefault [opt-env-conf-test]  find ((== d) . commandArg) cs [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test] - Just dc -> do [opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test] - go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:213:15-40 [opt-env-conf-test] @@ -210,11 +210,10 @@ [opt-env-conf-test]  let mDefaultCommand = do [opt-env-conf-test]  d <- mDefault [opt-env-conf-test]  find ((== d) . commandArg) cs [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test] - Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test]  Just dc -> do [opt-env-conf-test]  debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test] - if null parsedSettingsMap [opt-env-conf-test] + if True [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if not (not $ all errorIsForgivable errs) [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if False [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:175:22-44 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test] - if null parsedSettingsMap [opt-env-conf-test] + if False [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:117:15-61 [opt-env-conf-test] @@ -114,7 +114,6 @@ [opt-env-conf-test]  debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test] - debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:113:25-35 [opt-env-conf-test] @@ -110,9 +110,8 @@ [opt-env-conf-test]  ParserPure a -> do [opt-env-conf-test]  debug [syntaxChunk "pure value"] [opt-env-conf-test]  pure a [opt-env-conf-test]  ParserAp ff fa -> do [opt-env-conf-test] - debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf-test] @@ -222,7 +222,6 @@ [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["loading config"] [opt-env-conf-test]  mNewConfig <- ppIndent $ go pc [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:224:38-20 [opt-env-conf-test] @@ -221,15 +221,14 @@ [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["loading config"] [opt-env-conf-test]  mNewConfig <- ppIndent $ go pc [opt-env-conf-test]  debug ["with loaded config"] [opt-env-conf-test]  ppIndent $ [opt-env-conf-test]  local (\e -> e {ppEnvConf = mNewConfig}) $ [opt-env-conf-test]  go pa [opt-env-conf-test]  ParserSetting mLoc set@Setting {..} -> do [opt-env-conf-test]  debug [syntaxChunk "Setting", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null settingRequiredCapabilities)) $ [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  mLoc [opt-env-conf-test]  let mOptDoc = settingOptDoc set [opt-env-conf-test]  mArg <- [opt-env-conf-test] - if settingTryArgument [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the argument so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  mLoc [opt-env-conf-test]  let mOptDoc = settingOptDoc set [opt-env-conf-test]  mArg <- [opt-env-conf-test] - if settingTryArgument [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the argument so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:262:16-34 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  mLoc [opt-env-conf-test]  let mOptDoc = settingOptDoc set [opt-env-conf-test]  mArg <- [opt-env-conf-test] - if settingTryArgument [opt-env-conf-test] + if not (settingTryArgument) [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the argument so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:273:21-39 [opt-env-conf-test] @@ -270,14 +270,13 @@ [opt-env-conf-test]  debug ["could not set based on argument: no argument"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just argStr -> cap $ [opt-env-conf-test]  case tryReaders rs argStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorArgumentRead mOptDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on argument: ", [opt-env-conf-test]  chunk $ T.pack $ show argStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mArg of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:273:21-39 [opt-env-conf-test] @@ -270,14 +270,8 @@ [opt-env-conf-test]  debug ["could not set based on argument: no argument"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just argStr -> cap $ [opt-env-conf-test]  case tryReaders rs argStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorArgumentRead mOptDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on argument: ", [opt-env-conf-test] - chunk $ T.pack $ show argStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mArg of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:268:17-39 [opt-env-conf-test] @@ -265,19 +265,16 @@ [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  mS <- ppArg [opt-env-conf-test]  case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["could not set based on argument: no argument"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test]  Just argStr -> cap $ [opt-env-conf-test]  case tryReaders rs argStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorArgumentRead mOptDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on argument: ", [opt-env-conf-test]  chunk $ T.pack $ show argStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mArg of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:268:17-39 [opt-env-conf-test] @@ -265,19 +265,10 @@ [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  mS <- ppArg [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["could not set based on argument: no argument"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test] - Just argStr -> cap $ [opt-env-conf-test] - case tryReaders rs argStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorArgumentRead mOptDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on argument: ", [opt-env-conf-test] - chunk $ T.pack $ show argStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mArg of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:292:19-37 [opt-env-conf-test] @@ -289,16 +289,10 @@ [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  mS <- ppSwitch settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on switch, no switch: ", [opt-env-conf-test] - chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test]  Just () -> cap $ do [opt-env-conf-test]  debug ["set based on switch."] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:292:19-37 [opt-env-conf-test] @@ -289,16 +289,13 @@ [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  mS <- ppSwitch settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on switch, no switch: ", [opt-env-conf-test]  chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test] - Just () -> cap $ do [opt-env-conf-test] - debug ["set based on switch."] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:288:26-37 [opt-env-conf-test] @@ -285,20 +285,19 @@ [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mSwitch <- case settingSwitchValue of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  mS <- ppSwitch settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on switch, no switch: ", [opt-env-conf-test]  chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just () -> cap $ do [opt-env-conf-test]  debug ["set based on switch."] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:288:26-37 [opt-env-conf-test] @@ -285,20 +285,8 @@ [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mSwitch <- case settingSwitchValue of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - mS <- ppSwitch settingDasheds [opt-env-conf-test] - case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on switch, no switch: ", [opt-env-conf-test] - chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just () -> cap $ do [opt-env-conf-test] - debug ["set based on switch."] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf-test] @@ -306,7 +306,7 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mOpt <- [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the option so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf-test] @@ -306,7 +306,7 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mOpt <- [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the option so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Run.hs:309:24-40 [opt-env-conf-test] @@ -306,7 +306,7 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mOpt <- [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if not (settingTryOption) [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the option so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:323:29-47 [opt-env-conf-test] @@ -320,14 +320,13 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just optionStr -> cap $ [opt-env-conf-test]  case tryReaders rs optionStr of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on option: ", [opt-env-conf-test]  chunk $ T.pack $ show optionStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:323:29-47 [opt-env-conf-test] @@ -320,14 +320,8 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just optionStr -> cap $ [opt-env-conf-test]  case tryReaders rs optionStr of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on option: ", [opt-env-conf-test] - chunk $ T.pack $ show optionStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:315:25-47 [opt-env-conf-test] @@ -312,22 +312,16 @@ [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  mS <- ppOpt settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on options, no option: ", [opt-env-conf-test] - chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test]  Just optionStr -> cap $ [opt-env-conf-test]  case tryReaders rs optionStr of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on option: ", [opt-env-conf-test]  chunk $ T.pack $ show optionStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:315:25-47 [opt-env-conf-test] @@ -312,22 +312,13 @@ [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  mS <- ppOpt settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on options, no option: ", [opt-env-conf-test]  chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test] - Just optionStr -> cap $ [opt-env-conf-test] - case tryReaders rs optionStr of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on option: ", [opt-env-conf-test] - chunk $ T.pack $ show optionStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:352:29-39 [opt-env-conf-test] @@ -349,14 +349,13 @@ [opt-env-conf-test]  -- of them fail, even if they wouldn't be the parse [opt-env-conf-test]  -- result. [opt-env-conf-test]  results <- for founds $ \varStr -> [opt-env-conf-test]  case tryReaders rs varStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on env: ", [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:352:29-39 [opt-env-conf-test] @@ -349,14 +349,8 @@ [opt-env-conf-test]  -- of them fail, even if they wouldn't be the parse [opt-env-conf-test]  -- result. [opt-env-conf-test]  results <- for founds $ \varStr -> [opt-env-conf-test]  case tryReaders rs varStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on env: ", [opt-env-conf-test] - chunk $ T.pack $ show varStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:360:27-53 [opt-env-conf-test] @@ -357,14 +357,8 @@ [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on env vars, no var: ", [opt-env-conf-test] - chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:360:27-53 [opt-env-conf-test] @@ -357,14 +357,13 @@ [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on env vars, no var: ", [opt-env-conf-test]  chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:339:37-53 [opt-env-conf-test] @@ -336,35 +336,34 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mEnvDoc = settingEnvDoc set [opt-env-conf-test]  mEnv <- cap $ case settingEnvVars of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  -- Require readers before finding the env vars so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  es <- asks ppEnvEnv [opt-env-conf-test]  let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test]  -- Run the parser on all specified env vars before [opt-env-conf-test]  -- returning the first because we want to fail if any [opt-env-conf-test]  -- of them fail, even if they wouldn't be the parse [opt-env-conf-test]  -- result. [opt-env-conf-test]  results <- for founds $ \varStr -> [opt-env-conf-test]  case tryReaders rs varStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on env: ", [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on env vars, no var: ", [opt-env-conf-test]  chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:339:37-53 [opt-env-conf-test] @@ -336,35 +336,8 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mEnvDoc = settingEnvDoc set [opt-env-conf-test]  mEnv <- cap $ case settingEnvVars of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - -- Require readers before finding the env vars so the parser [opt-env-conf-test] - -- always fails if it's missing a reader. [opt-env-conf-test] - rs <- requireReaders settingReaders [opt-env-conf-test] - es <- asks ppEnvEnv [opt-env-conf-test] - let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test] - -- Run the parser on all specified env vars before [opt-env-conf-test] - -- returning the first because we want to fail if any [opt-env-conf-test] - -- of them fail, even if they wouldn't be the parse [opt-env-conf-test] - -- result. [opt-env-conf-test] - results <- for founds $ \varStr -> [opt-env-conf-test] - case tryReaders rs varStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on env: ", [opt-env-conf-test] - chunk $ T.pack $ show varStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure a [opt-env-conf-test] - case listToMaybe results of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on env vars, no var: ", [opt-env-conf-test] - chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:388:49-81 [opt-env-conf-test] @@ -385,9 +385,8 @@ [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:388:49-81 [opt-env-conf-test] @@ -385,9 +385,8 @@ [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf-test] @@ -390,9 +390,8 @@ [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf-test] @@ -390,9 +390,8 @@ [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:386:72-82 [opt-env-conf-test] @@ -383,16 +383,12 @@ [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:386:72-82 [opt-env-conf-test] @@ -383,16 +383,11 @@ [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Run.hs:419:58-64 [opt-env-conf-test] @@ -416,7 +416,7 @@ [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:407:59-64 [opt-env-conf-test] @@ -404,19 +404,13 @@ [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:407:59-64 [opt-env-conf-test] @@ -404,19 +404,13 @@ [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf-test] @@ -402,21 +402,20 @@ [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf-test] @@ -402,21 +402,8 @@ [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:398:55-64 [opt-env-conf-test] @@ -395,28 +395,22 @@ [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:398:55-64 [opt-env-conf-test] @@ -395,28 +395,13 @@ [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf-test] @@ -393,30 +393,29 @@ [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf-test] @@ -393,30 +393,8 @@ [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:427:43-69 [opt-env-conf-test] @@ -424,9 +424,8 @@ [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:427:43-69 [opt-env-conf-test] @@ -424,9 +424,8 @@ [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:423:70-69 [opt-env-conf-test] @@ -420,13 +420,12 @@ [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:423:70-69 [opt-env-conf-test] @@ -420,13 +420,8 @@ [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:379:31-54 [opt-env-conf-test] @@ -376,58 +376,55 @@ [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["no config object to set from"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:379:31-54 [opt-env-conf-test] @@ -376,58 +376,10 @@ [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["no config object to set from"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test] - Just obj -> do [opt-env-conf-test] - let goConfSet ConfigValSetting {..} = do [opt-env-conf-test] - let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test] - jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test] - case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] - let toRes = \case [opt-env-conf-test] - Nothing -> NotFound [opt-env-conf-test] - Just a -> Found a [opt-env-conf-test] - let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test] - goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:375:36-54 [opt-env-conf-test] @@ -372,62 +372,61 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mConfDoc = settingConfDoc set [opt-env-conf-test]  mConf <- case settingConfigVals of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["no config object to set from"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:375:36-54 [opt-env-conf-test] @@ -372,62 +372,8 @@ [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mConfDoc = settingConfDoc set [opt-env-conf-test]  mConf <- case settingConfigVals of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test] - Just confSets -> do [opt-env-conf-test] - mObj <- asks ppEnvConf [opt-env-conf-test] - case mObj of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["no config object to set from"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just obj -> do [opt-env-conf-test] - let goConfSet ConfigValSetting {..} = do [opt-env-conf-test] - let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test] - jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test] - case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] - let toRes = \case [opt-env-conf-test] - Nothing -> NotFound [opt-env-conf-test] - Just a -> Found a [opt-env-conf-test] - let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test] - goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Run.hs:443:53-59 [opt-env-conf-test] @@ -440,7 +440,7 @@ [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] + NotFound -> Nothing [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf-test] @@ -438,10 +438,9 @@ [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf-test] @@ -438,10 +438,9 @@ [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf-test] @@ -438,10 +438,9 @@ [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf-test] @@ -446,12 +446,7 @@ [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf-test] @@ -446,12 +446,11 @@ [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:449:41-42 [opt-env-conf-test] @@ -446,12 +446,11 @@ [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:440:44-42 [opt-env-conf-test] @@ -437,21 +437,20 @@ [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:436:31-42 [opt-env-conf-test] @@ -433,25 +433,22 @@ [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test] - Just (a, _) -> do [opt-env-conf-test] - debug ["set to default value"] [opt-env-conf-test] - pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:436:31-42 [opt-env-conf-test] @@ -433,25 +433,10 @@ [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test] - maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] - NE.nonEmpty $ [opt-env-conf-test] - catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:431:27-42 [opt-env-conf-test] @@ -428,30 +428,27 @@ [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:431:27-42 [opt-env-conf-test] @@ -428,30 +428,10 @@ [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test] - _ -> [opt-env-conf-test] - case settingDefaultValue of [opt-env-conf-test] - Just (a, _) -> do [opt-env-conf-test] - debug ["set to default value"] [opt-env-conf-test] - pure a -- Don't mark as parsed [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test] - maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] - NE.nonEmpty $ [opt-env-conf-test] - catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:369:23-42 [opt-env-conf-test] @@ -366,92 +366,89 @@ [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mConfDoc = settingConfDoc set [opt-env-conf-test]  mConf <- case settingConfigVals of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["no config object to set from"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:369:23-42 [opt-env-conf-test] @@ -366,92 +366,10 @@ [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mConfDoc = settingConfDoc set [opt-env-conf-test] - mConf <- case settingConfigVals of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just confSets -> do [opt-env-conf-test] - mObj <- asks ppEnvConf [opt-env-conf-test] - case mObj of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["no config object to set from"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just obj -> do [opt-env-conf-test] - let goConfSet ConfigValSetting {..} = do [opt-env-conf-test] - let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test] - jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test] - case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] - let toRes = \case [opt-env-conf-test] - Nothing -> NotFound [opt-env-conf-test] - Just a -> Found a [opt-env-conf-test] - let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test] - goConfSets confSets [opt-env-conf-test] - case mConf of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> [opt-env-conf-test] - case settingDefaultValue of [opt-env-conf-test] - Just (a, _) -> do [opt-env-conf-test] - debug ["set to default value"] [opt-env-conf-test] - pure a -- Don't mark as parsed [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test] - maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] - NE.nonEmpty $ [opt-env-conf-test] - catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:333:19-42 [opt-env-conf-test] @@ -330,128 +330,125 @@ [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mEnvDoc = settingEnvDoc set [opt-env-conf-test]  mEnv <- cap $ case settingEnvVars of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  -- Require readers before finding the env vars so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  es <- asks ppEnvEnv [opt-env-conf-test]  let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test]  -- Run the parser on all specified env vars before [opt-env-conf-test]  -- returning the first because we want to fail if any [opt-env-conf-test]  -- of them fail, even if they wouldn't be the parse [opt-env-conf-test]  -- result. [opt-env-conf-test]  results <- for founds $ \varStr -> [opt-env-conf-test]  case tryReaders rs varStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on env: ", [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on env vars, no var: ", [opt-env-conf-test]  chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mConfDoc = settingConfDoc set [opt-env-conf-test]  mConf <- case settingConfigVals of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["no config object to set from"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:333:19-42 [opt-env-conf-test] @@ -330,128 +330,10 @@ [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mEnvDoc = settingEnvDoc set [opt-env-conf-test] - mEnv <- cap $ case settingEnvVars of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - -- Require readers before finding the env vars so the parser [opt-env-conf-test] - -- always fails if it's missing a reader. [opt-env-conf-test] - rs <- requireReaders settingReaders [opt-env-conf-test] - es <- asks ppEnvEnv [opt-env-conf-test] - let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test] - -- Run the parser on all specified env vars before [opt-env-conf-test] - -- returning the first because we want to fail if any [opt-env-conf-test] - -- of them fail, even if they wouldn't be the parse [opt-env-conf-test] - -- result. [opt-env-conf-test] - results <- for founds $ \varStr -> [opt-env-conf-test] - case tryReaders rs varStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on env: ", [opt-env-conf-test] - chunk $ T.pack $ show varStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure a [opt-env-conf-test] - case listToMaybe results of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on env vars, no var: ", [opt-env-conf-test] - chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - [opt-env-conf-test] - case mEnv of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mConfDoc = settingConfDoc set [opt-env-conf-test] - mConf <- case settingConfigVals of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just confSets -> do [opt-env-conf-test] - mObj <- asks ppEnvConf [opt-env-conf-test] - case mObj of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["no config object to set from"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just obj -> do [opt-env-conf-test] - let goConfSet ConfigValSetting {..} = do [opt-env-conf-test] - let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test] - jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test] - case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] - let toRes = \case [opt-env-conf-test] - Nothing -> NotFound [opt-env-conf-test] - Just a -> Found a [opt-env-conf-test] - let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test] - goConfSets confSets [opt-env-conf-test] - case mConf of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> [opt-env-conf-test] - case settingDefaultValue of [opt-env-conf-test] - Just (a, _) -> do [opt-env-conf-test] - debug ["set to default value"] [opt-env-conf-test] - pure a -- Don't mark as parsed [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test] - maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] - NE.nonEmpty $ [opt-env-conf-test] - catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:303:15-42 [opt-env-conf-test] @@ -300,158 +300,155 @@ [opt-env-conf-test]  debug ["set based on switch."] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mOpt <- [opt-env-conf-test]  if settingTryOption [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the option so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  mS <- ppOpt settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on options, no option: ", [opt-env-conf-test]  chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just optionStr -> cap $ [opt-env-conf-test]  case tryReaders rs optionStr of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on option: ", [opt-env-conf-test]  chunk $ T.pack $ show optionStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mEnvDoc = settingEnvDoc set [opt-env-conf-test]  mEnv <- cap $ case settingEnvVars of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  -- Require readers before finding the env vars so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  es <- asks ppEnvEnv [opt-env-conf-test]  let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test]  -- Run the parser on all specified env vars before [opt-env-conf-test]  -- returning the first because we want to fail if any [opt-env-conf-test]  -- of them fail, even if they wouldn't be the parse [opt-env-conf-test]  -- result. [opt-env-conf-test]  results <- for founds $ \varStr -> [opt-env-conf-test]  case tryReaders rs varStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on env: ", [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on env vars, no var: ", [opt-env-conf-test]  chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mConfDoc = settingConfDoc set [opt-env-conf-test]  mConf <- case settingConfigVals of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["no config object to set from"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:303:15-42 [opt-env-conf-test] @@ -300,158 +300,10 @@ [opt-env-conf-test]  debug ["set based on switch."] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - mOpt <- [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] - then do [opt-env-conf-test] - -- Require readers before finding the option so the parser [opt-env-conf-test] - -- always fails if it's missing a reader. [opt-env-conf-test] - rs <- requireReaders settingReaders [opt-env-conf-test] - mS <- ppOpt settingDasheds [opt-env-conf-test] - case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on options, no option: ", [opt-env-conf-test] - chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just optionStr -> cap $ [opt-env-conf-test] - case tryReaders rs optionStr of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on option: ", [opt-env-conf-test] - chunk $ T.pack $ show optionStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test] - else pure NotRun [opt-env-conf-test] - [opt-env-conf-test] - case mOpt of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mEnvDoc = settingEnvDoc set [opt-env-conf-test] - mEnv <- cap $ case settingEnvVars of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - -- Require readers before finding the env vars so the parser [opt-env-conf-test] - -- always fails if it's missing a reader. [opt-env-conf-test] - rs <- requireReaders settingReaders [opt-env-conf-test] - es <- asks ppEnvEnv [opt-env-conf-test] - let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test] - -- Run the parser on all specified env vars before [opt-env-conf-test] - -- returning the first because we want to fail if any [opt-env-conf-test] - -- of them fail, even if they wouldn't be the parse [opt-env-conf-test] - -- result. [opt-env-conf-test] - results <- for founds $ \varStr -> [opt-env-conf-test] - case tryReaders rs varStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on env: ", [opt-env-conf-test] - chunk $ T.pack $ show varStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure a [opt-env-conf-test] - case listToMaybe results of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on env vars, no var: ", [opt-env-conf-test] - chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - [opt-env-conf-test] - case mEnv of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mConfDoc = settingConfDoc set [opt-env-conf-test] - mConf <- case settingConfigVals of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just confSets -> do [opt-env-conf-test] - mObj <- asks ppEnvConf [opt-env-conf-test] - case mObj of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["no config object to set from"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just obj -> do [opt-env-conf-test] - let goConfSet ConfigValSetting {..} = do [opt-env-conf-test] - let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test] - jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test] - case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] - let toRes = \case [opt-env-conf-test] - Nothing -> NotFound [opt-env-conf-test] - Just a -> Found a [opt-env-conf-test] - let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test] - goConfSets confSets [opt-env-conf-test] - case mConf of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> [opt-env-conf-test] - case settingDefaultValue of [opt-env-conf-test] - Just (a, _) -> do [opt-env-conf-test] - debug ["set to default value"] [opt-env-conf-test] - pure a -- Don't mark as parsed [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test] - maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] - NE.nonEmpty $ [opt-env-conf-test] - catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:283:11-42 [opt-env-conf-test] @@ -280,178 +280,175 @@ [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mArg of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mSwitch <- case settingSwitchValue of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  mS <- ppSwitch settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on switch, no switch: ", [opt-env-conf-test]  chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just () -> cap $ do [opt-env-conf-test]  debug ["set based on switch."] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mSwitch of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  mOpt <- [opt-env-conf-test]  if settingTryOption [opt-env-conf-test]  then do [opt-env-conf-test]  -- Require readers before finding the option so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  mS <- ppOpt settingDasheds [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on options, no option: ", [opt-env-conf-test]  chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just optionStr -> cap $ [opt-env-conf-test]  case tryReaders rs optionStr of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on option: ", [opt-env-conf-test]  chunk $ T.pack $ show optionStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mOpt of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mEnvDoc = settingEnvDoc set [opt-env-conf-test]  mEnv <- cap $ case settingEnvVars of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  -- Require readers before finding the env vars so the parser [opt-env-conf-test]  -- always fails if it's missing a reader. [opt-env-conf-test]  rs <- requireReaders settingReaders [opt-env-conf-test]  es <- asks ppEnvEnv [opt-env-conf-test]  let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test]  -- Run the parser on all specified env vars before [opt-env-conf-test]  -- returning the first because we want to fail if any [opt-env-conf-test]  -- of them fail, even if they wouldn't be the parse [opt-env-conf-test]  -- result. [opt-env-conf-test]  results <- for founds $ \varStr -> [opt-env-conf-test]  case tryReaders rs varStr of [opt-env-conf-test]  Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test]  Right a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on env: ", [opt-env-conf-test]  chunk $ T.pack $ show varStr [opt-env-conf-test]  ] [opt-env-conf-test]  pure a [opt-env-conf-test]  case listToMaybe results of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on env vars, no var: ", [opt-env-conf-test]  chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test]  ] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  [opt-env-conf-test]  case mEnv of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> do [opt-env-conf-test]  let mConfDoc = settingConfDoc set [opt-env-conf-test]  mConf <- case settingConfigVals of [opt-env-conf-test]  Nothing -> pure NotRun [opt-env-conf-test]  Just confSets -> do [opt-env-conf-test]  mObj <- asks ppEnvConf [opt-env-conf-test]  case mObj of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["no config object to set from"] [opt-env-conf-test]  pure NotFound [opt-env-conf-test]  Just obj -> do [opt-env-conf-test]  let goConfSet ConfigValSetting {..} = do [opt-env-conf-test]  let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test]  jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test]  Just ne -> do [opt-env-conf-test]  res <- goConfSet confSet [opt-env-conf-test]  case res of [opt-env-conf-test]  Just a -> pure $ Found a [opt-env-conf-test]  Nothing -> goConfSets ne [opt-env-conf-test]  goConfSets confSets [opt-env-conf-test]  case mConf of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test]  _ -> [opt-env-conf-test]  case settingDefaultValue of [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:283:11-42 [opt-env-conf-test] @@ -280,178 +280,10 @@ [opt-env-conf-test]  pure $ Found a [opt-env-conf-test]  else pure NotRun [opt-env-conf-test]  [opt-env-conf-test]  case mArg of [opt-env-conf-test]  Found a -> do [opt-env-conf-test]  markParsed [opt-env-conf-test]  pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - mSwitch <- case settingSwitchValue of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - mS <- ppSwitch settingDasheds [opt-env-conf-test] - case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on switch, no switch: ", [opt-env-conf-test] - chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just () -> cap $ do [opt-env-conf-test] - debug ["set based on switch."] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test] - [opt-env-conf-test] - case mSwitch of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - mOpt <- [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] - then do [opt-env-conf-test] - -- Require readers before finding the option so the parser [opt-env-conf-test] - -- always fails if it's missing a reader. [opt-env-conf-test] - rs <- requireReaders settingReaders [opt-env-conf-test] - mS <- ppOpt settingDasheds [opt-env-conf-test] - case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on options, no option: ", [opt-env-conf-test] - chunk $ T.pack $ show $ map renderDashed settingDasheds [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just optionStr -> cap $ [opt-env-conf-test] - case tryReaders rs optionStr of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorOptionRead mOptDoc err [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on option: ", [opt-env-conf-test] - chunk $ T.pack $ show optionStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Found a [opt-env-conf-test] - else pure NotRun [opt-env-conf-test] - [opt-env-conf-test] - case mOpt of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mEnvDoc = settingEnvDoc set [opt-env-conf-test] - mEnv <- cap $ case settingEnvVars of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - -- Require readers before finding the env vars so the parser [opt-env-conf-test] - -- always fails if it's missing a reader. [opt-env-conf-test] - rs <- requireReaders settingReaders [opt-env-conf-test] - es <- asks ppEnvEnv [opt-env-conf-test] - let founds = mapMaybe ((`EnvMap.lookup` es) . envVarSettingVar) (NE.toList ne) [opt-env-conf-test] - -- Run the parser on all specified env vars before [opt-env-conf-test] - -- returning the first because we want to fail if any [opt-env-conf-test] - -- of them fail, even if they wouldn't be the parse [opt-env-conf-test] - -- result. [opt-env-conf-test] - results <- for founds $ \varStr -> [opt-env-conf-test] - case tryReaders rs varStr of [opt-env-conf-test] - Left errs -> ppError mLoc $ ParseErrorEnvRead mEnvDoc errs [opt-env-conf-test] - Right a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on env: ", [opt-env-conf-test] - chunk $ T.pack $ show varStr [opt-env-conf-test] - ] [opt-env-conf-test] - pure a [opt-env-conf-test] - case listToMaybe results of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on env vars, no var: ", [opt-env-conf-test] - chunk $ T.pack $ show $ maybe [] NE.toList settingEnvVars [opt-env-conf-test] - ] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - [opt-env-conf-test] - case mEnv of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> do [opt-env-conf-test] - let mConfDoc = settingConfDoc set [opt-env-conf-test] - mConf <- case settingConfigVals of [opt-env-conf-test] - Nothing -> pure NotRun [opt-env-conf-test] - Just confSets -> do [opt-env-conf-test] - mObj <- asks ppEnvConf [opt-env-conf-test] - case mObj of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["no config object to set from"] [opt-env-conf-test] - pure NotFound [opt-env-conf-test] - Just obj -> do [opt-env-conf-test] - let goConfSet ConfigValSetting {..} = do [opt-env-conf-test] - let jsonParser :: JSON.Object -> NonEmpty String -> JSON.Parser (Maybe JSON.Value) [opt-env-conf-test] - jsonParser o (k :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - case KeyMap.lookup (Key.fromString k) o of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just v -> Just <$> parseJSON v [opt-env-conf-test] - Just neRest -> do [opt-env-conf-test] - mO' <- o .:? Key.fromString k [opt-env-conf-test] - case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test] - Just o' -> jsonParser o' neRest [opt-env-conf-test] - case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mV -> case mV of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, not configured: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test] - Right mA -> case mA of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test] - chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test] - ] [opt-env-conf-test] - pure Nothing [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - debug [opt-env-conf-test] - [ "set based on config value: ", [opt-env-conf-test] - chunk $ T.pack $ show v [opt-env-conf-test] - ] [opt-env-conf-test] - pure $ Just a [opt-env-conf-test] - let toRes = \case [opt-env-conf-test] - Nothing -> NotFound [opt-env-conf-test] - Just a -> Found a [opt-env-conf-test] - let goConfSets (confSet :| rest) = case NE.nonEmpty rest of [opt-env-conf-test] - Nothing -> toRes <$> goConfSet confSet [opt-env-conf-test] - Just ne -> do [opt-env-conf-test] - res <- goConfSet confSet [opt-env-conf-test] - case res of [opt-env-conf-test] - Just a -> pure $ Found a [opt-env-conf-test] - Nothing -> goConfSets ne [opt-env-conf-test] - goConfSets confSets [opt-env-conf-test] - case mConf of [opt-env-conf-test] - Found a -> do [opt-env-conf-test] - markParsed [opt-env-conf-test] - pure a [opt-env-conf-test] - _ -> [opt-env-conf-test] - case settingDefaultValue of [opt-env-conf-test] - Just (a, _) -> do [opt-env-conf-test] - debug ["set to default value"] [opt-env-conf-test] - pure a -- Don't mark as parsed [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - let parseResultError e res = case res of [opt-env-conf-test] - NotRun -> Nothing [opt-env-conf-test] - NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test] - maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test] - NE.nonEmpty $ [opt-env-conf-test] - catMaybes [opt-env-conf-test] - [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test] - parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test] - parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test] - parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test] - parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test] - ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Reader.hs:78:41-20 [opt-env-conf-test] @@ -75,9 +75,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Turn a 'Maybe' parsing function into a 'Reader' [opt-env-conf-test]  maybeReader :: (String -> Maybe a) -> Reader a [opt-env-conf-test]  maybeReader func = eitherReader $ \s -> case func s of [opt-env-conf-test] - Nothing -> Left $ "Unparseable value: " <> show s [opt-env-conf-test]  Just a -> Right a [opt-env-conf-test]  [opt-env-conf-test]  -- | Turn an 'Either' parsing function into a 'Reader' [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Reader.hs:78:41-20 [opt-env-conf-test] @@ -75,9 +75,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Turn a 'Maybe' parsing function into a 'Reader' [opt-env-conf-test]  maybeReader :: (String -> Maybe a) -> Reader a [opt-env-conf-test]  maybeReader func = eitherReader $ \s -> case func s of [opt-env-conf-test]  Nothing -> Left $ "Unparseable value: " <> show s [opt-env-conf-test] - Just a -> Right a [opt-env-conf-test]  [opt-env-conf-test]  -- | Turn an 'Either' parsing function into a 'Reader' [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Reader.hs:70:32-36 [opt-env-conf-test] @@ -67,7 +67,7 @@ [opt-env-conf-test]  -- [opt-env-conf-test]  -- > exists = Reader $ const $ pure True [opt-env-conf-test]  exists :: Reader Bool [opt-env-conf-test] -exists = Reader $ const $ pure True [opt-env-conf-test] +exists = Reader $ const $ pure False [opt-env-conf-test]  [opt-env-conf-test]  -- | Read a value as if it were specified as a 'String' and parsed via the given 'Codec'. [opt-env-conf-test]  viaStringCodec :: (HasCodec a) => Reader a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Reader.hs:62:23-20 [opt-env-conf-test] @@ -59,9 +59,8 @@ [opt-env-conf-test]  -- [opt-env-conf-test]  -- You cannot use this for bare strings, because 'Read' for strings parses quotes. [opt-env-conf-test]  auto :: (Read a) => Reader a [opt-env-conf-test]  auto = Reader $ \s -> case readMaybe s of [opt-env-conf-test] - Nothing -> Left $ "Un-Read-able value: " <> show s [opt-env-conf-test]  Just a -> Right a [opt-env-conf-test]  [opt-env-conf-test]  -- | Always return True [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Reader.hs:62:23-20 [opt-env-conf-test] @@ -59,9 +59,8 @@ [opt-env-conf-test]  -- [opt-env-conf-test]  -- You cannot use this for bare strings, because 'Read' for strings parses quotes. [opt-env-conf-test]  auto :: (Read a) => Reader a [opt-env-conf-test]  auto = Reader $ \s -> case readMaybe s of [opt-env-conf-test]  Nothing -> Left $ "Un-Read-able value: " <> show s [opt-env-conf-test] - Just a -> Right a [opt-env-conf-test]  [opt-env-conf-test]  -- | Always return True [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:254:20-23 [opt-env-conf-test] @@ -251,9 +251,8 @@ [opt-env-conf-test]  before <- get [opt-env-conf-test]  mA <- func [opt-env-conf-test]  case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - put before [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> pure (Just a) [opt-env-conf-test]  [opt-env-conf-test]  -- Completions for many/some: try the parser repeatedly. [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:257:25-31 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  put before [opt-env-conf-test]  pure Nothing [opt-env-conf-test] - Just a -> pure (Just a) [opt-env-conf-test] + Just a -> pure (Nothing) [opt-env-conf-test]  [opt-env-conf-test]  -- Completions for many/some: try the parser repeatedly. [opt-env-conf-test]  -- Each iteration either advances the args state (consuming input) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:307:18-42 [opt-env-conf-test] @@ -304,9 +304,8 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just cs1 -> do [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case p2s of [opt-env-conf-test] - Nothing -> Nothing [opt-env-conf-test]  Just cs2 -> pure $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  -- Nothing means "this branch was not valid" [opt-env-conf-test]  -- Just [] means "no completions" [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:307:18-42 [opt-env-conf-test] @@ -304,9 +304,8 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just cs1 -> do [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case p2s of [opt-env-conf-test]  Nothing -> Nothing [opt-env-conf-test] - Just cs2 -> pure $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  -- Nothing means "this branch was not valid" [opt-env-conf-test]  -- Just [] means "no completions" [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:296:31-38 [opt-env-conf-test] @@ -293,7 +293,7 @@ [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case (p1s, p2s) of [opt-env-conf-test]  (Nothing, Nothing) -> Nothing [opt-env-conf-test] - (Just cs, Nothing) -> Just cs [opt-env-conf-test] + (Just cs, Nothing) -> Nothing [opt-env-conf-test]  (Nothing, Just cs) -> Just cs [opt-env-conf-test]  (Just cs1, Just cs2) -> Just $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:297:31-38 [opt-env-conf-test] @@ -294,7 +294,7 @@ [opt-env-conf-test]  pure $ case (p1s, p2s) of [opt-env-conf-test]  (Nothing, Nothing) -> Nothing [opt-env-conf-test]  (Just cs, Nothing) -> Just cs [opt-env-conf-test] - (Nothing, Just cs) -> Just cs [opt-env-conf-test] + (Nothing, Just cs) -> Nothing [opt-env-conf-test]  (Just cs1, Just cs2) -> Just $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  andCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf-test] @@ -291,11 +291,10 @@ [opt-env-conf-test]  orCompletions p1 p2 = do [opt-env-conf-test]  p1s <- tryOrRestore $ go p1 [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case (p1s, p2s) of [opt-env-conf-test] - (Nothing, Nothing) -> Nothing [opt-env-conf-test]  (Just cs, Nothing) -> Just cs [opt-env-conf-test]  (Nothing, Just cs) -> Just cs [opt-env-conf-test]  (Just cs1, Just cs2) -> Just $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  andCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test]  andCompletions p1 p2 = do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf-test] @@ -291,11 +291,10 @@ [opt-env-conf-test]  orCompletions p1 p2 = do [opt-env-conf-test]  p1s <- tryOrRestore $ go p1 [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case (p1s, p2s) of [opt-env-conf-test]  (Nothing, Nothing) -> Nothing [opt-env-conf-test] - (Just cs, Nothing) -> Just cs [opt-env-conf-test]  (Nothing, Just cs) -> Just cs [opt-env-conf-test]  (Just cs1, Just cs2) -> Just $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  andCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test]  andCompletions p1 p2 = do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf-test] @@ -291,11 +291,10 @@ [opt-env-conf-test]  orCompletions p1 p2 = do [opt-env-conf-test]  p1s <- tryOrRestore $ go p1 [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case (p1s, p2s) of [opt-env-conf-test]  (Nothing, Nothing) -> Nothing [opt-env-conf-test]  (Just cs, Nothing) -> Just cs [opt-env-conf-test] - (Nothing, Just cs) -> Just cs [opt-env-conf-test]  (Just cs1, Just cs2) -> Just $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  andCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test]  andCompletions p1 p2 = do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:294:14-50 [opt-env-conf-test] @@ -291,11 +291,10 @@ [opt-env-conf-test]  orCompletions p1 p2 = do [opt-env-conf-test]  p1s <- tryOrRestore $ go p1 [opt-env-conf-test]  p2s <- tryOrRestore $ go p2 [opt-env-conf-test]  pure $ case (p1s, p2s) of [opt-env-conf-test]  (Nothing, Nothing) -> Nothing [opt-env-conf-test]  (Just cs, Nothing) -> Just cs [opt-env-conf-test]  (Nothing, Just cs) -> Just cs [opt-env-conf-test] - (Just cs1, Just cs2) -> Just $ cs1 ++ cs2 [opt-env-conf-test]  [opt-env-conf-test]  andCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test]  andCompletions p1 p2 = do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just os -> do [opt-env-conf-test]  after <- get [opt-env-conf-test] - if after == before [opt-env-conf-test] + if True [opt-env-conf-test]  then -- State did not advance; return these completions. [opt-env-conf-test]  pure $ Just os [opt-env-conf-test]  else -- State advanced: something was consumed. Try the [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just os -> do [opt-env-conf-test]  after <- get [opt-env-conf-test] - if after == before [opt-env-conf-test] + if False [opt-env-conf-test]  then -- State did not advance; return these completions. [opt-env-conf-test]  pure $ Just os [opt-env-conf-test]  else -- State advanced: something was consumed. Try the [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just os -> do [opt-env-conf-test]  after <- get [opt-env-conf-test] - if after == before [opt-env-conf-test] + if not (after == before) [opt-env-conf-test]  then -- State did not advance; return these completions. [opt-env-conf-test]  pure $ Just os [opt-env-conf-test]  else -- State advanced: something was consumed. Try the [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:274:22-29 [opt-env-conf-test] @@ -271,7 +271,7 @@ [opt-env-conf-test]  after <- get [opt-env-conf-test]  if after == before [opt-env-conf-test]  then -- State did not advance; return these completions. [opt-env-conf-test] - pure $ Just os [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  else -- State advanced: something was consumed. Try the [opt-env-conf-test]  -- next iteration. Its completions supersede ours [opt-env-conf-test]  -- only if it also has a valid result. [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:281:37-44 [opt-env-conf-test] @@ -278,7 +278,7 @@ [opt-env-conf-test]  do [opt-env-conf-test]  mMore <- manyCompletions p [opt-env-conf-test]  case mMore of [opt-env-conf-test] - Nothing -> pure $ Just os [opt-env-conf-test] + Nothing -> pure $ Nothing [opt-env-conf-test]  Just more [opt-env-conf-test]  -- If the next iteration only produced stale [opt-env-conf-test]  -- dashed suggestions (state didn't advance [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:287:23-30 [opt-env-conf-test] @@ -284,7 +284,7 @@ [opt-env-conf-test]  -- dashed suggestions (state didn't advance [opt-env-conf-test]  -- further), prefer our completions which came [opt-env-conf-test]  -- from the advancing iteration. [opt-env-conf-test] - | null os -> pure $ Just more [opt-env-conf-test] + | True -> pure $ Just more [opt-env-conf-test]  | otherwise -> pure $ Just os [opt-env-conf-test]  [opt-env-conf-test]  orCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:287:23-30 [opt-env-conf-test] @@ -284,7 +284,7 @@ [opt-env-conf-test]  -- dashed suggestions (state didn't advance [opt-env-conf-test]  -- further), prefer our completions which came [opt-env-conf-test]  -- from the advancing iteration. [opt-env-conf-test] - | null os -> pure $ Just more [opt-env-conf-test] + | not (null os) -> pure $ Just more [opt-env-conf-test]  | otherwise -> pure $ Just os [opt-env-conf-test]  [opt-env-conf-test]  orCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:287:41-50 [opt-env-conf-test] @@ -284,7 +284,7 @@ [opt-env-conf-test]  -- dashed suggestions (state didn't advance [opt-env-conf-test]  -- further), prefer our completions which came [opt-env-conf-test]  -- from the advancing iteration. [opt-env-conf-test] - | null os -> pure $ Just more [opt-env-conf-test] + | null os -> pure $ Nothing [opt-env-conf-test]  | otherwise -> pure $ Just os [opt-env-conf-test]  [opt-env-conf-test]  orCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:288:43-50 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  -- further), prefer our completions which came [opt-env-conf-test]  -- from the advancing iteration. [opt-env-conf-test]  | null os -> pure $ Just more [opt-env-conf-test] - | otherwise -> pure $ Just os [opt-env-conf-test] + | otherwise -> pure $ Nothing [opt-env-conf-test]  [opt-env-conf-test]  orCompletions :: Parser x -> Parser y -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test]  orCompletions p1 p2 = do [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:315:30-37 [opt-env-conf-test] @@ -312,7 +312,7 @@ [opt-env-conf-test]  -- Just [] means "no completions" [opt-env-conf-test]  go :: Parser a -> State Args (Maybe [Completion Suggestion]) [opt-env-conf-test]  go = \case [opt-env-conf-test] - ParserPure _ -> pure $ Just [] [opt-env-conf-test] + ParserPure _ -> pure $ Nothing [opt-env-conf-test]  -- Parse both and combine the result [opt-env-conf-test]  ParserAp p1 p2 -> andCompletions p1 p2 [opt-env-conf-test]  -- Parse either: either completions are valid [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  fmap combineOptions $ forM possibilities $ \(mArg, rest) -> do [opt-env-conf-test]  case mArg of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - if argsAtEnd rest [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  let arg = fromMaybe "" mCursorArg [opt-env-conf-test]  let matchingCommands = filter ((arg `isPrefixOf`) . commandArg) cs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  fmap combineOptions $ forM possibilities $ \(mArg, rest) -> do [opt-env-conf-test]  case mArg of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - if argsAtEnd rest [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  let arg = fromMaybe "" mCursorArg [opt-env-conf-test]  let matchingCommands = filter ((arg `isPrefixOf`) . commandArg) cs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:340:20-34 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  fmap combineOptions $ forM possibilities $ \(mArg, rest) -> do [opt-env-conf-test]  case mArg of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - if argsAtEnd rest [opt-env-conf-test] + if not (argsAtEnd rest) [opt-env-conf-test]  then do [opt-env-conf-test]  let arg = fromMaybe "" mCursorArg [opt-env-conf-test]  let matchingCommands = filter ((arg `isPrefixOf`) . commandArg) cs [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:350:59-75 [opt-env-conf-test] @@ -347,7 +347,7 @@ [opt-env-conf-test]  ( \Command {..} -> [opt-env-conf-test]  Completion [opt-env-conf-test]  { completionSuggestion = SuggestionBare commandArg, [opt-env-conf-test] - completionDescription = Just commandHelp [opt-env-conf-test] + completionDescription = Nothing [opt-env-conf-test]  } [opt-env-conf-test]  ) [opt-env-conf-test]  matchingCommands [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:361:29-32 [opt-env-conf-test] @@ -358,9 +358,8 @@ [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just arg -> [opt-env-conf-test]  case find ((== arg) . commandArg) cs of [opt-env-conf-test]  Just c -> do [opt-env-conf-test] - put rest [opt-env-conf-test]  goCommand c [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  -- If there is a default command, also try completing within [opt-env-conf-test]  -- the default command's parser, since that is what would run [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:360:17-42 [opt-env-conf-test] @@ -357,11 +357,8 @@ [opt-env-conf-test]  -- name then the remaining args have nowhere to go. [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just arg -> [opt-env-conf-test]  case find ((== arg) . commandArg) cs of [opt-env-conf-test] - Just c -> do [opt-env-conf-test] - put rest [opt-env-conf-test] - goCommand c [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  -- If there is a default command, also try completing within [opt-env-conf-test]  -- the default command's parser, since that is what would run [opt-env-conf-test]  -- if the user provides no command. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:360:17-42 [opt-env-conf-test] @@ -357,11 +357,10 @@ [opt-env-conf-test]  -- name then the remaining args have nowhere to go. [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just arg -> [opt-env-conf-test]  case find ((== arg) . commandArg) cs of [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  put rest [opt-env-conf-test]  goCommand c [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test]  -- If there is a default command, also try completing within [opt-env-conf-test]  -- the default command's parser, since that is what would run [opt-env-conf-test]  -- if the user provides no command. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:378:19-31 [opt-env-conf-test] @@ -375,7 +375,7 @@ [opt-env-conf-test]  -- If no args were consumed (we were already at end), [opt-env-conf-test]  -- combine the explicit command listing with the default [opt-env-conf-test]  -- command's completions. [opt-env-conf-test] - | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test] + | True -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test]  | otherwise -> do [opt-env-conf-test]  -- The default command consumed args, so its [opt-env-conf-test]  -- completions are valid. But we must restore [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:378:19-31 [opt-env-conf-test] @@ -375,7 +375,7 @@ [opt-env-conf-test]  -- If no args were consumed (we were already at end), [opt-env-conf-test]  -- combine the explicit command listing with the default [opt-env-conf-test]  -- command's completions. [opt-env-conf-test] - | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test] + | not (argsAtEnd as) -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test]  | otherwise -> do [opt-env-conf-test]  -- The default command consumed args, so its [opt-env-conf-test]  -- completions are valid. But we must restore [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:378:86-94 [opt-env-conf-test] @@ -375,7 +375,7 @@ [opt-env-conf-test]  -- If no args were consumed (we were already at end), [opt-env-conf-test]  -- combine the explicit command listing with the default [opt-env-conf-test]  -- command's completions. [opt-env-conf-test] - | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test] + | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Nothing] [opt-env-conf-test]  | otherwise -> do [opt-env-conf-test]  -- The default command consumed args, so its [opt-env-conf-test]  -- completions are valid. But we must restore [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:378:57-95 [opt-env-conf-test] @@ -375,7 +375,6 @@ [opt-env-conf-test]  -- If no args were consumed (we were already at end), [opt-env-conf-test]  -- combine the explicit command listing with the default [opt-env-conf-test]  -- command's completions. [opt-env-conf-test] - | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test]  | otherwise -> do [opt-env-conf-test]  -- The default command consumed args, so its [opt-env-conf-test]  -- completions are valid. But we must restore [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:378:57-95 [opt-env-conf-test] @@ -375,7 +375,6 @@ [opt-env-conf-test]  -- If no args were consumed (we were already at end), [opt-env-conf-test]  -- combine the explicit command listing with the default [opt-env-conf-test]  -- command's completions. [opt-env-conf-test] - | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test]  | otherwise -> do [opt-env-conf-test]  -- The default command consumed args, so its [opt-env-conf-test]  -- completions are valid. But we must restore [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:388:28-36 [opt-env-conf-test] @@ -385,7 +385,7 @@ [opt-env-conf-test]  -- --archive-dir that the default command [opt-env-conf-test]  -- swallowed as a positional argument. [opt-env-conf-test]  put as [opt-env-conf-test] - pure $ Just dcs [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  ParserSetting _ Setting {..} -> do [opt-env-conf-test]  let arg = fromMaybe "" mCursorArg [opt-env-conf-test]  let completionDescription = settingHelp [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf-test] @@ -81,27 +81,8 @@ [opt-env-conf-test]  Nothing -> pure result [opt-env-conf-test]  Just leftovers -> ppError Nothing $ ParseErrorUnrecognised leftovers [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test]  Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test] - Just ((errOrRes, _), nexts) -> case errOrRes of [opt-env-conf-test] - Success a -> pure (Right a) [opt-env-conf-test] - Failure firstErrors -> [opt-env-conf-test] - let goNexts ns = do [opt-env-conf-test] - -- TODO: Consider keeping around all errors? [opt-env-conf-test] - mNext <- runNonDetTLazy ns [opt-env-conf-test] - case mNext of [opt-env-conf-test] - Nothing -> [opt-env-conf-test] - pure $ [opt-env-conf-test] - Left $ [opt-env-conf-test] - -- Only show source locations in debug mode. [opt-env-conf-test] - let f = case mDebugMode of [opt-env-conf-test] - Nothing -> eraseErrorSrcLocs [opt-env-conf-test] - Just _ -> id [opt-env-conf-test] - in f firstErrors [opt-env-conf-test] - Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test] - Success a -> pure (Right a) [opt-env-conf-test] - Failure _ -> goNexts ns' [opt-env-conf-test] - in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test]  Parser a -> [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:379:32-36 [opt-env-conf-test] @@ -376,16 +376,15 @@ [opt-env-conf-test]  -- combine the explicit command listing with the default [opt-env-conf-test]  -- command's completions. [opt-env-conf-test]  | argsAtEnd as -> pure $ combineOptions [explicitCommandCompletions, Just dcs] [opt-env-conf-test]  | otherwise -> do [opt-env-conf-test]  -- The default command consumed args, so its [opt-env-conf-test]  -- completions are valid. But we must restore [opt-env-conf-test]  -- the state: the consumed args may also be [opt-env-conf-test]  -- intended for sibling parsers in an [opt-env-conf-test]  -- applicative (<*>), e.g. an option like [opt-env-conf-test]  -- --archive-dir that the default command [opt-env-conf-test]  -- swallowed as a positional argument. [opt-env-conf-test] - put as [opt-env-conf-test]  pure $ Just dcs [opt-env-conf-test]  ParserSetting _ Setting {..} -> do [opt-env-conf-test]  let arg = fromMaybe "" mCursorArg [opt-env-conf-test]  let completionDescription = settingHelp [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:219:15-39 [opt-env-conf-test] @@ -216,11 +216,8 @@ [opt-env-conf-test]  debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test] - Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test] - go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf-test] @@ -222,7 +222,6 @@ [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["loading config"] [opt-env-conf-test]  mNewConfig <- ppIndent $ go pc [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:219:15-39 [opt-env-conf-test] @@ -216,11 +216,10 @@ [opt-env-conf-test]  debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test] - Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:222:25-73 [opt-env-conf-test] @@ -219,7 +219,6 @@ [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:207:11-39 [opt-env-conf-test] @@ -204,23 +204,17 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mS <- ppArg [opt-env-conf-test]  let docsForErrors = map (void . commandParserDocs) cs [opt-env-conf-test]  case mS of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["No argument found for choosing a command."] [opt-env-conf-test]  let mDefaultCommand = do [opt-env-conf-test]  d <- mDefault [opt-env-conf-test]  find ((== d) . commandArg) cs [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test]  Just dc -> do [opt-env-conf-test]  debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test] - Just s -> do [opt-env-conf-test] - case find ((== s) . commandArg) cs of [opt-env-conf-test] - Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test] - Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test] - go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:221:27-39 [opt-env-conf-test] @@ -218,9 +218,8 @@ [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:207:11-39 [opt-env-conf-test] @@ -204,23 +204,13 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mS <- ppArg [opt-env-conf-test]  let docsForErrors = map (void . commandParserDocs) cs [opt-env-conf-test]  case mS of [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["No argument found for choosing a command."] [opt-env-conf-test] - let mDefaultCommand = do [opt-env-conf-test] - d <- mDefault [opt-env-conf-test] - find ((== d) . commandArg) cs [opt-env-conf-test] - case mDefaultCommand of [opt-env-conf-test] - Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test] - Just dc -> do [opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test] - go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:222:25-73 [opt-env-conf-test] @@ -219,7 +219,6 @@ [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:225:15-66 [opt-env-conf-test] @@ -222,7 +222,6 @@ [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["loading config"] [opt-env-conf-test]  mNewConfig <- ppIndent $ go pc [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf-test] @@ -141,7 +141,6 @@ [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  a <- go p' [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:143:29-25 [opt-env-conf-test] @@ -140,13 +140,12 @@ [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  a <- go p' [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf-test] @@ -395,7 +395,7 @@ [opt-env-conf-test]  pure Completion {..} [opt-env-conf-test]  let completeWithCompleterAtEnd = do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if argsAtEnd as then completeWithCompleter else pure $ Just [] [opt-env-conf-test] + if True then completeWithCompleter else pure $ Just [] [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf-test] @@ -395,7 +395,7 @@ [opt-env-conf-test]  pure Completion {..} [opt-env-conf-test]  let completeWithCompleterAtEnd = do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if argsAtEnd as then completeWithCompleter else pure $ Just [] [opt-env-conf-test] + if False then completeWithCompleter else pure $ Just [] [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:398:18-30 [opt-env-conf-test] @@ -395,7 +395,7 @@ [opt-env-conf-test]  pure Completion {..} [opt-env-conf-test]  let completeWithCompleterAtEnd = do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if argsAtEnd as then completeWithCompleter else pure $ Just [] [opt-env-conf-test] + if not (argsAtEnd as) then completeWithCompleter else pure $ Just [] [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:398:70-77 [opt-env-conf-test] @@ -395,7 +395,7 @@ [opt-env-conf-test]  pure Completion {..} [opt-env-conf-test]  let completeWithCompleterAtEnd = do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if argsAtEnd as then completeWithCompleter else pure $ Just [] [opt-env-conf-test] + if argsAtEnd as then completeWithCompleter else pure $ Nothing [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Completion.hs:401:37-41 [opt-env-conf-test] @@ -398,7 +398,7 @@ [opt-env-conf-test]  if argsAtEnd as then completeWithCompleter else pure $ Just [] [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test] - DashedLong _ -> True [opt-env-conf-test] + DashedLong _ -> False [opt-env-conf-test]  DashedShort _ -> False [opt-env-conf-test]  let favorableDasheds = if any isLong settingDasheds then filter isLong settingDasheds else settingDasheds [opt-env-conf-test]  let suggestions = filter (arg `isPrefixOf`) (map Args.renderDashed favorableDasheds) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Completion.hs:402:38-43 [opt-env-conf-test] @@ -399,7 +399,7 @@ [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test] - DashedShort _ -> False [opt-env-conf-test] + DashedShort _ -> True [opt-env-conf-test]  let favorableDasheds = if any isLong settingDasheds then filter isLong settingDasheds else settingDasheds [opt-env-conf-test]  let suggestions = filter (arg `isPrefixOf`) (map Args.renderDashed favorableDasheds) [opt-env-conf-test]  let completions = [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf-test] @@ -400,7 +400,7 @@ [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test]  DashedShort _ -> False [opt-env-conf-test] - let favorableDasheds = if any isLong settingDasheds then filter isLong settingDasheds else settingDasheds [opt-env-conf-test] + let favorableDasheds = if True then filter isLong settingDasheds else settingDasheds [opt-env-conf-test]  let suggestions = filter (arg `isPrefixOf`) (map Args.renderDashed favorableDasheds) [opt-env-conf-test]  let completions = [opt-env-conf-test]  map [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf-test] @@ -400,7 +400,7 @@ [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test]  DashedShort _ -> False [opt-env-conf-test] - let favorableDasheds = if any isLong settingDasheds then filter isLong settingDasheds else settingDasheds [opt-env-conf-test] + let favorableDasheds = if False then filter isLong settingDasheds else settingDasheds [opt-env-conf-test]  let suggestions = filter (arg `isPrefixOf`) (map Args.renderDashed favorableDasheds) [opt-env-conf-test]  let completions = [opt-env-conf-test]  map [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:403:41-66 [opt-env-conf-test] @@ -400,7 +400,7 @@ [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test]  DashedShort _ -> False [opt-env-conf-test] - let favorableDasheds = if any isLong settingDasheds then filter isLong settingDasheds else settingDasheds [opt-env-conf-test] + let favorableDasheds = if not (any isLong settingDasheds) then filter isLong settingDasheds else settingDasheds [opt-env-conf-test]  let suggestions = filter (arg `isPrefixOf`) (map Args.renderDashed favorableDasheds) [opt-env-conf-test]  let completions = [opt-env-conf-test]  map [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf-test] @@ -411,7 +411,7 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  suggestions [opt-env-conf-test]  pure $ Just completions [opt-env-conf-test] - if settingHidden [opt-env-conf-test] + if True [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf-test] @@ -411,7 +411,7 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  suggestions [opt-env-conf-test]  pure $ Just completions [opt-env-conf-test] - if settingHidden [opt-env-conf-test] + if False [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:414:12-25 [opt-env-conf-test] @@ -411,7 +411,7 @@ [opt-env-conf-test]  ) [opt-env-conf-test]  suggestions [opt-env-conf-test]  pure $ Just completions [opt-env-conf-test] - if settingHidden [opt-env-conf-test] + if not (settingHidden) [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:415:23-30 [opt-env-conf-test] @@ -412,7 +412,7 @@ [opt-env-conf-test]  suggestions [opt-env-conf-test]  pure $ Just completions [opt-env-conf-test]  if settingHidden [opt-env-conf-test] - then pure $ Just [] [opt-env-conf-test] + then pure $ Nothing [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test]  if settingTryArgument [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf-test] @@ -415,7 +415,7 @@ [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if settingTryArgument [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  let possibilities = Args.consumeArgument as [opt-env-conf-test]  -- Try all possible consumptions of the argument. [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:413:22-38 [opt-env-conf-test] @@ -410,7 +410,7 @@ [opt-env-conf-test]  . SuggestionBare [opt-env-conf-test]  ) [opt-env-conf-test]  suggestions [opt-env-conf-test] - pure $ Just completions [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  if settingHidden [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf-test] @@ -85,10 +85,9 @@ [opt-env-conf-test]  in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test] - (Nothing, _) -> o2 [opt-env-conf-test]  (Just ot1, Nothing) -> o2 {optionType = Just ot1} [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:127:11-31 [opt-env-conf-test] @@ -124,13 +124,10 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["Left side failed, trying right side."] [opt-env-conf-test] - ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf-test] @@ -415,7 +415,7 @@ [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if settingTryArgument [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  let possibilities = Args.consumeArgument as [opt-env-conf-test]  -- Try all possible consumptions of the argument. [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:101:41-43 [opt-env-conf-test] @@ -98,9 +98,8 @@ [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test] - Success a -> pure (Right a) [opt-env-conf-test]  Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf-test] @@ -432,11 +432,8 @@ [opt-env-conf-test]  -- consumeArgument) or because only the consume-nothing [opt-env-conf-test]  -- fallback matched. In both cases, offer the [opt-env-conf-test]  -- completer if we are at the end. [opt-env-conf-test]  case possibilities of [opt-env-conf-test]  [] -> completeWithCompleterAtEnd [opt-env-conf-test] - (_, as') : _ -> do [opt-env-conf-test] - put as' [opt-env-conf-test] - completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test]  if isJust settingSwitchValue [opt-env-conf-test]  then do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf-test] @@ -432,11 +432,10 @@ [opt-env-conf-test]  -- consumeArgument) or because only the consume-nothing [opt-env-conf-test]  -- fallback matched. In both cases, offer the [opt-env-conf-test]  -- completer if we are at the end. [opt-env-conf-test]  case possibilities of [opt-env-conf-test] - [] -> completeWithCompleterAtEnd [opt-env-conf-test]  (_, as') : _ -> do [opt-env-conf-test]  put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test]  if isJust settingSwitchValue [opt-env-conf-test]  then do [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:428:28-35 [opt-env-conf-test] @@ -425,7 +425,7 @@ [opt-env-conf-test]  case filter (isJust . fst) possibilities of [opt-env-conf-test]  (_, as') : _ -> do [opt-env-conf-test]  put as' [opt-env-conf-test] - pure $ Just [] [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  [] -> [opt-env-conf-test]  -- No possibility consumed a value. This is either [opt-env-conf-test]  -- because there are no args at all (the [] case from [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf-test] @@ -438,7 +438,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test] - if isJust settingSwitchValue [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  -- Try to parse the switch first, so we don't suggest it if [opt-env-conf-test]  -- it's already been parsed. [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:418:16-34 [opt-env-conf-test] @@ -415,7 +415,7 @@ [opt-env-conf-test]  then pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if settingTryArgument [opt-env-conf-test] + if not (settingTryArgument) [opt-env-conf-test]  then do [opt-env-conf-test]  let possibilities = Args.consumeArgument as [opt-env-conf-test]  -- Try all possible consumptions of the argument. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf-test] @@ -438,7 +438,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test] - if isJust settingSwitchValue [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  -- Try to parse the switch first, so we don't suggest it if [opt-env-conf-test]  -- it's already been parsed. [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf-test] @@ -450,7 +450,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  -- First we try to consume the option so we don't suggest it if it's already been parsed [opt-env-conf-test]  case Args.consumeOption settingDasheds as of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf-test] @@ -450,7 +450,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if not (settingTryOption) [opt-env-conf-test]  then do [opt-env-conf-test]  -- First we try to consume the option so we don't suggest it if it's already been parsed [opt-env-conf-test]  case Args.consumeOption settingDasheds as of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf-test] @@ -450,7 +450,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  -- First we try to consume the option so we don't suggest it if it's already been parsed [opt-env-conf-test]  case Args.consumeOption settingDasheds as of [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:459:36-43 [opt-env-conf-test] @@ -456,7 +456,7 @@ [opt-env-conf-test]  case Args.consumeOption settingDasheds as of [opt-env-conf-test]  Just (_, as') -> do [opt-env-conf-test]  put as' [opt-env-conf-test] - pure $ Just [] [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  if argsAtEnd as [opt-env-conf-test]  then completeWithDasheds [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf-test] @@ -458,7 +458,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - if argsAtEnd as [opt-env-conf-test] + if not (argsAtEnd as) [opt-env-conf-test]  then completeWithDasheds [opt-env-conf-test]  else do [opt-env-conf-test]  -- If we're not at the end, we may be between an option's [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:449:35-39 [opt-env-conf-test] @@ -446,9 +446,8 @@ [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  -- A switch can be anywhere, doesn't need to be at the end. [opt-env-conf-test]  completeWithDasheds [opt-env-conf-test]  Just as' -> do [opt-env-conf-test] - put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test]  if settingTryOption [opt-env-conf-test]  then do [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf-test] @@ -175,7 +175,7 @@ [opt-env-conf-test]  map [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test] - notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] + notFinal = True [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf-test] @@ -175,7 +175,7 @@ [opt-env-conf-test]  map [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test] - notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] + notFinal = False [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:178:32-99 [opt-env-conf-test] @@ -175,7 +175,7 @@ [opt-env-conf-test]  map [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test] - notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] + notFinal = not (completionResultFinality completionSuggestion == CompletionNotFinal) [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] - in case (notFinal, completionDescription) of [opt-env-conf-test] + in case (True, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test]  (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] - in case (notFinal, completionDescription) of [opt-env-conf-test] + in case (False, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test]  (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:179:27-35 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] - in case (notFinal, completionDescription) of [opt-env-conf-test] + in case (not (notFinal), completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test]  (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf-test] @@ -176,11 +176,10 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test] - (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test]  (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test]  (True, Just d) -> val <> "\t" <> d <> "\tN" [opt-env-conf-test]  ) [opt-env-conf-test]  evaluatedCompletions [opt-env-conf-test]  else putStr $ unlines $ map (completionResultValue . completionSuggestion) evaluatedCompletions [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf-test] @@ -176,11 +176,10 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test] - (False, Just d) -> val <> "\t" <> d [opt-env-conf-test]  (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test]  (True, Just d) -> val <> "\t" <> d <> "\tN" [opt-env-conf-test]  ) [opt-env-conf-test]  evaluatedCompletions [opt-env-conf-test]  else putStr $ unlines $ map (completionResultValue . completionSuggestion) evaluatedCompletions [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf-test] @@ -176,11 +176,10 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test] - (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test]  (True, Just d) -> val <> "\t" <> d <> "\tN" [opt-env-conf-test]  ) [opt-env-conf-test]  evaluatedCompletions [opt-env-conf-test]  else putStr $ unlines $ map (completionResultValue . completionSuggestion) evaluatedCompletions [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Completion.hs:179:21-66 [opt-env-conf-test] @@ -176,11 +176,10 @@ [opt-env-conf-test]  ( \Completion {..} -> [opt-env-conf-test]  let val = completionResultValue completionSuggestion [opt-env-conf-test]  notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test]  in case (notFinal, completionDescription) of [opt-env-conf-test]  (False, Nothing) -> val [opt-env-conf-test]  (False, Just d) -> val <> "\t" <> d [opt-env-conf-test]  (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test] - (True, Just d) -> val <> "\t" <> d <> "\tN" [opt-env-conf-test]  ) [opt-env-conf-test]  evaluatedCompletions [opt-env-conf-test]  else putStr $ unlines $ map (completionResultValue . completionSuggestion) evaluatedCompletions [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:171:3-100 [opt-env-conf-test] @@ -168,22 +168,6 @@ [opt-env-conf-test]  -- import System.IO [opt-env-conf-test]  -- hPutStrLn stderr $ show (enriched, index, ws) [opt-env-conf-test]  -- hPutStrLn stderr $ show evaluatedCompletions [opt-env-conf-test] - if enriched [opt-env-conf-test] - then [opt-env-conf-test] - putStr $ [opt-env-conf-test] - unlines $ [opt-env-conf-test] - map [opt-env-conf-test] - ( \Completion {..} -> [opt-env-conf-test] - let val = completionResultValue completionSuggestion [opt-env-conf-test] - notFinal = completionResultFinality completionSuggestion == CompletionNotFinal [opt-env-conf-test] - in case (notFinal, completionDescription) of [opt-env-conf-test] - (False, Nothing) -> val [opt-env-conf-test] - (False, Just d) -> val <> "\t" <> d [opt-env-conf-test] - (True, Nothing) -> val <> "\t\tN" [opt-env-conf-test] - (True, Just d) -> val <> "\t" <> d <> "\tN" [opt-env-conf-test] - ) [opt-env-conf-test] - evaluatedCompletions [opt-env-conf-test] - else putStr $ unlines $ map (completionResultValue . completionSuggestion) evaluatedCompletions [opt-env-conf-test]  pure () [opt-env-conf-test]  [opt-env-conf-test]  -- Because the first arg has already been skipped we get input like this here: [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf-test] @@ -113,27 +113,7 @@ [opt-env-conf-test]  fishCompletionScript progPath progname = [opt-env-conf-test]  let functionName = progNameToFunctionName progname [opt-env-conf-test]  in unlines [opt-env-conf-test] - [ " function " ++ functionName, [opt-env-conf-test] - " set -l cl (commandline --tokenize --current-process)", [opt-env-conf-test] - " # Hack around fish issue #3934", [opt-env-conf-test] - " set -l cn (commandline --tokenize --cut-at-cursor --current-process)", [opt-env-conf-test] - " set -l cn (count $cn)", [opt-env-conf-test] - " set -l tmpline --query-opt-env-conf-completion --completion-enriched --completion-index $cn", [opt-env-conf-test] - " for arg in $cl", [opt-env-conf-test] - " set tmpline $tmpline --completion-word $arg", [opt-env-conf-test] - " end", [opt-env-conf-test] - " for opt in (" ++ fromAbsFile progPath ++ " $tmpline)", [opt-env-conf-test] - " set -l val (string split \\t -- $opt)[1]", [opt-env-conf-test] - " if test -d $val", [opt-env-conf-test] - " echo -E \"$val/\"", [opt-env-conf-test] - " else", [opt-env-conf-test] - " echo -E \"$val\"", [opt-env-conf-test] - " end", [opt-env-conf-test] - " end", [opt-env-conf-test] - "end", [opt-env-conf-test] - "", [opt-env-conf-test] - "complete --no-files --command " ++ fromAbsFile progPath ++ " --arguments '(" ++ functionName ++ ")'" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- This should be a name that a normal user would never want to define themselves. [opt-env-conf-test]  progNameToFunctionName :: String -> String [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf-test] @@ -113,27 +113,26 @@ [opt-env-conf-test]  fishCompletionScript progPath progname = [opt-env-conf-test]  let functionName = progNameToFunctionName progname [opt-env-conf-test]  in unlines [opt-env-conf-test] - [ " function " ++ functionName, [opt-env-conf-test]  " set -l cl (commandline --tokenize --current-process)", [opt-env-conf-test]  " # Hack around fish issue #3934", [opt-env-conf-test]  " set -l cn (commandline --tokenize --cut-at-cursor --current-process)", [opt-env-conf-test]  " set -l cn (count $cn)", [opt-env-conf-test]  " set -l tmpline --query-opt-env-conf-completion --completion-enriched --completion-index $cn", [opt-env-conf-test]  " for arg in $cl", [opt-env-conf-test]  " set tmpline $tmpline --completion-word $arg", [opt-env-conf-test]  " end", [opt-env-conf-test]  " for opt in (" ++ fromAbsFile progPath ++ " $tmpline)", [opt-env-conf-test]  " set -l val (string split \\t -- $opt)[1]", [opt-env-conf-test]  " if test -d $val", [opt-env-conf-test]  " echo -E \"$val/\"", [opt-env-conf-test]  " else", [opt-env-conf-test]  " echo -E \"$val\"", [opt-env-conf-test]  " end", [opt-env-conf-test]  " end", [opt-env-conf-test]  "end", [opt-env-conf-test]  "", [opt-env-conf-test]  "complete --no-files --command " ++ fromAbsFile progPath ++ " --arguments '(" ++ functionName ++ ")'" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- This should be a name that a normal user would never want to define themselves. [opt-env-conf-test]  progNameToFunctionName :: String -> String [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:116:9-10 [opt-env-conf-test] @@ -113,27 +113,26 @@ [opt-env-conf-test]  fishCompletionScript progPath progname = [opt-env-conf-test]  let functionName = progNameToFunctionName progname [opt-env-conf-test]  in unlines [opt-env-conf-test]  [ " function " ++ functionName, [opt-env-conf-test]  " set -l cl (commandline --tokenize --current-process)", [opt-env-conf-test]  " # Hack around fish issue #3934", [opt-env-conf-test]  " set -l cn (commandline --tokenize --cut-at-cursor --current-process)", [opt-env-conf-test]  " set -l cn (count $cn)", [opt-env-conf-test]  " set -l tmpline --query-opt-env-conf-completion --completion-enriched --completion-index $cn", [opt-env-conf-test]  " for arg in $cl", [opt-env-conf-test]  " set tmpline $tmpline --completion-word $arg", [opt-env-conf-test]  " end", [opt-env-conf-test]  " for opt in (" ++ fromAbsFile progPath ++ " $tmpline)", [opt-env-conf-test]  " set -l val (string split \\t -- $opt)[1]", [opt-env-conf-test]  " if test -d $val", [opt-env-conf-test]  " echo -E \"$val/\"", [opt-env-conf-test]  " else", [opt-env-conf-test]  " echo -E \"$val\"", [opt-env-conf-test]  " end", [opt-env-conf-test]  " end", [opt-env-conf-test]  "end", [opt-env-conf-test]  "", [opt-env-conf-test] - "complete --no-files --command " ++ fromAbsFile progPath ++ " --arguments '(" ++ functionName ++ ")'" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- This should be a name that a normal user would never want to define themselves. [opt-env-conf-test]  progNameToFunctionName :: String -> String [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf-test] @@ -64,46 +64,7 @@ [opt-env-conf-test]  zshCompletionScript :: Path Abs File -> String -> String [opt-env-conf-test]  zshCompletionScript progPath progname = [opt-env-conf-test]  unlines [opt-env-conf-test] - [ "#compdef " ++ progname, [opt-env-conf-test] - "", [opt-env-conf-test] - "local request", [opt-env-conf-test] - "local completions", [opt-env-conf-test] - "local word", [opt-env-conf-test] - "local index=$((CURRENT - 1))", [opt-env-conf-test] - "", [opt-env-conf-test] - "request=(--query-opt-env-conf-completion --completion-enriched --completion-index $index)", [opt-env-conf-test] - "for arg in ${words[@]}; do", [opt-env-conf-test] - " request=(${request[@]} --completion-word $arg)", [opt-env-conf-test] - "done", [opt-env-conf-test] - "", [opt-env-conf-test] - "IFS=$'\\n' completions=($( " ++ fromAbsFile progPath ++ " \"${request[@]}\" ))", [opt-env-conf-test] - "", [opt-env-conf-test] - "for word in $completions; do", [opt-env-conf-test] - " local -a parts", [opt-env-conf-test] - "", [opt-env-conf-test] - " # Split the line at a tab if there is one.", [opt-env-conf-test] - " IFS=$'\\t' parts=($( echo $word ))", [opt-env-conf-test] - "", [opt-env-conf-test] - " if [[ -n $parts[2] ]]; then", [opt-env-conf-test] - " if [[ $word[1] == \"-\" ]]; then", [opt-env-conf-test] - " local desc=(\"$parts[1] ($parts[2])\")", [opt-env-conf-test] - " compadd -d desc -- $parts[1]", [opt-env-conf-test] - " elif [[ $parts[3] == 'N' ]]; then", [opt-env-conf-test] - " local desc=($(print -f \"%-019s -- %s\" $parts[1] $parts[2]))", [opt-env-conf-test] - " compadd -f -l -S '' -d desc -- $parts[1]", [opt-env-conf-test] - " else", [opt-env-conf-test] - " local desc=($(print -f \"%-019s -- %s\" $parts[1] $parts[2]))", [opt-env-conf-test] - " compadd -f -l -d desc -- $parts[1]", [opt-env-conf-test] - " fi", [opt-env-conf-test] - " else", [opt-env-conf-test] - " if [[ $parts[3] == 'N' ]]; then", [opt-env-conf-test] - " compadd -f -S '' -- $parts[1]", [opt-env-conf-test] - " else", [opt-env-conf-test] - " compadd -f -- $parts[1]", [opt-env-conf-test] - " fi", [opt-env-conf-test] - " fi", [opt-env-conf-test] - "done" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  generateFishCompletionScript :: Path Abs File -> String -> IO () [opt-env-conf-test]  generateFishCompletionScript progPath progname = putStrLn $ fishCompletionScript progPath progname [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf-test] @@ -64,46 +64,45 @@ [opt-env-conf-test]  zshCompletionScript :: Path Abs File -> String -> String [opt-env-conf-test]  zshCompletionScript progPath progname = [opt-env-conf-test]  unlines [opt-env-conf-test] - [ "#compdef " ++ progname, [opt-env-conf-test]  "", [opt-env-conf-test]  "local request", [opt-env-conf-test]  "local completions", [opt-env-conf-test]  "local word", [opt-env-conf-test]  "local index=$((CURRENT - 1))", [opt-env-conf-test]  "", [opt-env-conf-test]  "request=(--query-opt-env-conf-completion --completion-enriched --completion-index $index)", [opt-env-conf-test]  "for arg in ${words[@]}; do", [opt-env-conf-test]  " request=(${request[@]} --completion-word $arg)", [opt-env-conf-test]  "done", [opt-env-conf-test]  "", [opt-env-conf-test]  "IFS=$'\\n' completions=($( " ++ fromAbsFile progPath ++ " \"${request[@]}\" ))", [opt-env-conf-test]  "", [opt-env-conf-test]  "for word in $completions; do", [opt-env-conf-test]  " local -a parts", [opt-env-conf-test]  "", [opt-env-conf-test]  " # Split the line at a tab if there is one.", [opt-env-conf-test]  " IFS=$'\\t' parts=($( echo $word ))", [opt-env-conf-test]  "", [opt-env-conf-test]  " if [[ -n $parts[2] ]]; then", [opt-env-conf-test]  " if [[ $word[1] == \"-\" ]]; then", [opt-env-conf-test]  " local desc=(\"$parts[1] ($parts[2])\")", [opt-env-conf-test]  " compadd -d desc -- $parts[1]", [opt-env-conf-test]  " elif [[ $parts[3] == 'N' ]]; then", [opt-env-conf-test]  " local desc=($(print -f \"%-019s -- %s\" $parts[1] $parts[2]))", [opt-env-conf-test]  " compadd -f -l -S '' -d desc -- $parts[1]", [opt-env-conf-test]  " else", [opt-env-conf-test]  " local desc=($(print -f \"%-019s -- %s\" $parts[1] $parts[2]))", [opt-env-conf-test]  " compadd -f -l -d desc -- $parts[1]", [opt-env-conf-test]  " fi", [opt-env-conf-test]  " else", [opt-env-conf-test]  " if [[ $parts[3] == 'N' ]]; then", [opt-env-conf-test]  " compadd -f -S '' -- $parts[1]", [opt-env-conf-test]  " else", [opt-env-conf-test]  " compadd -f -- $parts[1]", [opt-env-conf-test]  " fi", [opt-env-conf-test]  " fi", [opt-env-conf-test]  "done" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  generateFishCompletionScript :: Path Abs File -> String -> IO () [opt-env-conf-test]  generateFishCompletionScript progPath progname = putStrLn $ fishCompletionScript progPath progname [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:67:5-6 [opt-env-conf-test] @@ -64,46 +64,45 @@ [opt-env-conf-test]  zshCompletionScript :: Path Abs File -> String -> String [opt-env-conf-test]  zshCompletionScript progPath progname = [opt-env-conf-test]  unlines [opt-env-conf-test]  [ "#compdef " ++ progname, [opt-env-conf-test]  "", [opt-env-conf-test]  "local request", [opt-env-conf-test]  "local completions", [opt-env-conf-test]  "local word", [opt-env-conf-test]  "local index=$((CURRENT - 1))", [opt-env-conf-test]  "", [opt-env-conf-test]  "request=(--query-opt-env-conf-completion --completion-enriched --completion-index $index)", [opt-env-conf-test]  "for arg in ${words[@]}; do", [opt-env-conf-test]  " request=(${request[@]} --completion-word $arg)", [opt-env-conf-test]  "done", [opt-env-conf-test]  "", [opt-env-conf-test]  "IFS=$'\\n' completions=($( " ++ fromAbsFile progPath ++ " \"${request[@]}\" ))", [opt-env-conf-test]  "", [opt-env-conf-test]  "for word in $completions; do", [opt-env-conf-test]  " local -a parts", [opt-env-conf-test]  "", [opt-env-conf-test]  " # Split the line at a tab if there is one.", [opt-env-conf-test]  " IFS=$'\\t' parts=($( echo $word ))", [opt-env-conf-test]  "", [opt-env-conf-test]  " if [[ -n $parts[2] ]]; then", [opt-env-conf-test]  " if [[ $word[1] == \"-\" ]]; then", [opt-env-conf-test]  " local desc=(\"$parts[1] ($parts[2])\")", [opt-env-conf-test]  " compadd -d desc -- $parts[1]", [opt-env-conf-test]  " elif [[ $parts[3] == 'N' ]]; then", [opt-env-conf-test]  " local desc=($(print -f \"%-019s -- %s\" $parts[1] $parts[2]))", [opt-env-conf-test]  " compadd -f -l -S '' -d desc -- $parts[1]", [opt-env-conf-test]  " else", [opt-env-conf-test]  " local desc=($(print -f \"%-019s -- %s\" $parts[1] $parts[2]))", [opt-env-conf-test]  " compadd -f -l -d desc -- $parts[1]", [opt-env-conf-test]  " fi", [opt-env-conf-test]  " else", [opt-env-conf-test]  " if [[ $parts[3] == 'N' ]]; then", [opt-env-conf-test]  " compadd -f -S '' -- $parts[1]", [opt-env-conf-test]  " else", [opt-env-conf-test]  " compadd -f -- $parts[1]", [opt-env-conf-test]  " fi", [opt-env-conf-test]  " fi", [opt-env-conf-test] - "done" [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  generateFishCompletionScript :: Path Abs File -> String -> IO () [opt-env-conf-test]  generateFishCompletionScript progPath progname = putStrLn $ fishCompletionScript progPath progname [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf-test] @@ -40,22 +40,7 @@ [opt-env-conf-test]  bashCompletionScript progPath progname = [opt-env-conf-test]  let functionName = progNameToFunctionName progname [opt-env-conf-test]  in unlines [opt-env-conf-test] - [ functionName ++ "()", [opt-env-conf-test] - "{", [opt-env-conf-test] - " local CMDLINE", [opt-env-conf-test] - " local IFS=$'\\n'", [opt-env-conf-test] - " CMDLINE=(--query-opt-env-conf-completion)", [opt-env-conf-test] - " CMDLINE+=(--completion-index $COMP_CWORD)", [opt-env-conf-test] - "", [opt-env-conf-test] - " for arg in ${COMP_WORDS[@]}; do", [opt-env-conf-test] - " CMDLINE=(${CMDLINE[@]} --completion-word $arg)", [opt-env-conf-test] - " done", [opt-env-conf-test] - "", [opt-env-conf-test] - " COMPREPLY=( $(" ++ fromAbsFile progPath ++ " \"${CMDLINE[@]}\") )", [opt-env-conf-test] - "}", [opt-env-conf-test] - "", [opt-env-conf-test] - "complete -o filenames -F " ++ functionName ++ " " ++ progname [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  generateZshCompletionScript :: Path Abs File -> String -> IO () [opt-env-conf-test]  generateZshCompletionScript progPath progname = putStrLn $ zshCompletionScript progPath progname [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf-test] @@ -40,22 +40,21 @@ [opt-env-conf-test]  bashCompletionScript progPath progname = [opt-env-conf-test]  let functionName = progNameToFunctionName progname [opt-env-conf-test]  in unlines [opt-env-conf-test] - [ functionName ++ "()", [opt-env-conf-test]  "{", [opt-env-conf-test]  " local CMDLINE", [opt-env-conf-test]  " local IFS=$'\\n'", [opt-env-conf-test]  " CMDLINE=(--query-opt-env-conf-completion)", [opt-env-conf-test]  " CMDLINE+=(--completion-index $COMP_CWORD)", [opt-env-conf-test]  "", [opt-env-conf-test]  " for arg in ${COMP_WORDS[@]}; do", [opt-env-conf-test]  " CMDLINE=(${CMDLINE[@]} --completion-word $arg)", [opt-env-conf-test]  " done", [opt-env-conf-test]  "", [opt-env-conf-test]  " COMPREPLY=( $(" ++ fromAbsFile progPath ++ " \"${CMDLINE[@]}\") )", [opt-env-conf-test]  "}", [opt-env-conf-test]  "", [opt-env-conf-test]  "complete -o filenames -F " ++ functionName ++ " " ++ progname [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  generateZshCompletionScript :: Path Abs File -> String -> IO () [opt-env-conf-test]  generateZshCompletionScript progPath progname = putStrLn $ zshCompletionScript progPath progname [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Completion.hs:43:9-10 [opt-env-conf-test] @@ -40,22 +40,21 @@ [opt-env-conf-test]  bashCompletionScript progPath progname = [opt-env-conf-test]  let functionName = progNameToFunctionName progname [opt-env-conf-test]  in unlines [opt-env-conf-test]  [ functionName ++ "()", [opt-env-conf-test]  "{", [opt-env-conf-test]  " local CMDLINE", [opt-env-conf-test]  " local IFS=$'\\n'", [opt-env-conf-test]  " CMDLINE=(--query-opt-env-conf-completion)", [opt-env-conf-test]  " CMDLINE+=(--completion-index $COMP_CWORD)", [opt-env-conf-test]  "", [opt-env-conf-test]  " for arg in ${COMP_WORDS[@]}; do", [opt-env-conf-test]  " CMDLINE=(${CMDLINE[@]} --completion-word $arg)", [opt-env-conf-test]  " done", [opt-env-conf-test]  "", [opt-env-conf-test]  " COMPREPLY=( $(" ++ fromAbsFile progPath ++ " \"${CMDLINE[@]}\") )", [opt-env-conf-test]  "}", [opt-env-conf-test]  "", [opt-env-conf-test] - "complete -o filenames -F " ++ functionName ++ " " ++ progname [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  generateZshCompletionScript :: Path Abs File -> String -> IO () [opt-env-conf-test]  generateZshCompletionScript progPath progname = putStrLn $ zshCompletionScript progPath progname [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf-test] @@ -1207,7 +1207,7 @@ [opt-env-conf-test]  ParserMany mLoc p -> ParserMany mLoc <$> go p [opt-env-conf-test]  ParserSome mLoc p -> ParserSome mLoc <$> go p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> ParserAllOrNothing mLoc <$> go p [opt-env-conf-test] - ParserCheck mLoc forgivable caps f p -> ParserCheck mLoc forgivable caps f <$> go p [opt-env-conf-test] + ParserCheck mLoc forgivable caps f p -> ParserCheck mLoc True caps f <$> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault <$> traverse (commandTraverseSetting func) cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> ParserWithConfig mLoc <$> go p1 <*> go p2 [opt-env-conf-test]  ParserSetting mLoc s -> ParserSetting mLoc <$> func s [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf-test] @@ -1207,7 +1207,7 @@ [opt-env-conf-test]  ParserMany mLoc p -> ParserMany mLoc <$> go p [opt-env-conf-test]  ParserSome mLoc p -> ParserSome mLoc <$> go p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> ParserAllOrNothing mLoc <$> go p [opt-env-conf-test] - ParserCheck mLoc forgivable caps f p -> ParserCheck mLoc forgivable caps f <$> go p [opt-env-conf-test] + ParserCheck mLoc forgivable caps f p -> ParserCheck mLoc False caps f <$> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault <$> traverse (commandTraverseSetting func) cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> ParserWithConfig mLoc <$> go p1 <*> go p2 [opt-env-conf-test]  ParserSetting mLoc s -> ParserSetting mLoc <$> func s [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:1210:64-74 [opt-env-conf-test] @@ -1207,7 +1207,7 @@ [opt-env-conf-test]  ParserMany mLoc p -> ParserMany mLoc <$> go p [opt-env-conf-test]  ParserSome mLoc p -> ParserSome mLoc <$> go p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> ParserAllOrNothing mLoc <$> go p [opt-env-conf-test] - ParserCheck mLoc forgivable caps f p -> ParserCheck mLoc forgivable caps f <$> go p [opt-env-conf-test] + ParserCheck mLoc forgivable caps f p -> ParserCheck mLoc not (forgivable) caps f <$> go p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault <$> traverse (commandTraverseSetting func) cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> ParserWithConfig mLoc <$> go p1 <*> go p2 [opt-env-conf-test]  ParserSetting mLoc s -> ParserSetting mLoc <$> func s [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf-test] @@ -1170,7 +1170,7 @@ [opt-env-conf-test]  ParserMany _ p -> ParserMany Nothing (go p) [opt-env-conf-test]  ParserSome _ p -> ParserSome Nothing (go p) [opt-env-conf-test]  ParserAllOrNothing _ p -> ParserAllOrNothing Nothing (go p) [opt-env-conf-test] - ParserCheck _ forgivable caps f p -> ParserCheck Nothing forgivable caps f (go p) [opt-env-conf-test] + ParserCheck _ forgivable caps f p -> ParserCheck Nothing True caps f (go p) [opt-env-conf-test]  ParserCommands _ mDefault cs -> ParserCommands Nothing mDefault $ map commandEraseSrcLocs cs [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> ParserWithConfig Nothing (go p1) (go p2) [opt-env-conf-test]  ParserSetting _ s -> ParserSetting Nothing s [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf-test] @@ -1170,7 +1170,7 @@ [opt-env-conf-test]  ParserMany _ p -> ParserMany Nothing (go p) [opt-env-conf-test]  ParserSome _ p -> ParserSome Nothing (go p) [opt-env-conf-test]  ParserAllOrNothing _ p -> ParserAllOrNothing Nothing (go p) [opt-env-conf-test] - ParserCheck _ forgivable caps f p -> ParserCheck Nothing forgivable caps f (go p) [opt-env-conf-test] + ParserCheck _ forgivable caps f p -> ParserCheck Nothing False caps f (go p) [opt-env-conf-test]  ParserCommands _ mDefault cs -> ParserCommands Nothing mDefault $ map commandEraseSrcLocs cs [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> ParserWithConfig Nothing (go p1) (go p2) [opt-env-conf-test]  ParserSetting _ s -> ParserSetting Nothing s [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:1173:64-74 [opt-env-conf-test] @@ -1170,7 +1170,7 @@ [opt-env-conf-test]  ParserMany _ p -> ParserMany Nothing (go p) [opt-env-conf-test]  ParserSome _ p -> ParserSome Nothing (go p) [opt-env-conf-test]  ParserAllOrNothing _ p -> ParserAllOrNothing Nothing (go p) [opt-env-conf-test] - ParserCheck _ forgivable caps f p -> ParserCheck Nothing forgivable caps f (go p) [opt-env-conf-test] + ParserCheck _ forgivable caps f p -> ParserCheck Nothing not (forgivable) caps f (go p) [opt-env-conf-test]  ParserCommands _ mDefault cs -> ParserCommands Nothing mDefault $ map commandEraseSrcLocs cs [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> ParserWithConfig Nothing (go p1) (go p2) [opt-env-conf-test]  ParserSetting _ s -> ParserSetting Nothing s [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:705:57-63 [opt-env-conf-test] @@ -702,7 +702,7 @@ [opt-env-conf-test]  let (mDefault, cs) = go bs [opt-env-conf-test]  in case b of [opt-env-conf-test]  CommandsBuilderCommand c -> (mDefault, c : cs) [opt-env-conf-test] - CommandsBuilderDefault d -> (mDefault <|> Just d, cs) [opt-env-conf-test] + CommandsBuilderDefault d -> (mDefault <|> Nothing, cs) [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  [opt-env-conf-test]  -- | Declare a single command with a name, documentation and parser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:703:13-68 [opt-env-conf-test] @@ -700,9 +700,8 @@ [opt-env-conf-test]  [] -> (Nothing, []) [opt-env-conf-test]  (b : bs) -> [opt-env-conf-test]  let (mDefault, cs) = go bs [opt-env-conf-test]  in case b of [opt-env-conf-test] - CommandsBuilderCommand c -> (mDefault, c : cs) [opt-env-conf-test]  CommandsBuilderDefault d -> (mDefault <|> Just d, cs) [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  [opt-env-conf-test]  -- | Declare a single command with a name, documentation and parser [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:703:13-68 [opt-env-conf-test] @@ -700,9 +700,8 @@ [opt-env-conf-test]  [] -> (Nothing, []) [opt-env-conf-test]  (b : bs) -> [opt-env-conf-test]  let (mDefault, cs) = go bs [opt-env-conf-test]  in case b of [opt-env-conf-test]  CommandsBuilderCommand c -> (mDefault, c : cs) [opt-env-conf-test] - CommandsBuilderDefault d -> (mDefault <|> Just d, cs) [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  [opt-env-conf-test]  -- | Declare a single command with a name, documentation and parser [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:686:41-45 [opt-env-conf-test] @@ -683,7 +683,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Like 'checkMapIO', but allow trying the other side of any alternative if the result is Nothing. [opt-env-conf-test]  checkMapIOForgivable :: (HasCallStack) => (a -> IO (Either String b)) -> Parser a -> Parser b [opt-env-conf-test] -checkMapIOForgivable = ParserCheck mLoc True Set.empty [opt-env-conf-test] +checkMapIOForgivable = ParserCheck mLoc False Set.empty [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:674:15-28 [opt-env-conf-test] @@ -671,9 +671,8 @@ [opt-env-conf-test]  checkMapMaybeForgivable func p = [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  checkMapEitherForgivable [opt-env-conf-test]  ( \a -> case func a of [opt-env-conf-test] - Nothing -> Left "checkMapMaybeForgivable failed without a helpful error message" [opt-env-conf-test]  Just b -> Right b [opt-env-conf-test]  ) [opt-env-conf-test]  p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:674:15-28 [opt-env-conf-test] @@ -671,9 +671,8 @@ [opt-env-conf-test]  checkMapMaybeForgivable func p = [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  checkMapEitherForgivable [opt-env-conf-test]  ( \a -> case func a of [opt-env-conf-test]  Nothing -> Left "checkMapMaybeForgivable failed without a helpful error message" [opt-env-conf-test] - Just b -> Right b [opt-env-conf-test]  ) [opt-env-conf-test]  p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf-test] @@ -660,7 +660,7 @@ [opt-env-conf-test]  checkWithRequiredCapability :: (HasCallStack) => String -> Parser a -> Parser a [opt-env-conf-test]  checkWithRequiredCapability capName = \case [opt-env-conf-test]  ParserCheck mLoc' forgivable caps f p -> [opt-env-conf-test] - ParserCheck mLoc' forgivable (Set.insert cap caps) f p [opt-env-conf-test] + ParserCheck mLoc' True (Set.insert cap caps) f p [opt-env-conf-test]  p -> ParserCheck mLoc False (Set.singleton cap) (pure . Right) p [opt-env-conf-test]  where [opt-env-conf-test]  cap = Capability (T.pack capName) [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf-test] @@ -660,7 +660,7 @@ [opt-env-conf-test]  checkWithRequiredCapability :: (HasCallStack) => String -> Parser a -> Parser a [opt-env-conf-test]  checkWithRequiredCapability capName = \case [opt-env-conf-test]  ParserCheck mLoc' forgivable caps f p -> [opt-env-conf-test] - ParserCheck mLoc' forgivable (Set.insert cap caps) f p [opt-env-conf-test] + ParserCheck mLoc' False (Set.insert cap caps) f p [opt-env-conf-test]  p -> ParserCheck mLoc False (Set.singleton cap) (pure . Right) p [opt-env-conf-test]  where [opt-env-conf-test]  cap = Capability (T.pack capName) [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:663:23-33 [opt-env-conf-test] @@ -660,7 +660,7 @@ [opt-env-conf-test]  checkWithRequiredCapability :: (HasCallStack) => String -> Parser a -> Parser a [opt-env-conf-test]  checkWithRequiredCapability capName = \case [opt-env-conf-test]  ParserCheck mLoc' forgivable caps f p -> [opt-env-conf-test] - ParserCheck mLoc' forgivable (Set.insert cap caps) f p [opt-env-conf-test] + ParserCheck mLoc' not (forgivable) (Set.insert cap caps) f p [opt-env-conf-test]  p -> ParserCheck mLoc False (Set.singleton cap) (pure . Right) p [opt-env-conf-test]  where [opt-env-conf-test]  cap = Capability (T.pack capName) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:664:25-30 [opt-env-conf-test] @@ -661,7 +661,7 @@ [opt-env-conf-test]  checkWithRequiredCapability capName = \case [opt-env-conf-test]  ParserCheck mLoc' forgivable caps f p -> [opt-env-conf-test]  ParserCheck mLoc' forgivable (Set.insert cap caps) f p [opt-env-conf-test] - p -> ParserCheck mLoc False (Set.singleton cap) (pure . Right) p [opt-env-conf-test] + p -> ParserCheck mLoc True (Set.singleton cap) (pure . Right) p [opt-env-conf-test]  where [opt-env-conf-test]  cap = Capability (T.pack capName) [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:618:31-36 [opt-env-conf-test] @@ -615,7 +615,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  -- | Check a 'Parser' after the fact, allowing IO. [opt-env-conf-test]  checkMapIO :: (HasCallStack) => (a -> IO (Either String b)) -> Parser a -> Parser b [opt-env-conf-test] -checkMapIO = ParserCheck mLoc False Set.empty [opt-env-conf-test] +checkMapIO = ParserCheck mLoc True Set.empty [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf-test] @@ -599,9 +599,8 @@ [opt-env-conf-test]  checkMapMaybe func p = [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  checkMapEither [opt-env-conf-test]  ( \a -> case func a of [opt-env-conf-test] - Nothing -> Left "checkMapMaybe failed without a helpful error message" [opt-env-conf-test]  Just b -> Right b [opt-env-conf-test]  ) [opt-env-conf-test]  p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf-test] @@ -599,9 +599,8 @@ [opt-env-conf-test]  checkMapMaybe func p = [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  checkMapEither [opt-env-conf-test]  ( \a -> case func a of [opt-env-conf-test]  Nothing -> Left "checkMapMaybe failed without a helpful error message" [opt-env-conf-test] - Just b -> Right b [opt-env-conf-test]  ) [opt-env-conf-test]  p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf-test] @@ -1016,13 +1016,7 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ bareOption, [opt-env-conf-test] - fileOption, [opt-env-conf-test] - bareEnv, [opt-env-conf-test] - fileEnv, [opt-env-conf-test] - bareConf, [opt-env-conf-test] - fileConf [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  b = mconcat $ bs ++ [reader str] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf-test] @@ -1016,13 +1016,12 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ bareOption, [opt-env-conf-test]  fileOption, [opt-env-conf-test]  bareEnv, [opt-env-conf-test]  fileEnv, [opt-env-conf-test]  bareConf, [opt-env-conf-test] - fileConf [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  b = mconcat $ bs ++ [reader str] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1019:9-10 [opt-env-conf-test] @@ -1016,13 +1016,12 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ bareOption, [opt-env-conf-test]  fileOption, [opt-env-conf-test]  bareEnv, [opt-env-conf-test]  fileEnv, [opt-env-conf-test]  bareConf, [opt-env-conf-test]  fileConf [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  b = mconcat $ bs ++ [reader str] [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf-test] @@ -1027,7 +1027,6 @@ [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  b = mconcat $ bs ++ [reader str] [opt-env-conf-test]  bareSetting p f = do [opt-env-conf-test] - let s = completeBuilder $ mconcat [mapMaybeBuilder f b, reader str, metavar "SECRET"] [opt-env-conf-test]  guard $ p s [opt-env-conf-test]  pure $ [opt-env-conf-test]  -- Require the capability for the entire setting because the secret may be [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf-test] @@ -1027,7 +1027,6 @@ [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  b = mconcat $ bs ++ [reader str] [opt-env-conf-test]  bareSetting p f = do [opt-env-conf-test] - let s = completeBuilder $ mconcat [mapMaybeBuilder f b, reader str, metavar "SECRET"] [opt-env-conf-test]  guard $ p s [opt-env-conf-test]  pure $ [opt-env-conf-test]  -- Require the capability for the entire setting because the secret may be [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1030:41-92 [opt-env-conf-test] @@ -1027,7 +1027,6 @@ [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  b = mconcat $ bs ++ [reader str] [opt-env-conf-test]  bareSetting p f = do [opt-env-conf-test] - let s = completeBuilder $ mconcat [mapMaybeBuilder f b, reader str, metavar "SECRET"] [opt-env-conf-test]  guard $ p s [opt-env-conf-test]  pure $ [opt-env-conf-test]  -- Require the capability for the entire setting because the secret may be [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:1055:12-18 [opt-env-conf-test] @@ -1052,7 +1052,7 @@ [opt-env-conf-test]  BuildAddEnv _ -> Nothing [opt-env-conf-test]  BuildAddConf _ -> Nothing [opt-env-conf-test]  BuildSetDefault _ _ -> Nothing [opt-env-conf-test] - i -> Just i [opt-env-conf-test] + i -> Nothing [opt-env-conf-test]  fileOption = fileSetting settingTryOption $ \case [opt-env-conf-test]  BuildTryArgument -> Nothing [opt-env-conf-test]  BuildAddShort _ -> Nothing [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:1072:12-18 [opt-env-conf-test] @@ -1069,7 +1069,7 @@ [opt-env-conf-test]  BuildAddEnv v -> Just $ BuildAddEnv v [opt-env-conf-test]  BuildAddConf _ -> Nothing [opt-env-conf-test]  BuildSetDefault _ _ -> Nothing [opt-env-conf-test] - i -> Just i [opt-env-conf-test] + i -> Nothing [opt-env-conf-test]  fileEnv = fileSetting (isJust . settingEnvVars) $ \case [opt-env-conf-test]  BuildTryArgument -> Nothing [opt-env-conf-test]  BuildTryOption -> Nothing [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:1093:12-18 [opt-env-conf-test] @@ -1090,7 +1090,7 @@ [opt-env-conf-test]  BuildAddEnv _ -> Nothing [opt-env-conf-test]  BuildAddConf k -> Just $ BuildAddConf k [opt-env-conf-test]  BuildSetDefault _ _ -> Nothing [opt-env-conf-test] - i -> Just i [opt-env-conf-test] + i -> Nothing [opt-env-conf-test]  fileConf = fileSetting (isJust . settingConfigVals) $ \case [opt-env-conf-test]  BuildTryArgument -> Nothing [opt-env-conf-test]  BuildTryOption -> Nothing [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf-test] @@ -1035,7 +1035,6 @@ [opt-env-conf-test]  checkWithRequiredCapability readSecretCapability $ [opt-env-conf-test]  T.pack <$> ParserSetting mLoc s [opt-env-conf-test]  fileSetting p f = do [opt-env-conf-test] - let s = completeBuilder $ mconcat [mapMaybeBuilder f b, reader str, metavar "FILE_PATH"] [opt-env-conf-test]  guard $ p s [opt-env-conf-test]  pure $ [opt-env-conf-test]  checkWithRequiredCapability readSecretCapability $ [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf-test] @@ -1035,7 +1035,6 @@ [opt-env-conf-test]  checkWithRequiredCapability readSecretCapability $ [opt-env-conf-test]  T.pack <$> ParserSetting mLoc s [opt-env-conf-test]  fileSetting p f = do [opt-env-conf-test] - let s = completeBuilder $ mconcat [mapMaybeBuilder f b, reader str, metavar "FILE_PATH"] [opt-env-conf-test]  guard $ p s [opt-env-conf-test]  pure $ [opt-env-conf-test]  checkWithRequiredCapability readSecretCapability $ [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:1038:41-95 [opt-env-conf-test] @@ -1035,7 +1035,6 @@ [opt-env-conf-test]  checkWithRequiredCapability readSecretCapability $ [opt-env-conf-test]  T.pack <$> ParserSetting mLoc s [opt-env-conf-test]  fileSetting p f = do [opt-env-conf-test] - let s = completeBuilder $ mconcat [mapMaybeBuilder f b, reader str, metavar "FILE_PATH"] [opt-env-conf-test]  guard $ p s [opt-env-conf-test]  pure $ [opt-env-conf-test]  checkWithRequiredCapability readSecretCapability $ [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:1063:12-18 [opt-env-conf-test] @@ -1060,7 +1060,7 @@ [opt-env-conf-test]  BuildAddEnv _ -> Nothing [opt-env-conf-test]  BuildAddConf _ -> Nothing [opt-env-conf-test]  BuildSetDefault _ _ -> Nothing [opt-env-conf-test] - i -> Just i [opt-env-conf-test] + i -> Nothing [opt-env-conf-test]  bareEnv = bareSetting (isJust . settingEnvVars) $ \case [opt-env-conf-test]  BuildTryArgument -> Nothing [opt-env-conf-test]  BuildTryOption -> Nothing [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:1084:12-18 [opt-env-conf-test] @@ -1081,7 +1081,7 @@ [opt-env-conf-test]  suffixEnvVarSetting "_FILE" e [opt-env-conf-test]  BuildAddConf _ -> Nothing [opt-env-conf-test]  BuildSetDefault _ _ -> Nothing [opt-env-conf-test] - i -> Just i [opt-env-conf-test] + i -> Nothing [opt-env-conf-test]  bareConf = bareSetting (isJust . settingConfigVals) $ \case [opt-env-conf-test]  BuildTryArgument -> Nothing [opt-env-conf-test]  BuildTryOption -> Nothing [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:1102:12-18 [opt-env-conf-test] @@ -1099,7 +1099,7 @@ [opt-env-conf-test]  BuildAddEnv _ -> Nothing [opt-env-conf-test]  BuildAddConf k -> Just $ BuildAddConf $ suffixConfigValSettingKey "-file" k [opt-env-conf-test]  BuildSetDefault _ _ -> Nothing [opt-env-conf-test] - i -> Just i [opt-env-conf-test] + i -> Nothing [opt-env-conf-test]  [opt-env-conf-test]  -- | Prefix all 'long's and 'short's with a given 'String'. [opt-env-conf-test]  {-# ANN subArgs ("NOCOVER" :: String) #-} [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:563:72-117 [opt-env-conf-test] @@ -560,7 +560,7 @@ [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Nothing} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf-test] @@ -559,9 +559,8 @@ [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test] - Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf-test] @@ -559,9 +559,8 @@ [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test] - ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test] - ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test] - ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test] - ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test] - ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test] - ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test] - ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test] - ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test] - ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,18 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test] - Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:877:11-26 [opt-env-conf-test] @@ -874,7 +874,7 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ Just parseDummy, [opt-env-conf-test] + [ Nothing, [opt-env-conf-test]  Just parseDisableSwitch, [opt-env-conf-test]  Just parseEnableSwitch, [opt-env-conf-test]  parseEnv, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:878:11-34 [opt-env-conf-test] @@ -875,7 +875,7 @@ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ Just parseDummy, [opt-env-conf-test] - Just parseDisableSwitch, [opt-env-conf-test] + Nothing, [opt-env-conf-test]  Just parseEnableSwitch, [opt-env-conf-test]  parseEnv, [opt-env-conf-test]  parseConfigVal, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:879:11-33 [opt-env-conf-test] @@ -876,7 +876,7 @@ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ Just parseDummy, [opt-env-conf-test]  Just parseDisableSwitch, [opt-env-conf-test] - Just parseEnableSwitch, [opt-env-conf-test] + Nothing, [opt-env-conf-test]  parseEnv, [opt-env-conf-test]  parseConfigVal, [opt-env-conf-test]  parseDefaultVal [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf-test] @@ -874,13 +874,7 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ Just parseDummy, [opt-env-conf-test] - Just parseDisableSwitch, [opt-env-conf-test] - Just parseEnableSwitch, [opt-env-conf-test] - parseEnv, [opt-env-conf-test] - parseConfigVal, [opt-env-conf-test] - parseDefaultVal [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  s = buildSetting builders [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf-test] @@ -874,13 +874,12 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test] - [ Just parseDummy, [opt-env-conf-test]  Just parseDisableSwitch, [opt-env-conf-test]  Just parseEnableSwitch, [opt-env-conf-test]  parseEnv, [opt-env-conf-test]  parseConfigVal, [opt-env-conf-test]  parseDefaultVal [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  s = buildSetting builders [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:877:9-10 [opt-env-conf-test] @@ -874,13 +874,12 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  choice $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ Just parseDummy, [opt-env-conf-test]  Just parseDisableSwitch, [opt-env-conf-test]  Just parseEnableSwitch, [opt-env-conf-test]  parseEnv, [opt-env-conf-test]  parseConfigVal, [opt-env-conf-test] - parseDefaultVal [opt-env-conf-test]  ] [opt-env-conf-test]  where [opt-env-conf-test]  mLoc = snd <$> listToMaybe (getCallStack callStack) [opt-env-conf-test]  s = buildSetting builders [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf-test] @@ -887,7 +887,7 @@ [opt-env-conf-test]  parseDefaultVal :: Maybe (Parser Bool) [opt-env-conf-test]  parseDefaultVal = do [opt-env-conf-test]  (dv, _) <- settingDefaultValue s [opt-env-conf-test] - pure $ pure dv [opt-env-conf-test] + pure $ pure True [opt-env-conf-test]  [opt-env-conf-test]  parseEnableSwitch :: Parser Bool [opt-env-conf-test]  parseEnableSwitch = [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf-test] @@ -887,7 +887,7 @@ [opt-env-conf-test]  parseDefaultVal :: Maybe (Parser Bool) [opt-env-conf-test]  parseDefaultVal = do [opt-env-conf-test]  (dv, _) <- settingDefaultValue s [opt-env-conf-test] - pure $ pure dv [opt-env-conf-test] + pure $ pure False [opt-env-conf-test]  [opt-env-conf-test]  parseEnableSwitch :: Parser Bool [opt-env-conf-test]  parseEnableSwitch = [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:890:19-21 [opt-env-conf-test] @@ -887,7 +887,7 @@ [opt-env-conf-test]  parseDefaultVal :: Maybe (Parser Bool) [opt-env-conf-test]  parseDefaultVal = do [opt-env-conf-test]  (dv, _) <- settingDefaultValue s [opt-env-conf-test] - pure $ pure dv [opt-env-conf-test] + pure $ pure not (dv) [opt-env-conf-test]  [opt-env-conf-test]  parseEnableSwitch :: Parser Bool [opt-env-conf-test]  parseEnableSwitch = [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:898:34-39 [opt-env-conf-test] @@ -895,7 +895,7 @@ [opt-env-conf-test]  Setting [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong truePrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test] - settingTryArgument = False, [opt-env-conf-test] + settingTryArgument = True, [opt-env-conf-test]  settingSwitchValue = Just True, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:899:39-43 [opt-env-conf-test] @@ -896,7 +896,7 @@ [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong truePrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test] - settingSwitchValue = Just True, [opt-env-conf-test] + settingSwitchValue = Just False, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:899:34-43 [opt-env-conf-test] @@ -896,7 +896,7 @@ [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong truePrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test] - settingSwitchValue = Just True, [opt-env-conf-test] + settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:900:32-37 [opt-env-conf-test] @@ -897,7 +897,7 @@ [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Just True, [opt-env-conf-test] - settingTryOption = False, [opt-env-conf-test] + settingTryOption = True, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:905:29-33 [opt-env-conf-test] @@ -902,7 +902,7 @@ [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] - settingHidden = True, [opt-env-conf-test] + settingHidden = False, [opt-env-conf-test]  settingMetavar = Nothing, [opt-env-conf-test]  settingHelp = Nothing, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:917:34-39 [opt-env-conf-test] @@ -914,7 +914,7 @@ [opt-env-conf-test]  Setting [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong falsePrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test] - settingTryArgument = False, [opt-env-conf-test] + settingTryArgument = True, [opt-env-conf-test]  settingSwitchValue = Just False, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:918:39-44 [opt-env-conf-test] @@ -915,7 +915,7 @@ [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong falsePrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test] - settingSwitchValue = Just False, [opt-env-conf-test] + settingSwitchValue = Just True, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:918:34-44 [opt-env-conf-test] @@ -915,7 +915,7 @@ [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong falsePrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test] - settingSwitchValue = Just False, [opt-env-conf-test] + settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:919:32-37 [opt-env-conf-test] @@ -916,7 +916,7 @@ [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Just False, [opt-env-conf-test] - settingTryOption = False, [opt-env-conf-test] + settingTryOption = True, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:924:29-33 [opt-env-conf-test] @@ -921,7 +921,7 @@ [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] - settingHidden = True, [opt-env-conf-test] + settingHidden = False, [opt-env-conf-test]  settingMetavar = Nothing, [opt-env-conf-test]  settingHelp = Nothing, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:939:36-41 [opt-env-conf-test] @@ -936,7 +936,7 @@ [opt-env-conf-test]  Setting [opt-env-conf-test]  { settingDasheds = [], [opt-env-conf-test]  settingReaders = (auto :: Reader Bool) : settingReaders s, [opt-env-conf-test] - settingTryArgument = False, [opt-env-conf-test] + settingTryArgument = True, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Just ne, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:941:34-39 [opt-env-conf-test] @@ -938,7 +938,7 @@ [opt-env-conf-test]  settingReaders = (auto :: Reader Bool) : settingReaders s, [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test] - settingTryOption = False, [opt-env-conf-test] + settingTryOption = True, [opt-env-conf-test]  settingEnvVars = Just ne, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:942:32-39 [opt-env-conf-test] @@ -939,7 +939,7 @@ [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test] - settingEnvVars = Just ne, [opt-env-conf-test] + settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:946:31-36 [opt-env-conf-test] @@ -943,7 +943,7 @@ [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] - settingHidden = False, [opt-env-conf-test] + settingHidden = True, [opt-env-conf-test]  settingMetavar = Just "BOOL", [opt-env-conf-test]  settingHelp = settingHelp s, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:947:32-43 [opt-env-conf-test] @@ -944,7 +944,7 @@ [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test]  settingHidden = False, [opt-env-conf-test] - settingMetavar = Just "BOOL", [opt-env-conf-test] + settingMetavar = Nothing, [opt-env-conf-test]  settingHelp = settingHelp s, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test]  settingRequiredCapabilities = Set.empty [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:960:36-41 [opt-env-conf-test] @@ -957,7 +957,7 @@ [opt-env-conf-test]  Setting [opt-env-conf-test]  { settingDasheds = [], [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test] - settingTryArgument = False, [opt-env-conf-test] + settingTryArgument = True, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:962:34-39 [opt-env-conf-test] @@ -959,7 +959,7 @@ [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test] - settingTryOption = False, [opt-env-conf-test] + settingTryOption = True, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Just ne, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:964:35-42 [opt-env-conf-test] @@ -961,7 +961,7 @@ [opt-env-conf-test]  settingSwitchValue = Nothing, [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test] - settingConfigVals = Just ne, [opt-env-conf-test] + settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test]  settingHidden = False, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:967:31-36 [opt-env-conf-test] @@ -964,7 +964,7 @@ [opt-env-conf-test]  settingConfigVals = Just ne, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] - settingHidden = False, [opt-env-conf-test] + settingHidden = True, [opt-env-conf-test]  settingMetavar = Nothing, [opt-env-conf-test]  settingHelp = settingHelp s, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:979:34-39 [opt-env-conf-test] @@ -976,7 +976,7 @@ [opt-env-conf-test]  Setting [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong helpPrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test] - settingTryArgument = False, [opt-env-conf-test] + settingTryArgument = True, [opt-env-conf-test]  settingSwitchValue = Just True, -- Unused [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:980:39-43 [opt-env-conf-test] @@ -977,7 +977,7 @@ [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong helpPrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test] - settingSwitchValue = Just True, -- Unused [opt-env-conf-test] + settingSwitchValue = Just False, -- Unused [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:980:34-43 [opt-env-conf-test] @@ -977,7 +977,7 @@ [opt-env-conf-test]  { settingDasheds = mapMaybe (prefixDashedLong helpPrefix) (settingDasheds s), [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test] - settingSwitchValue = Just True, -- Unused [opt-env-conf-test] + settingSwitchValue = Nothing, -- Unused [opt-env-conf-test]  settingTryOption = False, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:981:32-37 [opt-env-conf-test] @@ -978,7 +978,7 @@ [opt-env-conf-test]  settingReaders = [], [opt-env-conf-test]  settingTryArgument = False, [opt-env-conf-test]  settingSwitchValue = Just True, -- Unused [opt-env-conf-test] - settingTryOption = False, [opt-env-conf-test] + settingTryOption = True, [opt-env-conf-test]  settingEnvVars = Nothing, [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:986:29-34 [opt-env-conf-test] @@ -983,7 +983,7 @@ [opt-env-conf-test]  settingConfigVals = Nothing, [opt-env-conf-test]  settingDefaultValue = Nothing, [opt-env-conf-test]  settingExamples = [], [opt-env-conf-test] - settingHidden = False, [opt-env-conf-test] + settingHidden = True, [opt-env-conf-test]  settingMetavar = Nothing, [opt-env-conf-test]  settingHelp = settingHelp s, [opt-env-conf-test]  settingCompleter = Nothing, [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf-test] @@ -480,10 +480,7 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  setting $ [opt-env-conf-test]  builders [opt-env-conf-test] - ++ [ reader str, [opt-env-conf-test] - metavar "FILE_PATH", [opt-env-conf-test] - completer filePath [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | A setting for @Path Abs dir@. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf-test] @@ -480,10 +480,9 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  setting $ [opt-env-conf-test]  builders [opt-env-conf-test] - ++ [ reader str, [opt-env-conf-test]  metavar "FILE_PATH", [opt-env-conf-test]  completer filePath [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | A setting for @Path Abs dir@. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:483:14-15 [opt-env-conf-test] @@ -480,10 +480,9 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  setting $ [opt-env-conf-test]  builders [opt-env-conf-test]  ++ [ reader str, [opt-env-conf-test]  metavar "FILE_PATH", [opt-env-conf-test] - completer filePath [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | A setting for @Path Abs dir@. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:829:41-58 [opt-env-conf-test] @@ -826,7 +826,6 @@ [opt-env-conf-test]  long "config-file", [opt-env-conf-test]  env "CONFIG_FILE", [opt-env-conf-test]  help "Path to the configuration file", [opt-env-conf-test] - completer (filePathWithExtensions [".yaml", ".yml"]) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Define a setting for a 'Bool' with a given default value. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:829:41-58 [opt-env-conf-test] @@ -826,7 +826,6 @@ [opt-env-conf-test]  long "config-file", [opt-env-conf-test]  env "CONFIG_FILE", [opt-env-conf-test]  help "Path to the configuration file", [opt-env-conf-test] - completer (filePathWithExtensions [".yaml", ".yml"]) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Define a setting for a 'Bool' with a given default value. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf-test] @@ -822,12 +822,7 @@ [opt-env-conf-test]  configuredConfigFile :: (HasCallStack) => Parser (Path Abs File) [opt-env-conf-test]  configuredConfigFile = [opt-env-conf-test]  filePathSetting [opt-env-conf-test] - [ option, [opt-env-conf-test] - long "config-file", [opt-env-conf-test] - env "CONFIG_FILE", [opt-env-conf-test] - help "Path to the configuration file", [opt-env-conf-test] - completer (filePathWithExtensions [".yaml", ".yml"]) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Define a setting for a 'Bool' with a given default value. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf-test] @@ -822,12 +822,11 @@ [opt-env-conf-test]  configuredConfigFile :: (HasCallStack) => Parser (Path Abs File) [opt-env-conf-test]  configuredConfigFile = [opt-env-conf-test]  filePathSetting [opt-env-conf-test] - [ option, [opt-env-conf-test]  long "config-file", [opt-env-conf-test]  env "CONFIG_FILE", [opt-env-conf-test]  help "Path to the configuration file", [opt-env-conf-test]  completer (filePathWithExtensions [".yaml", ".yml"]) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Define a setting for a 'Bool' with a given default value. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:825:5-6 [opt-env-conf-test] @@ -822,12 +822,11 @@ [opt-env-conf-test]  configuredConfigFile :: (HasCallStack) => Parser (Path Abs File) [opt-env-conf-test]  configuredConfigFile = [opt-env-conf-test]  filePathSetting [opt-env-conf-test]  [ option, [opt-env-conf-test]  long "config-file", [opt-env-conf-test]  env "CONFIG_FILE", [opt-env-conf-test]  help "Path to the configuration file", [opt-env-conf-test] - completer (filePathWithExtensions [".yaml", ".yml"]) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Define a setting for a 'Bool' with a given default value. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Parser.hs:774:47-68 [opt-env-conf-test] @@ -771,7 +771,7 @@ [opt-env-conf-test]  combineMaybeObjects :: Maybe JSON.Object -> Maybe JSON.Object -> Maybe JSON.Object [opt-env-conf-test]  combineMaybeObjects Nothing mo = mo [opt-env-conf-test]  combineMaybeObjects mo Nothing = mo [opt-env-conf-test] - combineMaybeObjects (Just o1) (Just o2) = Just (combiner o1 o2) [opt-env-conf-test] + combineMaybeObjects (Just o1) (Just o2) = Nothing [opt-env-conf-test]  [opt-env-conf-test]  combineConfigObjects :: JSON.Object -> JSON.Object -> JSON.Object [opt-env-conf-test]  combineConfigObjects = KM.unionWith combineValues [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf-test] @@ -497,10 +497,7 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  setting $ [opt-env-conf-test]  builders [opt-env-conf-test] - ++ [ reader str, [opt-env-conf-test] - metavar "DIRECTORY_PATH", [opt-env-conf-test] - completer directoryPath [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'setting' with 'option', a 'reader' set to 'str', and the 'metavar' set to @STR@. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf-test] @@ -497,10 +497,9 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  setting $ [opt-env-conf-test]  builders [opt-env-conf-test] - ++ [ reader str, [opt-env-conf-test]  metavar "DIRECTORY_PATH", [opt-env-conf-test]  completer directoryPath [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'setting' with 'option', a 'reader' set to 'str', and the 'metavar' set to @STR@. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:500:14-15 [opt-env-conf-test] @@ -497,10 +497,9 @@ [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  setting $ [opt-env-conf-test]  builders [opt-env-conf-test]  ++ [ reader str, [opt-env-conf-test]  metavar "DIRECTORY_PATH", [opt-env-conf-test] - completer directoryPath [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'setting' with 'option', a 'reader' set to 'str', and the 'metavar' set to @STR@. [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:788:19-38 [opt-env-conf-test] @@ -785,11 +785,10 @@ [opt-env-conf-test]  xdgYamlConfigFile subdir = [opt-env-conf-test]  mapIO [opt-env-conf-test]  ( \mXdgDir -> do [opt-env-conf-test]  xdgDir <- case mXdgDir of [opt-env-conf-test] - Just d -> resolveDir' d [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  home <- getHomeDir [opt-env-conf-test]  resolveDir home ".config" [opt-env-conf-test]  configDir <- resolveDir xdgDir subdir [opt-env-conf-test]  resolveFile configDir "config.yaml" [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:788:19-38 [opt-env-conf-test] @@ -785,11 +785,8 @@ [opt-env-conf-test]  xdgYamlConfigFile subdir = [opt-env-conf-test]  mapIO [opt-env-conf-test]  ( \mXdgDir -> do [opt-env-conf-test]  xdgDir <- case mXdgDir of [opt-env-conf-test]  Just d -> resolveDir' d [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - home <- getHomeDir [opt-env-conf-test] - resolveDir home ".config" [opt-env-conf-test]  configDir <- resolveDir xdgDir subdir [opt-env-conf-test]  resolveFile configDir "config.yaml" [opt-env-conf-test]  ) [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf-test] @@ -796,12 +796,7 @@ [opt-env-conf-test]  $ optional [opt-env-conf-test]  $ withFrozenCallStack [opt-env-conf-test]  $ setting [opt-env-conf-test] - [ help "Path to the XDG configuration directory", [opt-env-conf-test] - reader str, [opt-env-conf-test] - env "XDG_CONFIG_HOME", [opt-env-conf-test] - metavar "DIRECTORY", [opt-env-conf-test] - hidden [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Load a config file that is reconfigurable with an option and environment [opt-env-conf-test]  -- variable but @config.yaml@ in the local working directory by default. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf-test] @@ -796,12 +796,11 @@ [opt-env-conf-test]  $ optional [opt-env-conf-test]  $ withFrozenCallStack [opt-env-conf-test]  $ setting [opt-env-conf-test] - [ help "Path to the XDG configuration directory", [opt-env-conf-test]  reader str, [opt-env-conf-test]  env "XDG_CONFIG_HOME", [opt-env-conf-test]  metavar "DIRECTORY", [opt-env-conf-test]  hidden [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Load a config file that is reconfigurable with an option and environment [opt-env-conf-test]  -- variable but @config.yaml@ in the local working directory by default. [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Parser.hs:799:7-8 [opt-env-conf-test] @@ -796,12 +796,11 @@ [opt-env-conf-test]  $ optional [opt-env-conf-test]  $ withFrozenCallStack [opt-env-conf-test]  $ setting [opt-env-conf-test]  [ help "Path to the XDG configuration directory", [opt-env-conf-test]  reader str, [opt-env-conf-test]  env "XDG_CONFIG_HOME", [opt-env-conf-test]  metavar "DIRECTORY", [opt-env-conf-test] - hidden [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  -- | Load a config file that is reconfigurable with an option and environment [opt-env-conf-test]  -- variable but @config.yaml@ in the local working directory by default. [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d > 0) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d > 1) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d > -10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d < 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d <= 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf-test] @@ -168,7 +168,7 @@ [opt-env-conf-test]  -- import System.IO [opt-env-conf-test]  -- hPutStrLn stderr $ show (enriched, index, ws) [opt-env-conf-test]  -- hPutStrLn stderr $ show evaluatedCompletions [opt-env-conf-test] - if enriched [opt-env-conf-test] + if not (enriched) [opt-env-conf-test]  then [opt-env-conf-test]  putStr $ [opt-env-conf-test]  unlines $ [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf-test] @@ -168,7 +168,7 @@ [opt-env-conf-test]  -- import System.IO [opt-env-conf-test]  -- hPutStrLn stderr $ show (enriched, index, ws) [opt-env-conf-test]  -- hPutStrLn stderr $ show evaluatedCompletions [opt-env-conf-test] - if enriched [opt-env-conf-test] + if False [opt-env-conf-test]  then [opt-env-conf-test]  putStr $ [opt-env-conf-test]  unlines $ [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:171:6-14 [opt-env-conf-test] @@ -168,7 +168,7 @@ [opt-env-conf-test]  -- import System.IO [opt-env-conf-test]  -- hPutStrLn stderr $ show (enriched, index, ws) [opt-env-conf-test]  -- hPutStrLn stderr $ show evaluatedCompletions [opt-env-conf-test] - if enriched [opt-env-conf-test] + if True [opt-env-conf-test]  then [opt-env-conf-test]  putStr $ [opt-env-conf-test]  unlines $ [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Completion.hs:163:17-18 [opt-env-conf-test] @@ -160,7 +160,7 @@ [opt-env-conf-test]  -- [opt-env-conf-test]  -- We use 'drop 1' here because we don't care about the progname anymore. [opt-env-conf-test]  let index = pred index' [opt-env-conf-test] - let ws = drop 1 ws' [opt-env-conf-test] + let ws = drop -1 ws' [opt-env-conf-test]  let arg = fromMaybe "" $ listToMaybe $ drop index ws [opt-env-conf-test]  let completions = pureCompletionQuery parser index ws [opt-env-conf-test]  evaluatedCompletions <- evalCompletions arg completions [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:487:32-39 [opt-env-conf-test] @@ -484,4 +484,4 @@ [opt-env-conf-test]  -- this branch, improving completions when one branch [opt-env-conf-test]  -- is env/conf-only and the other has args/options. [opt-env-conf-test]  -- This would require IO or an environment parameter. [opt-env-conf-test] - pure $ Just [] [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Completion.hs:163:17-18 [opt-env-conf-test] @@ -160,7 +160,7 @@ [opt-env-conf-test]  -- [opt-env-conf-test]  -- We use 'drop 1' here because we don't care about the progname anymore. [opt-env-conf-test]  let index = pred index' [opt-env-conf-test] - let ws = drop 1 ws' [opt-env-conf-test] + let ws = drop 0 ws' [opt-env-conf-test]  let arg = fromMaybe "" $ listToMaybe $ drop index ws [opt-env-conf-test]  let completions = pureCompletionQuery parser index ws [opt-env-conf-test]  evaluatedCompletions <- evalCompletions arg completions [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d >= 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf-test] @@ -305,7 +305,7 @@ [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] - . go 11 pf [opt-env-conf-test] + . go 0 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf-test] @@ -305,7 +305,7 @@ [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] - . go 11 pf [opt-env-conf-test] + . go 1 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:308:18-20 [opt-env-conf-test] @@ -305,7 +305,7 @@ [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] - . go 11 pf [opt-env-conf-test] + . go -11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf-test] @@ -307,7 +307,7 @@ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 pa [opt-env-conf-test] + . go 0 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf-test] @@ -307,7 +307,7 @@ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 pa [opt-env-conf-test] + . go 1 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:310:18-20 [opt-env-conf-test] @@ -307,7 +307,7 @@ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 pa [opt-env-conf-test] + . go -11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:312:24-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:312:20-26 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:312:19-27 [opt-env-conf-test] @@ -309,7 +309,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pa [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf-test] @@ -311,7 +311,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test] - . go 11 pe [opt-env-conf-test] + . go 0 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf-test] @@ -311,7 +311,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test] - . go 11 pe [opt-env-conf-test] + . go 1 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:314:18-20 [opt-env-conf-test] @@ -311,7 +311,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Select " [opt-env-conf-test] - . go 11 pe [opt-env-conf-test] + . go -11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf-test] @@ -313,7 +313,7 @@ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 pf [opt-env-conf-test] + . go 0 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf-test] @@ -313,7 +313,7 @@ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 pf [opt-env-conf-test] + . go 1 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:316:18-20 [opt-env-conf-test] @@ -313,7 +313,7 @@ [opt-env-conf-test]  showString "Select " [opt-env-conf-test]  . go 11 pe [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 pf [opt-env-conf-test] + . go -11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf-test] @@ -316,7 +316,7 @@ [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test]  showString "Empty " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf-test] @@ -316,7 +316,7 @@ [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test]  showString "Empty " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:319:23-25 [opt-env-conf-test] @@ -316,7 +316,7 @@ [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  ParserEmpty mLoc -> [opt-env-conf-test]  showString "Empty " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf-test] @@ -320,7 +320,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test] - . go 11 p1 [opt-env-conf-test] + . go 0 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf-test] @@ -320,7 +320,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test] - . go 11 p1 [opt-env-conf-test] + . go 1 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:323:18-20 [opt-env-conf-test] @@ -320,7 +320,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test] - . go 11 p1 [opt-env-conf-test] + . go -11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf-test] @@ -322,7 +322,7 @@ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p2 [opt-env-conf-test] + . go 0 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf-test] @@ -322,7 +322,7 @@ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p2 [opt-env-conf-test] + . go 1 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:325:18-20 [opt-env-conf-test] @@ -322,7 +322,7 @@ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p2 [opt-env-conf-test] + . go -11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf-test] @@ -326,7 +326,7 @@ [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf-test] @@ -326,7 +326,7 @@ [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:329:25-27 [opt-env-conf-test] @@ -326,7 +326,7 @@ [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf-test] @@ -328,7 +328,7 @@ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 0 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf-test] @@ -328,7 +328,7 @@ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 1 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:331:18-20 [opt-env-conf-test] @@ -328,7 +328,7 @@ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go -11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf-test] @@ -332,7 +332,7 @@ [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf-test] @@ -332,7 +332,7 @@ [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:335:25-27 [opt-env-conf-test] @@ -332,7 +332,7 @@ [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf-test] @@ -334,7 +334,7 @@ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 0 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf-test] @@ -334,7 +334,7 @@ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 1 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:337:18-20 [opt-env-conf-test] @@ -334,7 +334,7 @@ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go -11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:339:24-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:339:20-26 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:339:19-27 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf-test] @@ -338,7 +338,7 @@ [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf-test] @@ -338,7 +338,7 @@ [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:341:25-27 [opt-env-conf-test] @@ -338,7 +338,7 @@ [opt-env-conf-test]  ParserAllOrNothing mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf-test] @@ -340,7 +340,7 @@ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 0 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf-test] @@ -340,7 +340,7 @@ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 1 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:343:18-20 [opt-env-conf-test] @@ -340,7 +340,7 @@ [opt-env-conf-test]  showString "AllOrNothing " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go -11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf-test] @@ -344,7 +344,7 @@ [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf-test] @@ -344,7 +344,7 @@ [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:347:25-27 [opt-env-conf-test] @@ -344,7 +344,7 @@ [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf-test] @@ -346,7 +346,7 @@ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 forgivable [opt-env-conf-test] + . showsPrec 0 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf-test] @@ -346,7 +346,7 @@ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 forgivable [opt-env-conf-test] + . showsPrec 1 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:349:25-27 [opt-env-conf-test] @@ -346,7 +346,7 @@ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 forgivable [opt-env-conf-test] + . showsPrec -11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf-test] @@ -346,7 +346,7 @@ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 forgivable [opt-env-conf-test] + . showsPrec 11 True [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf-test] @@ -346,7 +346,7 @@ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 forgivable [opt-env-conf-test] + . showsPrec 11 False [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:349:28-38 [opt-env-conf-test] @@ -346,7 +346,7 @@ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 forgivable [opt-env-conf-test] + . showsPrec 11 not (forgivable) [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf-test] @@ -348,7 +348,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 caps [opt-env-conf-test] + . showsPrec 0 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf-test] @@ -348,7 +348,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 caps [opt-env-conf-test] + . showsPrec 1 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:351:25-27 [opt-env-conf-test] @@ -348,7 +348,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 forgivable [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 caps [opt-env-conf-test] + . showsPrec -11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf-test] @@ -350,7 +350,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 0 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf-test] @@ -350,7 +350,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go 1 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:353:18-20 [opt-env-conf-test] @@ -350,7 +350,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 caps [opt-env-conf-test]  . showString " _ " [opt-env-conf-test] - . go 11 p [opt-env-conf-test] + . go -11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf-test] @@ -354,7 +354,7 @@ [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 mDefault [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf-test] @@ -354,7 +354,7 @@ [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 mDefault [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:357:25-27 [opt-env-conf-test] @@ -354,7 +354,7 @@ [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 mDefault [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf-test] @@ -356,7 +356,7 @@ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 mDefault [opt-env-conf-test] + . showsPrec 0 mDefault [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith [opt-env-conf-test]  showCommandABit [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf-test] @@ -356,7 +356,7 @@ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 mDefault [opt-env-conf-test] + . showsPrec 1 mDefault [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith [opt-env-conf-test]  showCommandABit [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:359:25-27 [opt-env-conf-test] @@ -356,7 +356,7 @@ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 mDefault [opt-env-conf-test] + . showsPrec -11 mDefault [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showListWith [opt-env-conf-test]  showCommandABit [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:367:25-27 [opt-env-conf-test] @@ -364,7 +364,7 @@ [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf-test] @@ -366,7 +366,7 @@ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p1 [opt-env-conf-test] + . go 0 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf-test] @@ -366,7 +366,7 @@ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p1 [opt-env-conf-test] + . go 1 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:369:18-20 [opt-env-conf-test] @@ -366,7 +366,7 @@ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p1 [opt-env-conf-test] + . go -11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf-test] @@ -368,7 +368,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p2 [opt-env-conf-test] + . go 0 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf-test] @@ -368,7 +368,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p2 [opt-env-conf-test] + . go 1 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:371:18-20 [opt-env-conf-test] @@ -368,7 +368,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . go 11 p2 [opt-env-conf-test] + . go -11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen False $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen True $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (not (d > 10)) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (True) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (False) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:473:53-60 [opt-env-conf-test] @@ -470,7 +470,7 @@ [opt-env-conf-test]  -- the option because consumeOption would try to [opt-env-conf-test]  -- consume the option argument too. [opt-env-conf-test]  case Args.consumeSwitch settingDasheds as of [opt-env-conf-test] - Nothing -> pure $ Just [] [opt-env-conf-test] + Nothing -> pure $ Nothing [opt-env-conf-test]  Just as' -> do [opt-env-conf-test]  put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:457:44-43 [opt-env-conf-test] @@ -454,9 +454,8 @@ [opt-env-conf-test]  then do [opt-env-conf-test]  -- First we try to consume the option so we don't suggest it if it's already been parsed [opt-env-conf-test]  case Args.consumeOption settingDasheds as of [opt-env-conf-test]  Just (_, as') -> do [opt-env-conf-test] - put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  if argsAtEnd as [opt-env-conf-test]  then completeWithDasheds [opt-env-conf-test] Testing mutation MaybeOp at src/OptEnvConf/Completion.hs:451:32-39 [opt-env-conf-test] @@ -448,7 +448,7 @@ [opt-env-conf-test]  completeWithDasheds [opt-env-conf-test]  Just as' -> do [opt-env-conf-test]  put as' [opt-env-conf-test] - pure $ Just [] [opt-env-conf-test] + pure $ Nothing [opt-env-conf-test]  else do [opt-env-conf-test]  if settingTryOption [opt-env-conf-test]  then do [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf-test] @@ -372,7 +372,7 @@ [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 0 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showSettingABit p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  showString "Command " [opt-env-conf-test]  . showsPrec 11 commandArg [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 commandHelp [opt-env-conf-test] + . showsPrec -11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showParserPrec 11 commandParser [opt-env-conf-test]  [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf-test] @@ -135,7 +135,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showParserPrec 11 commandParser [opt-env-conf-test] + . showParserPrec 0 commandParser [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'Parser' structure [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf-test] @@ -135,7 +135,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showParserPrec 11 commandParser [opt-env-conf-test] + . showParserPrec 1 commandParser [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'Parser' structure [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:138:22-24 [opt-env-conf-test] @@ -135,7 +135,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showParserPrec 11 commandParser [opt-env-conf-test] + . showParserPrec -11 commandParser [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'Parser' structure [opt-env-conf-test]  -- [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:297:39-40 [opt-env-conf-test] @@ -294,7 +294,7 @@ [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test]  showParserABit :: Parser a -> String [opt-env-conf-test] -showParserABit = flip (showParserPrec 0) "" [opt-env-conf-test] +showParserABit = flip (showParserPrec 1) "" [opt-env-conf-test]  [opt-env-conf-test]  showParserPrec :: Int -> Parser a -> ShowS [opt-env-conf-test]  showParserPrec = go [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:255:27-32 [opt-env-conf-test] @@ -252,7 +252,7 @@ [opt-env-conf-test]  (<|>) p1 p2 = [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test] - ParserPure _ -> False [opt-env-conf-test] + ParserPure _ -> True [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> True && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> False && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> not (isEmpty pf) && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf && True [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf && False [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf && not (isEmpty pa) [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> True [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> False [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf || isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> not (isEmpty pf && isEmpty pa) [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> True && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> False && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:257:33-43 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> not (isEmpty pe) && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> isEmpty pe && True [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> isEmpty pe && False [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:257:47-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> isEmpty pe && not (isEmpty pf) [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> True [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> False [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> isEmpty pe || isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:257:33-57 [opt-env-conf-test] @@ -254,7 +254,7 @@ [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] - ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] + ParserSelect pe pf -> not (isEmpty pe && isEmpty pf) [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:258:28-32 [opt-env-conf-test] @@ -255,7 +255,7 @@ [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] - ParserEmpty _ -> True [opt-env-conf-test] + ParserEmpty _ -> False [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:259:28-33 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test] - ParserAlt _ _ -> False [opt-env-conf-test] + ParserAlt _ _ -> True [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf-test] @@ -257,7 +257,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] - ParserMany _ p -> isEmpty p [opt-env-conf-test] + ParserMany _ p -> True [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf-test] @@ -257,7 +257,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] - ParserMany _ p -> isEmpty p [opt-env-conf-test] + ParserMany _ p -> False [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf-test] @@ -257,7 +257,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] - ParserMany _ p -> isEmpty p [opt-env-conf-test] + ParserMany _ p -> not (isEmpty p) [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf-test] @@ -258,7 +258,7 @@ [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] - ParserSome _ p -> isEmpty p [opt-env-conf-test] + ParserSome _ p -> True [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf-test] @@ -258,7 +258,7 @@ [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] - ParserSome _ p -> isEmpty p [opt-env-conf-test] + ParserSome _ p -> False [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:261:29-38 [opt-env-conf-test] @@ -258,7 +258,7 @@ [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test] - ParserSome _ p -> isEmpty p [opt-env-conf-test] + ParserSome _ p -> not (isEmpty p) [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test] - ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] + ParserAllOrNothing _ p -> True [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test] - ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] + ParserAllOrNothing _ p -> False [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test] - ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] + ParserAllOrNothing _ p -> not (isEmpty p) [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf-test] @@ -260,7 +260,7 @@ [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] - ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] + ParserCheck _ _ _ _ p -> True [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf-test] @@ -260,7 +260,7 @@ [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] - ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] + ParserCheck _ _ _ _ p -> False [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf-test] @@ -260,7 +260,7 @@ [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] - ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] + ParserCheck _ _ _ _ p -> not (isEmpty p) [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf-test] @@ -261,7 +261,7 @@ [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] - ParserCommands _ _ cs -> null cs [opt-env-conf-test] + ParserCommands _ _ cs -> True [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf-test] @@ -261,7 +261,7 @@ [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] - ParserCommands _ _ cs -> null cs [opt-env-conf-test] + ParserCommands _ _ cs -> False [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf-test] @@ -261,7 +261,7 @@ [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] - ParserCommands _ _ cs -> null cs [opt-env-conf-test] + ParserCommands _ _ cs -> not (null cs) [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> True && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> False && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:265:39-49 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> not (isEmpty pc) && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> isEmpty pc && True [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> isEmpty pc && False [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:265:53-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> isEmpty pc && not (isEmpty ps) [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> True [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> False [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation LogicOp at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> isEmpty pc || isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:265:39-63 [opt-env-conf-test] @@ -262,7 +262,7 @@ [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test] - ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] + ParserWithConfig _ pc ps -> not (isEmpty pc && isEmpty ps) [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:266:32-37 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test] - ParserSetting _ _ -> False [opt-env-conf-test] + ParserSetting _ _ -> True [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (True, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (False, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (not (isEmpty p1), isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (isEmpty p1, True) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (isEmpty p1, False) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (isEmpty p1, not (isEmpty p2)) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf-test] @@ -269,26 +269,24 @@ [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test] - (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test] - go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf-test] @@ -269,26 +269,24 @@ [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test] - (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test] - ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf-test] @@ -269,26 +269,25 @@ [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test] - _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,31 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] - (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,31 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] - (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,31 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test] - (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,10 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test] - (False, False) -> [opt-env-conf-test] - let go p1' p2' = case (p1', p2') of [opt-env-conf-test] - -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test] - -- alts to always be right-leaning [opt-env-conf-test] - -- [opt-env-conf-test] - -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test] - -- p [opt-env-conf-test] - -- / \ [opt-env-conf-test] - -- p1 p2 [opt-env-conf-test] - -- / \ [opt-env-conf-test] - -- p3 p4 [opt-env-conf-test] - -- [opt-env-conf-test] - -- We need to rearrange it to [opt-env-conf-test] - -- p [opt-env-conf-test] - -- / \ [opt-env-conf-test] - -- p1 ++ p3 p4 [opt-env-conf-test] - (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test] - go (go p1' p3') p4' [opt-env-conf-test] - (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test] - ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test] - _ -> ParserAlt p1' p2' [opt-env-conf-test] - in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf-test] @@ -239,10 +239,9 @@ [opt-env-conf-test]  [opt-env-conf-test]  instance Applicative Parser where [opt-env-conf-test]  pure = ParserPure [opt-env-conf-test]  (<*>) p1 p2 = case (p1, p2) of [opt-env-conf-test]  -- Homomorphism law for applicative [opt-env-conf-test] - (ParserPure f, ParserPure a) -> ParserPure (f a) [opt-env-conf-test]  _ -> ParserAp p1 p2 [opt-env-conf-test]  [opt-env-conf-test]  instance Selective Parser where [opt-env-conf-test]  select = ParserSelect [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf-test] @@ -239,10 +239,9 @@ [opt-env-conf-test]  [opt-env-conf-test]  instance Applicative Parser where [opt-env-conf-test]  pure = ParserPure [opt-env-conf-test]  (<*>) p1 p2 = case (p1, p2) of [opt-env-conf-test]  -- Homomorphism law for applicative [opt-env-conf-test]  (ParserPure f, ParserPure a) -> ParserPure (f a) [opt-env-conf-test] - _ -> ParserAp p1 p2 [opt-env-conf-test]  [opt-env-conf-test]  instance Selective Parser where [opt-env-conf-test]  select = ParserSelect [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf-test] @@ -231,7 +231,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> ParserSelect (fmap (fmap f) pe) (fmap (fmap f) pf) [opt-env-conf-test]  ParserEmpty mLoc -> ParserEmpty mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt (fmap f p1) (fmap f p2) [opt-env-conf-test] - ParserCheck mLoc forgivable caps g p -> ParserCheck mLoc forgivable caps (fmap (fmap f) . g) p [opt-env-conf-test] + ParserCheck mLoc forgivable caps g p -> ParserCheck mLoc True caps (fmap (fmap f) . g) p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault $ map (fmap f) cs [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> ParserWithConfig mLoc pc (fmap f pa) [opt-env-conf-test]  -- If we ever make Setting a functor, then we need to fmap here [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf-test] @@ -231,7 +231,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> ParserSelect (fmap (fmap f) pe) (fmap (fmap f) pf) [opt-env-conf-test]  ParserEmpty mLoc -> ParserEmpty mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt (fmap f p1) (fmap f p2) [opt-env-conf-test] - ParserCheck mLoc forgivable caps g p -> ParserCheck mLoc forgivable caps (fmap (fmap f) . g) p [opt-env-conf-test] + ParserCheck mLoc forgivable caps g p -> ParserCheck mLoc False caps (fmap (fmap f) . g) p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault $ map (fmap f) cs [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> ParserWithConfig mLoc pc (fmap f pa) [opt-env-conf-test]  -- If we ever make Setting a functor, then we need to fmap here [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:234:62-72 [opt-env-conf-test] @@ -231,7 +231,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> ParserSelect (fmap (fmap f) pe) (fmap (fmap f) pf) [opt-env-conf-test]  ParserEmpty mLoc -> ParserEmpty mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt (fmap f p1) (fmap f p2) [opt-env-conf-test] - ParserCheck mLoc forgivable caps g p -> ParserCheck mLoc forgivable caps (fmap (fmap f) . g) p [opt-env-conf-test] + ParserCheck mLoc forgivable caps g p -> ParserCheck mLoc not (forgivable) caps (fmap (fmap f) . g) p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault $ map (fmap f) cs [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> ParserWithConfig mLoc pc (fmap f pa) [opt-env-conf-test]  -- If we ever make Setting a functor, then we need to fmap here [opt-env-conf-test] Testing mutation BoolLit at src/OptEnvConf/Parser.hs:238:30-34 [opt-env-conf-test] @@ -235,7 +235,7 @@ [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> ParserCommands mLoc mDefault $ map (fmap f) cs [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> ParserWithConfig mLoc pc (fmap f pa) [opt-env-conf-test]  -- If we ever make Setting a functor, then we need to fmap here [opt-env-conf-test] - p -> ParserCheck Nothing True Set.empty (pure . Right . f) p [opt-env-conf-test] + p -> ParserCheck Nothing False Set.empty (pure . Right . f) p [opt-env-conf-test]  [opt-env-conf-test]  instance Applicative Parser where [opt-env-conf-test]  pure = ParserPure [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  showString "Command " [opt-env-conf-test]  . showsPrec 11 commandArg [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 commandHelp [opt-env-conf-test] + . showsPrec 0 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showParserPrec 11 commandParser [opt-env-conf-test]  [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf-test] @@ -131,7 +131,7 @@ [opt-env-conf-test]  showCommandABit :: Command a -> ShowS [opt-env-conf-test]  showCommandABit Command {..} = [opt-env-conf-test]  showString "Command " [opt-env-conf-test] - . showsPrec 11 commandArg [opt-env-conf-test] + . showsPrec -11 commandArg [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf-test] @@ -131,7 +131,7 @@ [opt-env-conf-test]  showCommandABit :: Command a -> ShowS [opt-env-conf-test]  showCommandABit Command {..} = [opt-env-conf-test]  showString "Command " [opt-env-conf-test] - . showsPrec 11 commandArg [opt-env-conf-test] + . showsPrec 1 commandArg [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf-test] @@ -372,7 +372,7 @@ [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec -11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showSettingABit p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:134:17-19 [opt-env-conf-test] @@ -131,7 +131,7 @@ [opt-env-conf-test]  showCommandABit :: Command a -> ShowS [opt-env-conf-test]  showCommandABit Command {..} = [opt-env-conf-test]  showString "Command " [opt-env-conf-test] - . showsPrec 11 commandArg [opt-env-conf-test] + . showsPrec 0 commandArg [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showsPrec 11 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:375:25-27 [opt-env-conf-test] @@ -372,7 +372,7 @@ [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test] - . showsPrec 11 mLoc [opt-env-conf-test] + . showsPrec 1 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showSettingABit p [opt-env-conf-test]  [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test] Testing mutation IntLit at src/OptEnvConf/Parser.hs:136:17-19 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  showString "Command " [opt-env-conf-test]  . showsPrec 11 commandArg [opt-env-conf-test]  . showString " " [opt-env-conf-test] - . showsPrec 11 commandHelp [opt-env-conf-test] + . showsPrec 1 commandHelp [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . showParserPrec 11 commandParser [opt-env-conf-test]  [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf-test] @@ -458,7 +458,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - if argsAtEnd as [opt-env-conf-test] + if True [opt-env-conf-test]  then completeWithDasheds [opt-env-conf-test]  else do [opt-env-conf-test]  -- If we're not at the end, we may be between an option's [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Completion.hs:461:32-44 [opt-env-conf-test] @@ -458,7 +458,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - if argsAtEnd as [opt-env-conf-test] + if False [opt-env-conf-test]  then completeWithDasheds [opt-env-conf-test]  else do [opt-env-conf-test]  -- If we're not at the end, we may be between an option's [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen not ((d > 10)) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:474:47-63 [opt-env-conf-test] @@ -471,9 +471,8 @@ [opt-env-conf-test]  -- consume the option argument too. [opt-env-conf-test]  case Args.consumeSwitch settingDasheds as of [opt-env-conf-test]  Nothing -> pure $ Just [] [opt-env-conf-test]  Just as' -> do [opt-env-conf-test] - put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else do [opt-env-conf-test]  -- We can't auto-complete settings parsed from env vars [opt-env-conf-test]  -- or config values, but this path is still valid. [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Completion.hs:441:20-45 [opt-env-conf-test] @@ -438,7 +438,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test] - if isJust settingSwitchValue [opt-env-conf-test] + if not (isJust settingSwitchValue) [opt-env-conf-test]  then do [opt-env-conf-test]  -- Try to parse the switch first, so we don't suggest it if [opt-env-conf-test]  -- it's already been parsed. [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:426:35-35 [opt-env-conf-test] @@ -423,9 +423,8 @@ [opt-env-conf-test]  -- that over the "don't consume" fallback, because a [opt-env-conf-test]  -- consumed value means the user already provided input. [opt-env-conf-test]  case filter (isJust . fst) possibilities of [opt-env-conf-test]  (_, as') : _ -> do [opt-env-conf-test] - put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  [] -> [opt-env-conf-test]  -- No possibility consumed a value. This is either [opt-env-conf-test]  -- because there are no args at all (the [] case from [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Run.hs:144:15-60 [opt-env-conf-test] @@ -141,7 +141,6 @@ [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  a <- go p' [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:138:11-28 [opt-env-conf-test] @@ -135,11 +135,10 @@ [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test] - Nothing -> pure [] [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Completion.hs:437:39-51 [opt-env-conf-test] @@ -434,9 +434,8 @@ [opt-env-conf-test]  -- completer if we are at the end. [opt-env-conf-test]  case possibilities of [opt-env-conf-test]  [] -> completeWithCompleterAtEnd [opt-env-conf-test]  (_, as') : _ -> do [opt-env-conf-test] - put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test]  if isJust settingSwitchValue [opt-env-conf-test]  then do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:138:11-28 [opt-env-conf-test] @@ -135,11 +135,8 @@ [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test] - Just a -> do [opt-env-conf-test] - as <- go (ParserMany mLoc p') [opt-env-conf-test] - pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:134:29-28 [opt-env-conf-test] @@ -131,15 +131,14 @@ [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  Killed: 1228 [opt-env-conf-test]  (of which timed out: 1) [opt-env-conf-test] Survived: 301 [opt-env-conf-test] Uncovered: 381 [opt-env-conf-test]  [opt-env-conf-test] Timed-out mutations: [opt-env-conf-test]  [opt-env-conf-test] [timed out after 30.211618s] [opt-env-conf-test] ConstBool at src/OptEnvConf/Completion.hs:272:14-29 [opt-env-conf-test] @@ -269,7 +269,7 @@ [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just os -> do [opt-env-conf-test]  after <- get [opt-env-conf-test] - if after == before [opt-env-conf-test] + if False [opt-env-conf-test]  then -- State did not advance; return these completions. [opt-env-conf-test]  pure $ Just os [opt-env-conf-test]  else -- State advanced: something was consumed. Try the [opt-env-conf-test]  [opt-env-conf-test] Surviving mutations: [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:242:17-24 [opt-env-conf-test] @@ -239,10 +239,9 @@ [opt-env-conf-test]  [opt-env-conf-test]  instance Applicative Parser where [opt-env-conf-test]  pure = ParserPure [opt-env-conf-test]  (<*>) p1 p2 = case (p1, p2) of [opt-env-conf-test]  -- Homomorphism law for applicative [opt-env-conf-test] - (ParserPure f, ParserPure a) -> ParserPure (f a) [opt-env-conf-test]  _ -> ParserAp p1 p2 [opt-env-conf-test]  [opt-env-conf-test]  instance Selective Parser where [opt-env-conf-test]  select = ParserSelect [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,31 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test] - (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,31 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test] - (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:267:9-25 [opt-env-conf-test] @@ -264,32 +264,31 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] - (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf-test] @@ -269,26 +269,24 @@ [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test]  (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test]  go (go p1' p3') p4' [opt-env-conf-test] - (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test] - ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:272:30-41 [opt-env-conf-test] @@ -269,26 +269,24 @@ [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  (False, False) -> [opt-env-conf-test]  let go p1' p2' = case (p1', p2') of [opt-env-conf-test]  -- <|> needs to be associative, so we need to reorder the [opt-env-conf-test]  -- alts to always be right-leaning [opt-env-conf-test]  -- [opt-env-conf-test]  -- That means if we want to construct this parser, where p1 and p3 are commands parsers: [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 p2 [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p3 p4 [opt-env-conf-test]  -- [opt-env-conf-test]  -- We need to rearrange it to [opt-env-conf-test]  -- p [opt-env-conf-test]  -- / \ [opt-env-conf-test]  -- p1 ++ p3 p4 [opt-env-conf-test] - (ParserCommands _ _ _, ParserAlt p3' p4') -> [opt-env-conf-test] - go (go p1' p3') p4' [opt-env-conf-test]  (ParserCommands mLoc1 mDefault1 cs1, ParserCommands mLoc2 mDefault2 cs2) -> [opt-env-conf-test]  ParserCommands (mLoc1 <|> mLoc2) (mDefault1 <|> mDefault2) (cs1 ++ cs2) [opt-env-conf-test]  _ -> ParserAlt p1' p2' [opt-env-conf-test]  in go p1 p2 [opt-env-conf-test]  many = ParserMany Nothing [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:267:27-37 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (isEmpty p1, False) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:267:15-25 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test] - in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test] + in case (False, isEmpty p2) of [opt-env-conf-test]  (True, True) -> ParserEmpty Nothing [opt-env-conf-test]  (True, False) -> p2 [opt-env-conf-test]  (False, True) -> p1 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:264:36-43 [opt-env-conf-test] @@ -261,7 +261,7 @@ [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] - ParserCommands _ _ cs -> null cs [opt-env-conf-test] + ParserCommands _ _ cs -> False [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  in case (isEmpty p1, isEmpty p2) of [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:263:36-45 [opt-env-conf-test] @@ -260,7 +260,7 @@ [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] - ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test] + ParserCheck _ _ _ _ p -> False [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  ParserSetting _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:262:37-46 [opt-env-conf-test] @@ -259,7 +259,7 @@ [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test] - ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test] + ParserAllOrNothing _ p -> False [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  ParserCommands _ _ cs -> null cs [opt-env-conf-test]  ParserWithConfig _ pc ps -> isEmpty pc && isEmpty ps [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:260:29-38 [opt-env-conf-test] @@ -257,7 +257,7 @@ [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test] - ParserMany _ p -> isEmpty p [opt-env-conf-test] + ParserMany _ p -> False [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  ParserAllOrNothing _ p -> isEmpty p [opt-env-conf-test]  ParserCheck _ _ _ _ p -> isEmpty p [opt-env-conf-test]  [opt-env-conf-test] BoolLit at src/OptEnvConf/Parser.hs:258:28-32 [opt-env-conf-test] @@ -255,7 +255,7 @@ [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test]  ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test] - ParserEmpty _ -> True [opt-env-conf-test] + ParserEmpty _ -> False [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  ParserMany _ p -> isEmpty p [opt-env-conf-test]  ParserSome _ p -> isEmpty p [opt-env-conf-test]  [opt-env-conf-test] LogicOp at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf || isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:256:29-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> False [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf && not (isEmpty pa) [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf && False [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:256:43-53 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> isEmpty pf && True [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> not (isEmpty pf) && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> False && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:256:29-39 [opt-env-conf-test] @@ -253,7 +253,7 @@ [opt-env-conf-test]  let isEmpty :: Parser a -> Bool [opt-env-conf-test]  isEmpty = \case [opt-env-conf-test]  ParserPure _ -> False [opt-env-conf-test] - ParserAp pf pa -> isEmpty pf && isEmpty pa [opt-env-conf-test] + ParserAp pf pa -> True && isEmpty pa [opt-env-conf-test]  ParserSelect pe pf -> isEmpty pe && isEmpty pf [opt-env-conf-test]  ParserEmpty _ -> True [opt-env-conf-test]  ParserAlt _ _ -> False [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:297:39-40 [opt-env-conf-test] @@ -294,7 +294,7 @@ [opt-env-conf-test]  some = fmap NE.toList . ParserSome Nothing [opt-env-conf-test]  [opt-env-conf-test]  showParserABit :: Parser a -> String [opt-env-conf-test] -showParserABit = flip (showParserPrec 0) "" [opt-env-conf-test] +showParserABit = flip (showParserPrec 1) "" [opt-env-conf-test]  [opt-env-conf-test]  showParserPrec :: Int -> Parser a -> ShowS [opt-env-conf-test]  showParserPrec = go [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:373:19-27 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:373:20-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserSetting mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Setting " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen not ((d > 10)) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen False $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:19-27 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (not (d > 10)) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (False) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d <= 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:365:20-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d < 10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  showCommandABit [opt-env-conf-test]  cs [opt-env-conf-test]  ParserWithConfig mLoc p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "WithConfig _ " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:355:19-27 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:355:20-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26 [opt-env-conf-test] @@ -352,7 +352,7 @@ [opt-env-conf-test]  . showString " _ " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCommands mLoc mDefault cs -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Commands " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:345:19-27 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:345:20-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26 [opt-env-conf-test] @@ -342,7 +342,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserCheck mLoc forgivable caps _ p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Check " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:333:19-27 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:333:20-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26 [opt-env-conf-test] @@ -330,7 +330,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p [opt-env-conf-test]  ParserSome mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Some " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:327:19-27 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:327:20-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26 [opt-env-conf-test] @@ -324,7 +324,7 @@ [opt-env-conf-test]  . showString " " [opt-env-conf-test]  . go 11 p2 [opt-env-conf-test]  ParserMany mLoc p -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Many " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:321:19-27 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:321:20-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26 [opt-env-conf-test] @@ -318,7 +318,7 @@ [opt-env-conf-test]  showString "Empty " [opt-env-conf-test]  . showsPrec 11 mLoc [opt-env-conf-test]  ParserAlt p1 p2 -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Alt " [opt-env-conf-test]  . go 11 p1 [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:306:19-27 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen True $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (True) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:306:20-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d >= 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > -10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 1) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26 [opt-env-conf-test] @@ -303,7 +303,7 @@ [opt-env-conf-test]  go d = \case [opt-env-conf-test]  ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test] - showParen (d > 10) $ [opt-env-conf-test] + showParen (d > 0) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  . go 11 pf [opt-env-conf-test]  . showString " " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:304:33-41 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen True $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (True) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  [opt-env-conf-test] Cmp at src/OptEnvConf/Parser.hs:304:34-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d >= 10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d > -10) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d > 1) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40 [opt-env-conf-test] @@ -301,7 +301,7 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go :: Int -> Parser a -> ShowS [opt-env-conf-test]  go d = \case [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _" [opt-env-conf-test] + ParserPure _ -> showParen (d > 0) $ showString "Pure _" [opt-env-conf-test]  ParserAp pf pa -> [opt-env-conf-test]  showParen (d > 10) $ [opt-env-conf-test]  showString "Ap " [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test] - ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test] - ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test] - ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test] - ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test] - ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test] - ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test] - ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test]  ParserPure a -> ParserPure a [opt-env-conf-test] - ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26 [opt-env-conf-test] @@ -547,21 +547,20 @@ [opt-env-conf-test]  where [opt-env-conf-test]  go p = [opt-env-conf-test]  let p' = p <|> pure defaultValue [opt-env-conf-test]  in case p of [opt-env-conf-test] - ParserPure a -> ParserPure a [opt-env-conf-test]  ParserAp {} -> p' [opt-env-conf-test]  ParserSelect {} -> p' [opt-env-conf-test]  ParserEmpty _ -> ParserPure defaultValue [opt-env-conf-test]  ParserAlt p1 p2 -> ParserAlt p1 (go p2) [opt-env-conf-test]  ParserMany {} -> p' [opt-env-conf-test]  ParserSome {} -> p' [opt-env-conf-test]  ParserAllOrNothing {} -> p' [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test]  Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:562:37-26 [opt-env-conf-test] @@ -559,9 +559,8 @@ [opt-env-conf-test]  ParserCheck {} -> p' [opt-env-conf-test]  ParserCommands {} -> p' [opt-env-conf-test]  ParserWithConfig {} -> p' [opt-env-conf-test]  ParserSetting mLoc s -> case settingDefaultValue s of [opt-env-conf-test]  Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)} [opt-env-conf-test] - Just _ -> p [opt-env-conf-test]  [opt-env-conf-test]  -- | Try a list of parsers in order [opt-env-conf-test]  choice :: (HasCallStack) => [Parser a] -> Parser a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:602:15-28 [opt-env-conf-test] @@ -599,9 +599,8 @@ [opt-env-conf-test]  checkMapMaybe func p = [opt-env-conf-test]  withFrozenCallStack $ [opt-env-conf-test]  checkMapEither [opt-env-conf-test]  ( \a -> case func a of [opt-env-conf-test]  Nothing -> Left "checkMapMaybe failed without a helpful error message" [opt-env-conf-test] - Just b -> Right b [opt-env-conf-test]  ) [opt-env-conf-test]  p [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completion.hs:453:24-40 [opt-env-conf-test] @@ -450,7 +450,7 @@ [opt-env-conf-test]  put as' [opt-env-conf-test]  pure $ Just [] [opt-env-conf-test]  else do [opt-env-conf-test] - if settingTryOption [opt-env-conf-test] + if True [opt-env-conf-test]  then do [opt-env-conf-test]  -- First we try to consume the option so we don't suggest it if it's already been parsed [opt-env-conf-test]  case Args.consumeOption settingDasheds as of [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completion.hs:435:21-51 [opt-env-conf-test] @@ -432,11 +432,10 @@ [opt-env-conf-test]  -- consumeArgument) or because only the consume-nothing [opt-env-conf-test]  -- fallback matched. In both cases, offer the [opt-env-conf-test]  -- completer if we are at the end. [opt-env-conf-test]  case possibilities of [opt-env-conf-test] - [] -> completeWithCompleterAtEnd [opt-env-conf-test]  (_, as') : _ -> do [opt-env-conf-test]  put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test]  if isJust settingSwitchValue [opt-env-conf-test]  then do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Completion.hs:437:39-51 [opt-env-conf-test] @@ -434,9 +434,8 @@ [opt-env-conf-test]  -- completer if we are at the end. [opt-env-conf-test]  case possibilities of [opt-env-conf-test]  [] -> completeWithCompleterAtEnd [opt-env-conf-test]  (_, as') : _ -> do [opt-env-conf-test] - put as' [opt-env-conf-test]  completeWithCompleterAtEnd [opt-env-conf-test]  else [opt-env-conf-test]  if isJust settingSwitchValue [opt-env-conf-test]  then do [opt-env-conf-test]  [opt-env-conf-test] MaybeOp at src/OptEnvConf/Completion.hs:398:70-77 [opt-env-conf-test] @@ -395,7 +395,7 @@ [opt-env-conf-test]  pure Completion {..} [opt-env-conf-test]  let completeWithCompleterAtEnd = do [opt-env-conf-test]  as <- get [opt-env-conf-test] - if argsAtEnd as then completeWithCompleter else pure $ Just [] [opt-env-conf-test] + if argsAtEnd as then completeWithCompleter else pure $ Nothing [opt-env-conf-test]  let completeWithDasheds = do [opt-env-conf-test]  let isLong = \case [opt-env-conf-test]  DashedLong _ -> True [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Completion.hs:254:20-23 [opt-env-conf-test] @@ -251,9 +251,8 @@ [opt-env-conf-test]  before <- get [opt-env-conf-test]  mA <- func [opt-env-conf-test]  case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - put before [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> pure (Just a) [opt-env-conf-test]  [opt-env-conf-test]  -- Completions for many/some: try the parser repeatedly. [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:440:44-42 [opt-env-conf-test] @@ -437,21 +437,20 @@ [opt-env-conf-test]  Just (a, _) -> do [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test]  Found _ -> Nothing -- Should not happen. [opt-env-conf-test] - debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  catMaybes [opt-env-conf-test]  [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg, [opt-env-conf-test]  parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch, [opt-env-conf-test]  parseResultError (ParseErrorMissingOption mOptDoc) mOpt, [opt-env-conf-test]  parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv, [opt-env-conf-test]  parseResultError (ParseErrorMissingConfVal mConfDoc) mConf [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  withCapabilities :: [opt-env-conf-test]  Maybe SrcLoc -> [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:441:64-59 [opt-env-conf-test] @@ -438,10 +438,9 @@ [opt-env-conf-test]  debug ["set to default value"] [opt-env-conf-test]  pure a -- Don't mark as parsed [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  let parseResultError e res = case res of [opt-env-conf-test]  NotRun -> Nothing [opt-env-conf-test]  NotFound -> Just e [opt-env-conf-test] - Found _ -> Nothing -- Should not happen. [opt-env-conf-test]  debug ["not found"] [opt-env-conf-test]  maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $ [opt-env-conf-test]  NE.nonEmpty $ [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:396:41-64 [opt-env-conf-test] @@ -393,30 +393,29 @@ [opt-env-conf-test]  case mO' of [opt-env-conf-test]  Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, not configured: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:405:55-64 [opt-env-conf-test] @@ -402,21 +402,20 @@ [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of [opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mA -> case mA of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "could not set based on config value, configured to nothing: ", [opt-env-conf-test]  chunk $ T.pack $ show $ NE.toList configValSettingPath [opt-env-conf-test]  ] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug [opt-env-conf-test]  [ "set based on config value: ", [opt-env-conf-test]  chunk $ T.pack $ show v [opt-env-conf-test]  ] [opt-env-conf-test]  pure $ Just a [opt-env-conf-test]  let toRes = \case [opt-env-conf-test]  Nothing -> NotFound [opt-env-conf-test]  Just a -> Found a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:393:49-82 [opt-env-conf-test] @@ -390,9 +390,8 @@ [opt-env-conf-test]  Just v -> Just <$> parseJSON v [opt-env-conf-test]  Just neRest -> do [opt-env-conf-test]  mO' <- o .:? Key.fromString k [opt-env-conf-test]  case mO' of [opt-env-conf-test] - Nothing -> pure Nothing [opt-env-conf-test]  Just o' -> jsonParser o' neRest [opt-env-conf-test]  case JSON.parseEither (jsonParser obj) configValSettingPath of [opt-env-conf-test]  Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err [opt-env-conf-test]  Right mV -> case mV of [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:224:38-20 [opt-env-conf-test] @@ -221,15 +221,14 @@ [opt-env-conf-test]  Just c -> do [opt-env-conf-test]  debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["loading config"] [opt-env-conf-test]  mNewConfig <- ppIndent $ go pc [opt-env-conf-test]  debug ["with loaded config"] [opt-env-conf-test]  ppIndent $ [opt-env-conf-test]  local (\e -> e {ppEnvConf = mNewConfig}) $ [opt-env-conf-test]  go pa [opt-env-conf-test]  ParserSetting mLoc set@Setting {..} -> do [opt-env-conf-test]  debug [syntaxChunk "Setting", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null settingRequiredCapabilities)) $ [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:221:27-39 [opt-env-conf-test] @@ -218,9 +218,8 @@ [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test]  go $ commandParser c [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:215:28-40 [opt-env-conf-test] @@ -212,9 +212,8 @@ [opt-env-conf-test]  find ((== d) . commandArg) cs [opt-env-conf-test]  case mDefaultCommand of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors [opt-env-conf-test]  Just dc -> do [opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)] [opt-env-conf-test]  go $ commandParser dc [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:195:29-70 [opt-env-conf-test] @@ -192,9 +192,8 @@ [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities $ do [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:197:56-66 [opt-env-conf-test] @@ -194,7 +194,7 @@ [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test]  debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] - ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test] + ppError mLoc $ ParseErrorCheckFailed False err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  pure b [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf-test] @@ -193,7 +193,6 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:196:25-83 [opt-env-conf-test] @@ -193,7 +193,6 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf-test] @@ -193,7 +193,7 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] + debug ["failed, forgivable: ", chunk $ T.pack $ show not (forgivable)] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:196:72-82 [opt-env-conf-test] @@ -193,7 +193,7 @@ [opt-env-conf-test]  errOrB <- liftIO $ f a [opt-env-conf-test]  case errOrB of [opt-env-conf-test]  Left err -> do [opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable] [opt-env-conf-test] + debug ["failed, forgivable: ", chunk $ T.pack $ show True] [opt-env-conf-test]  ppError mLoc $ ParseErrorCheckFailed forgivable err [opt-env-conf-test]  Right b -> do [opt-env-conf-test]  debug ["succeeded"] [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:150:37-112 [opt-env-conf-test] @@ -147,34 +147,33 @@ [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  e <- ask [opt-env-conf-test]  s <- get [opt-env-conf-test]  results <- liftIO $ runPP (go p') s e [opt-env-conf-test]  (result, s') <- ppNonDetList results [opt-env-conf-test]  put s' [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test]  if not $ all errorIsForgivable errs [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test]  let settingsMap = parserSettingsMap p' [opt-env-conf-test]  -- Settings that have been parsed [opt-env-conf-test]  parsedMap <- gets ppStateParsedSettings [opt-env-conf-test]  -- Settings that have been parsed below [opt-env-conf-test]  let parsedSettingsMap = settingsMap `M.intersection` parsedMap [opt-env-conf-test]  -- If any settings have been parsed below, and parsing still failed [opt-env-conf-test]  -- (this is the case because we're in the failure branch) [opt-env-conf-test]  -- with only forgivable errors [opt-env-conf-test]  -- (this is the case because we're in the branch where that's been checked) [opt-env-conf-test]  -- then this should be an unforgivable error. [opt-env-conf-test]  if null parsedSettingsMap [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| []) [opt-env-conf-test]  ParserCheck mLoc forgivable requiredCapabilities f p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  when (not (Set.null requiredCapabilities)) $ [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:161:18-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if False [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:161:24-50 [opt-env-conf-test] @@ -158,7 +158,7 @@ [opt-env-conf-test]  case result of [opt-env-conf-test]  Success a -> pure a [opt-env-conf-test]  Failure errs -> do [opt-env-conf-test] - if not $ all errorIsForgivable errs [opt-env-conf-test] + if not $ True [opt-env-conf-test]  then ppErrors' errs [opt-env-conf-test]  else do [opt-env-conf-test]  -- Settings available below [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:143:29-25 [opt-env-conf-test] @@ -140,13 +140,12 @@ [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  a <- go p' [opt-env-conf-test]  debug ["First element of some succeeded, continuing with Many"] [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a :| as) [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:134:29-28 [opt-env-conf-test] @@ -131,15 +131,14 @@ [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  as <- go (ParserMany mLoc p') [opt-env-conf-test]  pure (a : as) [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf-test] @@ -132,7 +132,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf-test] @@ -132,7 +132,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:135:15-60 [opt-env-conf-test] @@ -132,7 +132,6 @@ [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  eor <- tryPP $ go p' [opt-env-conf-test]  case eor of [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:122:26-31 [opt-env-conf-test] @@ -119,18 +119,17 @@ [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ select (go fe) (go ff) [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test] - debug [syntaxChunk "Alt"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:131:24-31 [opt-env-conf-test] @@ -128,9 +128,8 @@ [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test] - debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:119:29-42 [opt-env-conf-test] @@ -116,9 +116,8 @@ [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test] - debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ select (go fe) (go ff) [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  debug [syntaxChunk "Alt"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:116:27-37 [opt-env-conf-test] @@ -113,9 +113,8 @@ [opt-env-conf-test]  ParserAp ff fa -> do [opt-env-conf-test]  debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test] - debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ select (go fe) (go ff) [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:113:25-35 [opt-env-conf-test] @@ -110,9 +110,8 @@ [opt-env-conf-test]  ParserPure a -> do [opt-env-conf-test]  debug [syntaxChunk "pure value"] [opt-env-conf-test]  pure a [opt-env-conf-test]  ParserAp ff fa -> do [opt-env-conf-test] - debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ go ff <*> go fa [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppError mLoc ParseErrorEmpty [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:84:3-26 [opt-env-conf-test] @@ -81,27 +81,26 @@ [opt-env-conf-test]  Nothing -> pure result [opt-env-conf-test]  Just leftovers -> ppError Nothing $ ParseErrorUnrecognised leftovers [opt-env-conf-test]  mTup <- runPPLazy go' ppState ppEnv [opt-env-conf-test]  case mTup of [opt-env-conf-test] - Nothing -> error "TODO figure out when this list can be empty" [opt-env-conf-test]  Just ((errOrRes, _), nexts) -> case errOrRes of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test]  Failure firstErrors -> [opt-env-conf-test]  let goNexts ns = do [opt-env-conf-test]  -- TODO: Consider keeping around all errors? [opt-env-conf-test]  mNext <- runNonDetTLazy ns [opt-env-conf-test]  case mNext of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  pure $ [opt-env-conf-test]  Left $ [opt-env-conf-test]  -- Only show source locations in debug mode. [opt-env-conf-test]  let f = case mDebugMode of [opt-env-conf-test]  Nothing -> eraseErrorSrcLocs [opt-env-conf-test]  Just _ -> id [opt-env-conf-test]  in f firstErrors [opt-env-conf-test]  Just ((eOR, _), ns') -> case eOR of [opt-env-conf-test]  Success a -> pure (Right a) [opt-env-conf-test]  Failure _ -> goNexts ns' [opt-env-conf-test]  in goNexts nexts [opt-env-conf-test]  where [opt-env-conf-test]  go :: [opt-env-conf-test]  Parser a -> [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:464:22-66 [opt-env-conf-test] @@ -461,11 +461,8 @@ [opt-env-conf-test]  PP a [opt-env-conf-test]  withCapabilities mLoc requiredCapabilities capabilities func = [opt-env-conf-test]  case missingCapabilities capabilities requiredCapabilities of [opt-env-conf-test]  Just missings -> do [opt-env-conf-test] - debug $ [opt-env-conf-test] - "Missing capabilities: " [opt-env-conf-test] - : capabilitiesChunks (Set.fromList (NE.toList missings)) [opt-env-conf-test]  ppErrors mLoc $ NE.map ParseErrorMissingCapability missings [opt-env-conf-test]  Nothing -> func [opt-env-conf-test]  [opt-env-conf-test]  data ParseResult a [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:477:21-21 [opt-env-conf-test] @@ -474,9 +474,8 @@ [opt-env-conf-test]  | Found a [opt-env-conf-test]  [opt-env-conf-test]  requireReaders :: [Reader a] -> PP (NonEmpty (Reader a)) [opt-env-conf-test]  requireReaders rs = case NE.nonEmpty rs of [opt-env-conf-test] - Nothing -> ppError Nothing ParseErrorNoReaders [opt-env-conf-test]  Just ne -> pure ne [opt-env-conf-test]  [opt-env-conf-test]  -- Try the readers in order [opt-env-conf-test]  tryReaders :: NonEmpty (Reader a) -> String -> Either (NonEmpty String) a [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:568:44-43 [opt-env-conf-test] @@ -565,12 +565,11 @@ [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mNewConfig <- go pc [opt-env-conf-test]  mRes <- go pa [opt-env-conf-test]  pure $ mRes <|> mNewConfig -- Reverse order [opt-env-conf-test]  ParserSetting mLoc _ -> do [opt-env-conf-test]  debug [syntaxChunk "Setting", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:565:42-31 [opt-env-conf-test] @@ -562,9 +562,8 @@ [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test] - debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserWithConfig mLoc pc pa -> do [opt-env-conf-test]  debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:562:43-31 [opt-env-conf-test] @@ -559,9 +559,8 @@ [opt-env-conf-test]  ParserSome mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserAllOrNothing mLoc p' -> do [opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  ParserCheck mLoc _ _ _ p' -> do [opt-env-conf-test]  debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:544:32-37 [opt-env-conf-test] @@ -541,18 +541,17 @@ [opt-env-conf-test]  ParserEmpty mLoc -> do [opt-env-conf-test]  debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test] - debug [syntaxChunk "Alt"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:549:17-37 [opt-env-conf-test] @@ -546,13 +546,10 @@ [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test] - Nothing -> do [opt-env-conf-test] - debug ["Left side failed, trying right side."] [opt-env-conf-test] - ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ go p' [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:529:31-33 [opt-env-conf-test] @@ -526,12 +526,11 @@ [opt-env-conf-test]  ParserPure _ -> do [opt-env-conf-test]  debug [syntaxChunk "pure value"] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  ParserAp ff fa -> do [opt-env-conf-test] - debug [syntaxChunk "Ap"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  mf <- go ff [opt-env-conf-test]  ma <- go fa [opt-env-conf-test]  pure $ ma <|> mf -- Reverse order [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:514:3-35 [opt-env-conf-test] @@ -511,11 +511,10 @@ [opt-env-conf-test]  ppEnvIndent = 0 [opt-env-conf-test]  } [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test] - Nothing -> pure $ Right Nothing [opt-env-conf-test]  Just ((result, _), _) -> pure $ case result of [opt-env-conf-test]  Failure errs -> Left errs [opt-env-conf-test]  Success mDocs -> Right mDocs [opt-env-conf-test]  where [opt-env-conf-test]  -- We try to parse the commands as deep as possible and ignore everything else. [opt-env-conf-test]  go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc))) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:516:37-35 [opt-env-conf-test] @@ -513,9 +513,8 @@ [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test]  Nothing -> pure $ Right Nothing [opt-env-conf-test]  Just ((result, _), _) -> pure $ case result of [opt-env-conf-test] - Failure errs -> Left errs [opt-env-conf-test]  Success mDocs -> Right mDocs [opt-env-conf-test]  where [opt-env-conf-test]  -- We try to parse the commands as deep as possible and ignore everything else. [opt-env-conf-test]  go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc))) [opt-env-conf-test]  [opt-env-conf-test] IntLit at src/OptEnvConf/Run.hs:511:27-28 [opt-env-conf-test] @@ -508,7 +508,7 @@ [opt-env-conf-test]  { ppEnvEnv = EnvMap.empty, [opt-env-conf-test]  ppEnvConf = Nothing, [opt-env-conf-test]  ppEnvDebug = mDebugMode, [opt-env-conf-test] - ppEnvIndent = 0 [opt-env-conf-test] + ppEnvIndent = 1 [opt-env-conf-test]  } [opt-env-conf-test]  mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv [opt-env-conf-test]  case mResOrNext of [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf-test] @@ -85,10 +85,9 @@ [opt-env-conf-test]  in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test]  (Nothing, _) -> o2 [opt-env-conf-test] - (Just ot1, Nothing) -> o2 {optionType = Just ot1} [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf-test] @@ -85,10 +85,9 @@ [opt-env-conf-test]  in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test] - (Nothing, _) -> o2 [opt-env-conf-test]  (Just ot1, Nothing) -> o2 {optionType = Just ot1} [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Nix.hs:94:54-38 [opt-env-conf-test] @@ -91,8 +91,7 @@ [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test] - (OptionTypeSubmodule m1, OptionTypeSubmodule m2) -> OptionTypeSubmodule $ M.unionWith combineOption m1 m2 [opt-env-conf-test]  _ -> OptionTypeOneOf [ot1, ot2] [opt-env-conf-test]  goCommand :: Command a -> Map Text Option [opt-env-conf-test]  goCommand = go . commandParser [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Nix.hs:96:28-38 [opt-env-conf-test] @@ -93,6 +93,5 @@ [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test]  (OptionTypeSubmodule m1, OptionTypeSubmodule m2) -> OptionTypeSubmodule $ M.unionWith combineOption m1 m2 [opt-env-conf-test] - _ -> OptionTypeOneOf [ot1, ot2] [opt-env-conf-test]  goCommand :: Command a -> Map Text Option [opt-env-conf-test]  goCommand = go . commandParser [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf-test] @@ -60,14 +60,13 @@ [opt-env-conf-test]  instance Validity Arg where [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test] - [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test]  fromString = parseArg [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Args.hs:63:7-8 [opt-env-conf-test] @@ -60,14 +60,7 @@ [opt-env-conf-test]  instance Validity Arg where [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test] - [ genericValidate arg, [opt-env-conf-test] - case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test] - _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test]  fromString = parseArg [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf-test] @@ -61,12 +61,9 @@ [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test] - _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Args.hs:64:9-21 [opt-env-conf-test] @@ -61,12 +61,11 @@ [opt-env-conf-test]  validate arg = [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Arg where [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,8 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] - ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Args.hs:66:64-22 [opt-env-conf-test] @@ -63,9 +63,9 @@ [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test]  ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test] + ArgPlain s -> declare "does not start with a dash" $ True-> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  _ -> valid [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Args.hs:65:103-111 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  mconcat [opt-env-conf-test]  [ genericValidate arg, [opt-env-conf-test]  case arg of [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-' [opt-env-conf-test] + ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ True [opt-env-conf-test]  ArgPlain s -> declare "does not start with a dash" $ case s of [opt-env-conf-test]  ('-' : _) -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Args.hs:399:18-32 [opt-env-conf-test] @@ -396,10 +396,9 @@ [opt-env-conf-test]  instance Validity Dashed [opt-env-conf-test]  [opt-env-conf-test]  instance IsString Dashed where [opt-env-conf-test]  fromString s = case fromString s of [opt-env-conf-test]  ArgDashed True cs -> DashedLong cs [opt-env-conf-test]  ArgDashed False (c :| []) -> DashedShort c [opt-env-conf-test] - _ -> error "Invalid dashed" [opt-env-conf-test]  [opt-env-conf-test]  renderDashed :: Dashed -> String [opt-env-conf-test]  renderDashed = \case [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Args.hs:248:77-83 [opt-env-conf-test] @@ -245,7 +245,7 @@ [opt-env-conf-test]  case consumeDashedOption dasheds isLong cs of [opt-env-conf-test]  Nothing -> second (Live k :) <$> go rest [opt-env-conf-test]  Just Nothing -> Just (renderArg v, Dead : rest') [opt-env-conf-test] - Just (Just cs') -> Just (renderArg v, Live (ArgDashed isLong cs') : Dead : rest') [opt-env-conf-test] + Just (Just cs') -> Just (renderArg v, Live (ArgDashed False cs') : Dead : rest') [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  _ -> second (Live k :) <$> go rest [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Args.hs:152:36-28 [opt-env-conf-test] @@ -149,34 +149,33 @@ [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test]  ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [] -> [(Just "--", consumed)] [opt-env-conf-test]  -- If there's only a dead argument after the double dash, that [opt-env-conf-test]  -- means we've been parsing bare args and are now done. [opt-env-conf-test]  -- We can stop consuming but get rid of the tombstone as well. [opt-env-conf-test]  -- Otherwise there will be a leftover unconsumed '--' after all parsing is done. [opt-env-conf-test] - [Dead] -> [(Nothing, Args befores [])] [opt-env-conf-test]  -- If it's not the last argument, anything after here is an argument. [opt-env-conf-test]  -- In order to not have to maintain whether the cursor is after [opt-env-conf-test]  -- a bare double dash already, we keep the cursor here and just [opt-env-conf-test]  -- pop the args as they come. [opt-env-conf-test]  _ -> [opt-env-conf-test]  let go = \case [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test]  Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Args.hs:169:23-28 [opt-env-conf-test] @@ -166,17 +166,16 @@ [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  (Dead : rest) -> go rest [opt-env-conf-test]  (Live a' : rest) -> Just (a', rest) [opt-env-conf-test]  in case go afters of [opt-env-conf-test] - Nothing -> [(Nothing, as)] [opt-env-conf-test]  Just (firstLive, rest) -> [opt-env-conf-test]  -- We need to leave the dead argument there so that [opt-env-conf-test]  -- we don't consume the double-dash as an argument [opt-env-conf-test]  -- after consuming all the arguments after it as bare [opt-env-conf-test]  -- arguments. [opt-env-conf-test]  [ ( Just $ renderArg firstLive, [opt-env-conf-test]  Args befores (Live ArgBareDoubleDash : Dead : rest) [opt-env-conf-test]  ) [opt-env-conf-test]  ] [opt-env-conf-test]  ArgDashed {} -> [opt-env-conf-test]  -- Dead after dashed, two options, in order that they should be considered: [opt-env-conf-test]  -- * The dashed is a switch (don't consume an arg) [opt-env-conf-test]  [opt-env-conf-test] MaybeOp at src/OptEnvConf/Args.hs:150:32-40 [opt-env-conf-test] @@ -147,7 +147,7 @@ [opt-env-conf-test]  -- Plain argument: that's the only option, consume it. [opt-env-conf-test]  ArgPlain plain -> [(Just plain, consumed)] [opt-env-conf-test]  -- A single dash is always an argument [opt-env-conf-test] - ArgBareDash -> [(Just "-", consumed)] [opt-env-conf-test] + ArgBareDash -> [(Nothing, consumed)] [opt-env-conf-test]  -- Bare double-dash [opt-env-conf-test]  ArgBareDoubleDash -> case afters of [opt-env-conf-test]  -- If it's the last argument, consume it as an argument [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Args.hs:339:40-46 [opt-env-conf-test] @@ -336,7 +336,7 @@ [opt-env-conf-test]  Just Nothing -> Just $ Dead : rest [opt-env-conf-test]  Just (Just (cs', needTombstone)) -> [opt-env-conf-test]  let rest' = if needTombstone then Dead : rest else rest [opt-env-conf-test] - in Just $ Live (ArgDashed isLong cs') : rest' [opt-env-conf-test] + in Just $ Live (ArgDashed False cs') : rest' [opt-env-conf-test]  _ -> do [opt-env-conf-test]  os <- go rest [opt-env-conf-test]  pure $ Live o : os [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Args.hs:365:34-43 [opt-env-conf-test] @@ -362,7 +362,7 @@ [opt-env-conf-test]  go :: NonEmpty Char -> Maybe (Maybe (NonEmpty Char, Bool)) [opt-env-conf-test]  go (c :| rest) = [opt-env-conf-test]  if c `elem` cs [opt-env-conf-test] - then Just $ (\ne -> (ne, null rest)) <$> NE.nonEmpty rest [opt-env-conf-test] + then Just $ (\ne -> (ne, False)) <$> NE.nonEmpty rest [opt-env-conf-test]  else do [opt-env-conf-test]  rest' <- NE.nonEmpty rest [opt-env-conf-test]  new <- go rest' [opt-env-conf-test]  [opt-env-conf-test] BoolLit at src/OptEnvConf/Error.hs:66:40-45 [opt-env-conf-test] @@ -63,7 +63,7 @@ [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] - ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test] + ParseErrorUnrecognisedCommand _ _ -> True [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test]  ParseErrorMissingCapability _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Error.hs:65:34-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> True [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Error.hs:65:40-47 [opt-env-conf-test] @@ -62,7 +62,7 @@ [opt-env-conf-test]  ParseErrorEnvRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingConfVal _ -> True [opt-env-conf-test]  ParseErrorConfigRead _ _ -> False [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs [opt-env-conf-test] + ParseErrorMissingCommand cs -> not $ False [opt-env-conf-test]  ParseErrorUnrecognisedCommand _ _ -> False [opt-env-conf-test]  ParseErrorAllOrNothing _ -> False [opt-env-conf-test]  ParseErrorUnrecognised _ -> False [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test] - ParseErrorMissingCapability cap -> [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test] - ParseErrorConfigRead md s -> [opt-env-conf-test] - ["Failed to parse configuration: "] [opt-env-conf-test] - : maybe [] renderConfDoc md [opt-env-conf-test] - ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test] - ParseErrorMissingConfVal md -> [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test] - ParseErrorMissingSwitch o -> [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,59 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test]  ParseErrorEmptySetting -> [opt-env-conf-test]  [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test] - ParseErrorNoReaders -> [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test] - ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65 [opt-env-conf-test] @@ -80,63 +80,61 @@ [opt-env-conf-test]  renderError :: ParseError -> [[Chunk]] [opt-env-conf-test]  renderError ParseError {..} = [opt-env-conf-test]  concat [opt-env-conf-test]  [ case parseErrorMessage of [opt-env-conf-test]  ParseErrorEmpty -> [opt-env-conf-test]  [["Hit the 'empty' case of the Parser type, this should not happen."]] [opt-env-conf-test] - ParseErrorEmptySetting -> [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]] [opt-env-conf-test]  ParseErrorNoReaders -> [opt-env-conf-test]  [ ["No readers were configured for an argument, option, or env."], [opt-env-conf-test]  ["You should not be seeing this error because the linting phase should have caught it."] [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorCheckFailed _ err -> [opt-env-conf-test]  [["Check failed: "], [chunk $ T.pack err]] [opt-env-conf-test]  ParseErrorMissingArgument o -> [opt-env-conf-test]  [ "Missing argument: " [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong o) [opt-env-conf-test]  ] [opt-env-conf-test]  ParseErrorArgumentRead md errs -> [opt-env-conf-test]  ["Failed to read argument: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingOption o -> [opt-env-conf-test]  ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorMissingSwitch o -> [opt-env-conf-test]  ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)] [opt-env-conf-test]  ParseErrorOptionRead md errs -> [opt-env-conf-test]  ["Failed to read option: "] [opt-env-conf-test]  : unwordsChunks (maybe [] renderOptDocLong md) [opt-env-conf-test]  : map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingEnvVar md -> [opt-env-conf-test]  ["Missing env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ParseErrorEnvRead md errs -> [opt-env-conf-test]  ["Failed to read env var: "] [opt-env-conf-test]  : maybe [] renderEnvDoc md [opt-env-conf-test]  ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs) [opt-env-conf-test]  ParseErrorMissingConfVal md -> [opt-env-conf-test]  ["Missing config value: "] : maybe [] renderConfDoc md [opt-env-conf-test]  ParseErrorConfigRead md s -> [opt-env-conf-test]  ["Failed to parse configuration: "] [opt-env-conf-test]  : maybe [] renderConfDoc md [opt-env-conf-test]  ++ [[chunk $ T.pack s]] [opt-env-conf-test]  ParseErrorMissingCommand cs -> [opt-env-conf-test]  ["Missing command, available commands:"] [opt-env-conf-test]  : availableCommandsLines cs [opt-env-conf-test]  ParseErrorUnrecognisedCommand c cs -> [opt-env-conf-test]  [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)], [opt-env-conf-test]  [fore blue "available commands:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ availableCommandsLines cs [opt-env-conf-test]  ParseErrorAllOrNothing locs -> [opt-env-conf-test]  [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."], [opt-env-conf-test]  ["The following settings have been parsed:"] [opt-env-conf-test]  ] [opt-env-conf-test]  ++ map (pure . srcLocChunk) (M.elems locs) [opt-env-conf-test]  ParseErrorUnrecognised leftovers -> [opt-env-conf-test]  ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))] [opt-env-conf-test]  ParseErrorMissingCapability cap -> [opt-env-conf-test]  ["Missing capability: " : [chunk $ T.pack $ show cap]], [opt-env-conf-test]  maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  hashWithSalt salt EnvVarSetting {..} = [opt-env-conf-test]  salt [opt-env-conf-test]  `hashWithSalt` envVarSettingVar [opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix [opt-env-conf-test] + `hashWithSalt` not (envVarSettingAllowPrefix) [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  hashWithSalt salt EnvVarSetting {..} = [opt-env-conf-test]  salt [opt-env-conf-test]  `hashWithSalt` envVarSettingVar [opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:144:22-46 [opt-env-conf-test] @@ -141,7 +141,7 @@ [opt-env-conf-test]  hashWithSalt salt EnvVarSetting {..} = [opt-env-conf-test]  salt [opt-env-conf-test]  `hashWithSalt` envVarSettingVar [opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:136:5-29 [opt-env-conf-test] @@ -133,7 +133,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  data EnvVarSetting = EnvVarSetting [opt-env-conf-test]  { envVarSettingVar :: !String, [opt-env-conf-test] - envVarSettingAllowPrefix :: !Bool [opt-env-conf-test] + True :: !Bool [opt-env-conf-test]  } [opt-env-conf-test]  deriving (Show, Eq) [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:159:5-32 [opt-env-conf-test] @@ -156,7 +156,7 @@ [opt-env-conf-test]  = forall void. [opt-env-conf-test]  ConfigValSetting [opt-env-conf-test]  { configValSettingPath :: !(NonEmpty String), [opt-env-conf-test] - configValSettingAllowPrefix :: !Bool, [opt-env-conf-test] + True :: !Bool, [opt-env-conf-test]  configValSettingCodec :: !(ValueCodec void (Maybe a)) [opt-env-conf-test]  } [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf-test] @@ -125,7 +125,7 @@ [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] - `hashWithSalt` settingTryOption [opt-env-conf-test] + `hashWithSalt` not (settingTryOption) [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  `hashWithSalt` (snd <$> settingDefaultValue) [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf-test] @@ -125,7 +125,7 @@ [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] - `hashWithSalt` settingTryOption [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  `hashWithSalt` (snd <$> settingDefaultValue) [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:128:24-40 [opt-env-conf-test] @@ -125,7 +125,7 @@ [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] - `hashWithSalt` settingTryOption [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  `hashWithSalt` (snd <$> settingDefaultValue) [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf-test] @@ -124,7 +124,7 @@ [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] + `hashWithSalt` not (isJust settingSwitchValue) [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf-test] @@ -124,7 +124,7 @@ [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:127:24-49 [opt-env-conf-test] @@ -124,7 +124,7 @@ [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test]  `hashWithSalt` settingTryArgument [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  `hashWithSalt` settingEnvVars [opt-env-conf-test]  `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals) [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf-test] @@ -122,7 +122,7 @@ [opt-env-conf-test]  SettingHash [opt-env-conf-test]  ( 42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test] - `hashWithSalt` settingTryArgument [opt-env-conf-test] + `hashWithSalt` not (settingTryArgument) [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf-test] @@ -122,7 +122,7 @@ [opt-env-conf-test]  SettingHash [opt-env-conf-test]  ( 42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test] - `hashWithSalt` settingTryArgument [opt-env-conf-test] + `hashWithSalt` False [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:125:24-42 [opt-env-conf-test] @@ -122,7 +122,7 @@ [opt-env-conf-test]  SettingHash [opt-env-conf-test]  ( 42 [opt-env-conf-test]  `hashWithSalt` map renderDashed settingDasheds [opt-env-conf-test] - `hashWithSalt` settingTryArgument [opt-env-conf-test] + `hashWithSalt` True [opt-env-conf-test]  `hashWithSalt` length settingReaders [opt-env-conf-test]  `hashWithSalt` isJust settingSwitchValue [opt-env-conf-test]  `hashWithSalt` settingTryOption [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:148:6-32 [opt-env-conf-test] @@ -145,7 +145,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting [opt-env-conf-test]  prefixEnvVarSetting prefix e = [opt-env-conf-test] - if envVarSettingAllowPrefix e [opt-env-conf-test] + if True [opt-env-conf-test]  then e {envVarSettingVar = prefix <> envVarSettingVar e} [opt-env-conf-test]  else e [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:165:6-35 [opt-env-conf-test] @@ -162,7 +162,7 @@ [opt-env-conf-test]  [opt-env-conf-test]  prefixConfigValSetting :: String -> ConfigValSetting a -> ConfigValSetting a [opt-env-conf-test]  prefixConfigValSetting prefix c = [opt-env-conf-test] - if configValSettingAllowPrefix c [opt-env-conf-test] + if True [opt-env-conf-test]  then c {configValSettingPath = prefix NE.<| configValSettingPath c} [opt-env-conf-test]  else c [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Setting.hs:173:30-39 [opt-env-conf-test] @@ -170,9 +170,8 @@ [opt-env-conf-test]  suffixConfigValSettingKey suffix c = c {configValSettingPath = suffixPath $ configValSettingPath c} [opt-env-conf-test]  where [opt-env-conf-test]  suffixPath :: NonEmpty String -> NonEmpty String [opt-env-conf-test]  suffixPath (f :| rest) = case NE.nonEmpty rest of [opt-env-conf-test]  Nothing -> (f <> suffix) :| [] [opt-env-conf-test] - Just ne -> f NE.<| suffixPath ne [opt-env-conf-test]  [opt-env-conf-test]  -- | A 'mempty' 'Setting' to build up a setting from. [opt-env-conf-test]  emptySetting :: Setting a [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf-test] @@ -337,7 +337,6 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test] - null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ListLit at src/OptEnvConf/Lint.hs:340:13-14 [opt-env-conf-test] @@ -337,7 +337,6 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:342:15-37 [opt-env-conf-test] @@ -339,5 +339,5 @@ [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test] - null settingConfigVals [opt-env-conf-test] + True [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:341:15-34 [opt-env-conf-test] @@ -338,6 +338,6 @@ [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test]  [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] - null settingEnvVars, [opt-env-conf-test] + True, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:340:15-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ True, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:340:37-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || True, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:340:57-82 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || settingTryOption || True, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || not (settingTryOption) || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || False || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:340:37-53 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ settingTryArgument || True || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:340:15-33 [opt-env-conf-test] @@ -337,7 +337,7 @@ [opt-env-conf-test]  -- 'many' is only allowed if something is being consumed and it's [opt-env-conf-test]  -- impossible for nothing to be consumed. [opt-env-conf-test]  and [opt-env-conf-test] - [ settingTryArgument || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test] + [ True || settingTryOption || isJust settingSwitchValue, [opt-env-conf-test]  null settingEnvVars, [opt-env-conf-test]  null settingConfigVals [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ not (c1 || c2) [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] LogicOp at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 && c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ False [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:288:16-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ True [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 || not (c2) [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 || False [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:288:22-24 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ c1 || True [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ not (c1) || c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ False || c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:288:16-18 [opt-env-conf-test] @@ -285,7 +285,7 @@ [opt-env-conf-test]  ParserWithConfig _ p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- local (const True) (go p2) [opt-env-conf-test] - pure $ c1 || c2 [opt-env-conf-test] + pure $ True || c2 [opt-env-conf-test]  ParserSetting mLoc Setting {..} -> mapValidationTFailure (LintError mLoc) $ do [opt-env-conf-test]  case settingHelp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure not ((c1 && c2)) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure False -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:14-24 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure True -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (not (c1 && c2)) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] LogicOp at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 || c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (False) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:15-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (True) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && not (c2)) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && False) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:21-23 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (c1 && True) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (not (c1) && c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (False && c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:259:15-17 [opt-env-conf-test] @@ -256,7 +256,7 @@ [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right? [opt-env-conf-test] + pure (True && c2) -- TODO: is this right? [opt-env-conf-test]  -- TODO lint if we don't try to parse anything consuming under many. [opt-env-conf-test]  ParserMany mLoc p -> do [opt-env-conf-test]  c <- go p [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure not ((c1 || c2)) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure False [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:14-24 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure True [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (not (c1 || c2)) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] LogicOp at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 && c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (False) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:15-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (True) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 || not (c2)) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 || False) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:21-23 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (c1 || True) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (not (c1) || c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (False || c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Lint.hs:250:15-17 [opt-env-conf-test] @@ -247,7 +247,7 @@ [opt-env-conf-test]  ParserAp p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test] - pure (c1 || c2) [opt-env-conf-test] + pure (True || c2) [opt-env-conf-test]  ParserSelect p1 p2 -> do [opt-env-conf-test]  c1 <- go p1 [opt-env-conf-test]  c2 <- go p2 [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Check.hs:44:7-71 [opt-env-conf-test] @@ -41,7 +41,6 @@ [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CheckSucceeded _ -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout ["Settings parsed successfully."] [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  [opt-env-conf-test]  renderMissingCapabilities :: NonEmpty MissingCapability -> [Chunk] [opt-env-conf-test]  [opt-env-conf-test] MaybeOp at src/OptEnvConf/Check.hs:80:42-56 [opt-env-conf-test] @@ -77,7 +77,7 @@ [opt-env-conf-test]  Maybe JSON.Object -> [opt-env-conf-test]  IO (CheckResult a) [opt-env-conf-test]  runSettingsCheckOn capabilities debugMode p args envVars mConfig = do [opt-env-conf-test] - errOrSets <- runParserOn capabilities (Just debugMode) p args envVars mConfig [opt-env-conf-test] + errOrSets <- runParserOn capabilities (Nothing) p args envVars mConfig [opt-env-conf-test]  pure $ case errOrSets of [opt-env-conf-test]  Right a -> CheckSucceeded a [opt-env-conf-test]  Left errs -> [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,41 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,39 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - CompletionQuery enriched index ws -> do [opt-env-conf-test] - runCompletionQuery p' enriched index ws [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - FishCompletionScript progPath -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - ZshCompletionScript progPath -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - BashCompletionScript progPath -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,38 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test] - exitSuccess [opt-env-conf-test] - RenderNixosOptions -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,37 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - RenderDocumentation -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45 [opt-env-conf-test] @@ -125,42 +125,37 @@ [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test] - RenderMan -> do [opt-env-conf-test] - progname <- getProgName [opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs [opt-env-conf-test] - exitSuccess [opt-env-conf-test]  RenderDocumentation -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderNixosOptions -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p' [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  BashCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateBashCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ZshCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateZshCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  FishCompletionScript progPath -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  generateFishCompletionScript progPath progname [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  CompletionQuery enriched index ws -> do [opt-env-conf-test]  runCompletionQuery p' enriched index ws [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  ParsedNormally a -> pure a [opt-env-conf-test]  [opt-env-conf-test]  -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens. [opt-env-conf-test]  consumeExactArg :: String -> [String] -> (Bool, [String]) [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Main.hs:132:21-88 [opt-env-conf-test] @@ -129,7 +129,6 @@ [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderVersionPage progname version [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  RenderMan -> do [opt-env-conf-test]  progname <- getProgName [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Main.hs:126:19-69 [opt-env-conf-test] @@ -123,7 +123,6 @@ [opt-env-conf-test]  case errOrResult of [opt-env-conf-test]  Left errs -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test] - hPutChunksLocaleWith tc stderr $ renderErrors errs [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right i -> case i of [opt-env-conf-test]  ShowVersion -> do [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Main.hs:100:15-78 [opt-env-conf-test] @@ -97,9 +97,6 @@ [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right mCommandDoc -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ case mCommandDoc of [opt-env-conf-test] - Nothing -> renderHelpPage progname version progDesc docs [opt-env-conf-test] - Just (path, cDoc) -> renderCommandHelpPage progname path cDoc [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  else do [opt-env-conf-test]  let (capabilities, args'') = consumeCapabilities args' [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:100:48-78 [opt-env-conf-test] @@ -97,9 +97,8 @@ [opt-env-conf-test]  exitFailure [opt-env-conf-test]  Right mCommandDoc -> do [opt-env-conf-test]  tc <- getTerminalCapabilitiesFromHandle stdout [opt-env-conf-test]  hPutChunksLocaleWith tc stdout $ case mCommandDoc of [opt-env-conf-test]  Nothing -> renderHelpPage progname version progDesc docs [opt-env-conf-test] - Just (path, cDoc) -> renderCommandHelpPage progname path cDoc [opt-env-conf-test]  exitSuccess [opt-env-conf-test]  else do [opt-env-conf-test]  let (capabilities, args'') = consumeCapabilities args' [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf-test] @@ -80,7 +80,7 @@ [opt-env-conf-test]  let (debugMode, args) = consumeDebugMode allArgs [opt-env-conf-test]  [opt-env-conf-test]  mDebugMode <- [opt-env-conf-test] - if debugMode [opt-env-conf-test] + if not (debugMode) [opt-env-conf-test]  then Just <$> getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  else pure Nothing [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf-test] @@ -80,7 +80,7 @@ [opt-env-conf-test]  let (debugMode, args) = consumeDebugMode allArgs [opt-env-conf-test]  [opt-env-conf-test]  mDebugMode <- [opt-env-conf-test] - if debugMode [opt-env-conf-test] + if False [opt-env-conf-test]  then Just <$> getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  else pure Nothing [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Main.hs:83:12-21 [opt-env-conf-test] @@ -80,7 +80,7 @@ [opt-env-conf-test]  let (debugMode, args) = consumeDebugMode allArgs [opt-env-conf-test]  [opt-env-conf-test]  mDebugMode <- [opt-env-conf-test] - if debugMode [opt-env-conf-test] + if True [opt-env-conf-test]  then Just <$> getTerminalCapabilitiesFromHandle stderr [opt-env-conf-test]  else pure Nothing [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  | x == arg -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test] - in (found, x : rest) [opt-env-conf-test] + in (not (found), x : rest) [opt-env-conf-test]  [opt-env-conf-test]  consumeDebugMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeDebugMode = consumeExactArg "--debug-optparse" [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Main.hs:175:18-23 [opt-env-conf-test] @@ -172,7 +172,7 @@ [opt-env-conf-test]  | x == arg -> (True, xs) [opt-env-conf-test]  | otherwise -> [opt-env-conf-test]  let (found, rest) = go xs [opt-env-conf-test] - in (found, x : rest) [opt-env-conf-test] + in (False, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  consumeDebugMode :: [String] -> (Bool, [String]) [opt-env-conf-test]  consumeDebugMode = consumeExactArg "--debug-optparse" [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:199:13-44 [opt-env-conf-test] @@ -196,13 +196,12 @@ [opt-env-conf-test]  [] -> (caps, []) [opt-env-conf-test]  (x : xs) -> [opt-env-conf-test]  let t = T.pack x [opt-env-conf-test]  in case T.stripPrefix "--settings-capabilities-disable-" t of [opt-env-conf-test] - Just capName -> go (disableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of [opt-env-conf-test]  Just capName -> go (enableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  let (finalCaps, rest) = go caps xs [opt-env-conf-test]  in (finalCaps, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  -- Internal structure to help us do what the framework [opt-env-conf-test]  -- is supposed to. [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:201:26-44 [opt-env-conf-test] @@ -198,11 +198,10 @@ [opt-env-conf-test]  let t = T.pack x [opt-env-conf-test]  in case T.stripPrefix "--settings-capabilities-disable-" t of [opt-env-conf-test]  Just capName -> go (disableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of [opt-env-conf-test] - Just capName -> go (enableCapability (Capability capName) caps) xs [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  let (finalCaps, rest) = go caps xs [opt-env-conf-test]  in (finalCaps, x : rest) [opt-env-conf-test]  [opt-env-conf-test]  -- Internal structure to help us do what the framework [opt-env-conf-test]  -- is supposed to. [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf-test] @@ -66,10 +66,9 @@ [opt-env-conf-test]  defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test] - _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Output.hs:69:28-91 [opt-env-conf-test] @@ -66,10 +66,9 @@ [opt-env-conf-test]  defaultValueChunks val = ["default: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  [opt-env-conf-test]  exampleValuesChunks :: [String] -> [Chunk] [opt-env-conf-test]  exampleValuesChunks vals = case vals of [opt-env-conf-test] - [] -> [] [opt-env-conf-test]  [val] -> ["example: ", fore yellow $ chunk $ T.pack val] [opt-env-conf-test]  _ -> ["examples: ", fore yellow $ chunk $ T.intercalate ", " $ map (T.pack . show) vals] [opt-env-conf-test]  [opt-env-conf-test]  mHelpChunk :: Maybe Help -> Chunk [opt-env-conf-test]  mHelpChunk = maybe (fore red "undocumented") helpChunk [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Output.hs:87:27-50 [opt-env-conf-test] @@ -84,9 +84,8 @@ [opt-env-conf-test]  syntaxChunk = fore blue . chunk . T.pack [opt-env-conf-test]  [opt-env-conf-test]  capabilitiesChunks :: Set Capability -> [Chunk] [opt-env-conf-test]  capabilitiesChunks caps = case Set.toList caps of [opt-env-conf-test] - [] -> [] [opt-env-conf-test]  cs -> intersperse ", " (map capabilityChunk cs) [opt-env-conf-test]  [opt-env-conf-test]  capabilityChunk :: Capability -> Chunk [opt-env-conf-test]  capabilityChunk = fore green . chunk . unCapability [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:96:58-12 [opt-env-conf-test] @@ -93,33 +93,25 @@ [opt-env-conf-test]  map (fromRelFile . (rd )) $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  (dirsFromPartialListing, filesFromPartialListing) <- case parseSomeFile fp of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  if fp == "." [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir ds, [opt-env-conf-test]  map fromRelFile fs [opt-env-conf-test]  ) [opt-env-conf-test]  else pur ppIndent $ do [opt-env-conf-test] Testing mutation RemoveAction at src/OptEnvConf/Run.hs:122:26-31 [opt-env-conf-test] @@ -119,18 +119,17 @@ [opt-env-conf-test]  ParserSelect fe ff -> do [opt-env-conf-test]  debug [syntaxChunk "Select"] [opt-env-conf-test]  ppIndent $ select (go fe) (go ff) [opt-env-conf-test]  ParserAlt p1 p2 -> do [opt-env-conf-test] - debug [syntaxChunk "Alt"] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test]  debug ["Trying left side."] [opt-env-conf-test]  eor <- ppIndent $ tryPP (go p1) [opt-env-conf-test]  case eor of [opt-env-conf-test]  Just a -> do [opt-env-conf-test]  debug ["Left side succeeded."] [opt-env-conf-test]  pure a [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Left side failed, trying right side."] [opt-env-conf-test]  ppIndent $ go p2 [opt-env-conf-test]  ParserMany mLoc p' -> do [opt-env-conf-test]  debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc] [opt-env-conf-test]  ppIndent $ do [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:75:35-98 [opt-env-conf-test] @@ -72,17 +72,14 @@ [opt-env-conf-test]  let codecTups = maybe [] NE.toList (settingConfigVals s) [opt-env-conf-test]  in M.unionsWith combineOption $ flip map codecTups $ \ConfigValSetting {..} -> [opt-env-conf-test]  let go' :: NonEmpty Text -> Map Text Option [opt-env-conf-test]  go' (p :| ps) = case NE.nonEmpty ps of [opt-env-conf-test]  Nothing -> [opt-env-conf-test]  let oc = [opt-env-conf-test]  maybe [opt-env-conf-test]  (optionalFieldWith' p configValSettingCodec) [opt-env-conf-test]  (optionalFieldWith p configValSettingCodec) [opt-env-conf-test]  (T.pack <$> settingHelp s) [opt-env-conf-test]  in objectCodecNixOptions oc [opt-env-conf-test] - Just rest -> [opt-env-conf-test] - let m = go' rest [opt-env-conf-test] - in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Nix.hs:88:27-81 [opt-env-conf-test] @@ -85,10 +85,9 @@ [opt-env-conf-test]  in M.singleton p $ emptyOption {optionType = Just (OptionTypeSubmodule m)} [opt-env-conf-test]  in go' $ NE.map T.pack configValSettingPath [opt-env-conf-test]  combineOption :: Option -> Option -> Option [opt-env-conf-test]  combineOption o1 o2 = case (optionType o1, optionType o2) of [opt-env-conf-test]  (Nothing, _) -> o2 [opt-env-conf-test] - (Just ot1, Nothing) -> o2 {optionType = Just ot1} [opt-env-conf-test]  (Just ot1, Just ot2) -> o2 {optionType = Just $ combineOptionType ot1 ot2} [opt-env-conf-test]  [opt-env-conf-test]  combineOptionType :: OptionType -> OptionType -> OptionType [opt-env-conf-test]  combineOptionType ot1 ot2 = simplifyOptionType $ case (ot1, ot2) of [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:636:3-20 [opt-env-conf-test] @@ -633,15 +633,12 @@ [opt-env-conf-test]  e <- ask [opt-env-conf-test]  results <- liftIO $ runPP pp s e [opt-env-conf-test]  (errOrRes, s') <- ppNonDetList results [opt-env-conf-test]  case errOrRes of [opt-env-conf-test]  Failure errs -> [opt-env-conf-test]  if all errorIsForgivable errs [opt-env-conf-test]  then do [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  else ppErrors' errs [opt-env-conf-test] - Success a -> do [opt-env-conf-test] - put s' -- Only set state if parsing succeeded. [opt-env-conf-test] - pure $ Just a [opt-env-conf-test]  [opt-env-conf-test]  ppNonDet :: NonDetT IO a -> PP a [opt-env-conf-test]  ppNonDet = PP . lift . lift . lift [opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Error.hs:55:41-51 [opt-env-conf-test] @@ -52,7 +52,7 @@ [opt-env-conf-test]  ParseErrorEmpty -> True [opt-env-conf-test]  ParseErrorEmptySetting -> False [opt-env-conf-test]  ParseErrorNoReaders -> False [opt-env-conf-test] - ParseErrorCheckFailed forgivable _ -> forgivable [opt-env-conf-test] + ParseErrorCheckFailed forgivable _ -> not (forgivable) [opt-env-conf-test]  ParseErrorMissingArgument _ -> True [opt-env-conf-test]  ParseErrorArgumentRead _ _ -> False [opt-env-conf-test]  ParseErrorMissingSwitch _ -> True [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:490:19-27 [opt-env-conf-test] @@ -487,9 +487,8 @@ [opt-env-conf-test]  Right a -> Right a [opt-env-conf-test]  go' errs = \case [opt-env-conf-test]  [] -> Left errs [opt-env-conf-test]  (r : rl) -> case runReader r s of [opt-env-conf-test]  Left err -> go' (err <| errs) rl [opt-env-conf-test] - Right a -> Right a [opt-env-conf-test]  [opt-env-conf-test]  runHelpParser :: [opt-env-conf-test]  -- DebugMode [opt-env-conf-test] Testing mutation RemoveCase at src/OptEnvConf/Run.hs:587:21-47 [opt-env-conf-test] @@ -584,16 +584,10 @@ [opt-env-conf-test]  debug ["No argument found for choosing a command."] [opt-env-conf-test]  pure Nothing [opt-env-conf-test]  Just s -> do [opt-env-conf-test]  case find ((== s) . commandArg) cs of [opt-env-conf-test]  Nothing -> do [opt-env-conf-test]  debug ["Argument found, but no matching command: ", chunk $ T.pack $ show s] [opt-env-conf-test]  pure Nothing [opt-env-conf-test] - Just c -> do [opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)] [opt-env-conf-test] - mRes <- go' (commandArg c : path) $ commandParser c [opt-env-conf-test] - pure $ case mRes of [opt-env-conf-test] - Nothing -> Just (reverse path, commandParserDocs c) [opt-env-conf-test] - Just res -> pure res [opt-env-conf-test]  [opt-env-conf-test]  newtype PP a = PP (ReaderT PPEnv (ValidationT ParseError (StateT PPState (NonDetT IO))) a) [opt-env-conf-test]  deriving [opt-env-conf-test] e ([], []) [opt-env-conf-test] - Just (Abs af) -> do [opt-env-conf-test] - let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (filename af) then id else filter (not . hiddenRel) [opt-env-conf-test] - (ds, fs) <- listDirForgiving dir [opt-env-conf-test] - pure [opt-env-conf-test] - ( map (fromAbsDir . (dir )) $ filterHidden ds, [opt-env-conf-test] - map (fromAbsFile . (dir )) $ filterHidden fs [opt-env-conf-test] - ) [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test]  let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  map (fromRelFile . (dir )) $ filterHidden fs [opt-env-conf-test]  ) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf-test] @@ -114,7 +114,7 @@ [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if not (hiddenRel rf) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf-test] @@ -114,7 +114,7 @@ [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:117:31-43 [opt-env-conf-test] @@ -114,7 +114,7 @@ [opt-env-conf-test]  Just (Rel rf) -> do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  ( map (fromRelDir . (dir )) $ filterHidden ds, [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:74:18-27 [opt-env-conf-test] @@ -71,14 +71,13 @@ [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  (dirsFromParentListing, filesFromParentListing) <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, fs) <- listDirRel baseDir [opt-env-conf-test]  pure [opt-env-conf-test]  ( map fromRelDir $ filter (not . hiddenRel) ds, [opt-env-conf-test]  map fromRelFile $ filter (not . hiddenRel) fs [opt-env-conf-test]  ) [opt-env-conf-test] - _ -> pure ([], []) [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, fs) <- listDirForgiving ad [opt-env-conf-test]  pure [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:171:31-66 [opt-env-conf-test] @@ -168,24 +168,19 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test] - Just (Abs af) -> do [opt-env-conf-test] - let dir = parent af [opt-env-conf-test] - let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel) [opt-env-conf-test] - (ds, _) <- listDirForgiving dir [opt-env-conf-test] - pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test]  if fp == "." [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test]  let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  pure $ [opt-env-conf-test]  concat [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf-test] @@ -183,7 +183,7 @@ [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if not (hiddenRel rf) then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf-test] @@ -183,7 +183,7 @@ [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:186:35-47 [opt-env-conf-test] @@ -183,7 +183,7 @@ [opt-env-conf-test]  else do [opt-env-conf-test]  let dir = parent rf [opt-env-conf-test]  let ad = baseDir dir [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel) [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel) [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:179:12-21 [opt-env-conf-test] @@ -176,7 +176,7 @@ [opt-env-conf-test]  (ds, _) <- listDirForgiving dir [opt-env-conf-test]  pure (map (fromAbsDir . (dir )) $ filterHidden ds) [opt-env-conf-test]  Just (Rel rf) -> [opt-env-conf-test] - if fp == "." [opt-env-conf-test] + if False [opt-env-conf-test]  then do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir ds) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:157:30-73 [opt-env-conf-test] @@ -154,19 +154,16 @@ [opt-env-conf-test]  directoryPathFromDir baseDir prefix fp fp' = do [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test]  _ -> pure [] [opt-env-conf-test] - Just (Abs ad) -> do [opt-env-conf-test] - (ds, _) <- listDirForgiving ad [opt-env-conf-test] - pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  Just (Rel rd) -> do [opt-env-conf-test]  let ad = baseDir rd [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromRelDir . (rd )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test]  dirsFromPartialListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> pure [] [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:158:18-21 [opt-env-conf-test] @@ -155,11 +155,10 @@ [opt-env-conf-test]  fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do [opt-env-conf-test]  let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d) [opt-env-conf-test]  dirsFromParentListing <- case parseSomeDir fp of [opt-env-conf-test]  Nothing -> case fp of [opt-env-conf-test]  [] -> do [opt-env-conf-test]  (ds, _) <- listDirRel baseDir [opt-env-conf-test]  pure (map fromRelDir $ filter (not . hiddenRel) ds) [opt-env-conf-test] - _ -> pure [] [opt-env-conf-test]  Just (Abs ad) -> do [opt-env-conf-test]  (ds, _) <- listDirForgiving ad [opt-env-conf-test]  pure (map (fromAbsDir . (ad )) $ filter (not . hiddenRel) ds) [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Completer.hs:267:22-44 [opt-env-conf-test] @@ -264,7 +264,6 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:267:29-43 [opt-env-conf-test] @@ -264,7 +264,7 @@ [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test]  [] -> [seg | not (null seg)] [opt-env-conf-test] - _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test] + _ : rest' -> [seg | True] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Completer.hs:266:15-37 [opt-env-conf-test] @@ -263,7 +263,6 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:266:22-36 [opt-env-conf-test] @@ -263,7 +263,7 @@ [opt-env-conf-test]  splitOnSlash s = [opt-env-conf-test]  let (seg, rest) = break (== '/') s [opt-env-conf-test]  in case rest of [opt-env-conf-test] - [] -> [seg | not (null seg)] [opt-env-conf-test] + [] -> [seg | True] [opt-env-conf-test]  _ : rest' -> [seg | not (null seg)] <> splitOnSlash rest' [opt-env-conf-test]  [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:272:22-22 [opt-env-conf-test] @@ -269,9 +269,8 @@ [opt-env-conf-test]  -- | Apply a single path component to an absolute directory. [opt-env-conf-test]  applyComponent :: Path Abs Dir -> String -> Path Abs Dir [opt-env-conf-test]  applyComponent d ".." = parent d [opt-env-conf-test]  applyComponent d c = case parseRelDir c of [opt-env-conf-test] - Nothing -> d [opt-env-conf-test]  Just rd -> d rd [opt-env-conf-test]  [opt-env-conf-test]  filterPrefix :: String -> [CompletionResult] -> [CompletionResult] [opt-env-conf-test]  filterPrefix s = filter ((s `isPrefixOf`) . completionResultValue) [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Doc.hs:370:15-16 [opt-env-conf-test] @@ -367,11 +367,10 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:373:17-39 [opt-env-conf-test] @@ -370,7 +370,7 @@ [opt-env-conf-test]  [ [ headerChunks "Options", [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ headerChunks "Environment Variables", [opt-env-conf-test]  [opt-env-conf-test] RemoveAction at src/OptEnvConf/Doc.hs:329:15-16 [opt-env-conf-test] @@ -326,11 +326,10 @@ [opt-env-conf-test]  | not (null commandDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  renderEnvDocs envDocs [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:332:17-39 [opt-env-conf-test] @@ -329,7 +329,7 @@ [opt-env-conf-test]  [ [ [".Sh ", "OPTIONS"], [opt-env-conf-test]  renderLongOptDocs optDocs [opt-env-conf-test]  ] [opt-env-conf-test] - | not (nullDocs optDocs) [opt-env-conf-test] + | True [opt-env-conf-test]  ], [opt-env-conf-test]  concat [opt-env-conf-test]  [ [ [".Sh ", "ENVIRONMENT VARIABLES"], [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:568:9-20 [opt-env-conf-test] @@ -565,21 +565,20 @@ [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [d] -> go isTopLevel d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ indent $ renderSetDocHeader (Just h), [opt-env-conf-test]  indent $ concatMap renderSetDocWithoutHeader $ d : sds, [opt-env-conf-test]  [[]] [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test]  goOr isTopLevel rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:581:26-36 [opt-env-conf-test] @@ -578,7 +578,7 @@ [opt-env-conf-test]  ] [opt-env-conf-test]  | not isTopLevel [opt-env-conf-test]  ], [opt-env-conf-test] - goOr isTopLevel rest [opt-env-conf-test] + goOr True rest [opt-env-conf-test]  ] [opt-env-conf-test]  (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds [opt-env-conf-test]  goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc]) [opt-env-conf-test]  [opt-env-conf-test] Negate at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf-test] @@ -563,7 +563,7 @@ [opt-env-conf-test]  goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]] [opt-env-conf-test]  goOr isTopLevel = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [d] -> go isTopLevel d [opt-env-conf-test] + [d] -> go not (isTopLevel) d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:566:17-27 [opt-env-conf-test] @@ -563,7 +563,7 @@ [opt-env-conf-test]  goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]] [opt-env-conf-test]  goOr isTopLevel = \case [opt-env-conf-test]  [] -> [] [opt-env-conf-test] - [d] -> go isTopLevel d [opt-env-conf-test] + [d] -> go True d [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test]  Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:588:12-34 [opt-env-conf-test] @@ -585,7 +585,7 @@ [opt-env-conf-test]  goSameHelp h = \case [opt-env-conf-test]  [] -> ([], []) [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test] - if setDocHelp d == Just h [opt-env-conf-test] + if True [opt-env-conf-test]  then [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  in (d : sds, rest) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:532:13-50 [opt-env-conf-test] @@ -529,12 +529,11 @@ [opt-env-conf-test]  [] -> [] [opt-env-conf-test]  [d] -> [go' d] [opt-env-conf-test]  (AnyDocsSingle d : ds) -> [opt-env-conf-test]  case setDocHelp d of [opt-env-conf-test] - Nothing -> go' (AnyDocsSingle d) : goOr' ds [opt-env-conf-test]  Just h -> [opt-env-conf-test]  let (sds, rest) = goSameHelp h ds [opt-env-conf-test]  ne = d :| sds [opt-env-conf-test]  in AnyDocsSingle ne : goOr' rest [opt-env-conf-test]  (d : ds) -> go' d : goOr' ds [opt-env-conf-test]  [opt-env-conf-test]  renderCommandDocs :: AnyDocs (Maybe SetDoc) -> [Chunk] [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:259:17-26 [opt-env-conf-test] @@ -256,18 +256,16 @@ [opt-env-conf-test]  concat [opt-env-conf-test]  [ concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test]  [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test]  ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test]  | confs <- maybeToList setDocConfKeys [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:265:27-44 [opt-env-conf-test] @@ -262,11 +262,10 @@ [opt-env-conf-test]  ls -> [opt-env-conf-test]  ["config:"] [opt-env-conf-test]  : indent [opt-env-conf-test]  ( case ls of [opt-env-conf-test] - [] -> [["TODO"]] [opt-env-conf-test]  (l : ll) -> [opt-env-conf-test]  ([confValChunk key, ": "] ++ l) [opt-env-conf-test]  : indent ll [opt-env-conf-test]  ) [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confs) [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:661:30-18 [opt-env-conf-test] @@ -658,29 +658,28 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs [opt-env-conf-test]  AnyDocsSingle mOd -> case mOd of [opt-env-conf-test] - Nothing -> Nothing [opt-env-conf-test]  Just OptDoc {..} -> [opt-env-conf-test]  Just [opt-env-conf-test]  $ ( if isJust optDocDefault [opt-env-conf-test]  then bracketise [opt-env-conf-test]  else id [opt-env-conf-test]  ) [opt-env-conf-test]  $ unwordsChunks [opt-env-conf-test]  $ concat [opt-env-conf-test]  [ [ [mMetavarChunk optDocMetavar] [opt-env-conf-test]  | optDocTryArgument [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds [opt-env-conf-test]  | optDocTrySwitch [opt-env-conf-test]  ], [opt-env-conf-test]  [ concat [opt-env-conf-test]  [ concat $ maybeToList $ dashedChunks optDocDasheds, [opt-env-conf-test]  [" ", mMetavarChunk optDocMetavar] [opt-env-conf-test]  ] [opt-env-conf-test]  | optDocTryOption [opt-env-conf-test]  ] [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test]  orChunk :: Chunk [opt-env-conf-test]  orChunk = fore cyan "|" [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf-test] @@ -650,10 +650,9 @@ [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test] - [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:653:11-77 [opt-env-conf-test] @@ -650,10 +650,9 @@ [opt-env-conf-test]  Nothing -> Just ["COMMAND"] [opt-env-conf-test]  Just _ -> Just ["[COMMAND]"] [opt-env-conf-test]  AnyDocsAnd ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test] - [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test]  cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:656:30-31 [opt-env-conf-test] @@ -653,7 +653,7 @@ [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [c] -> Just c [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test] + cs -> Just $ (if False then parenthesise else id) $ unwordsChunks cs [opt-env-conf-test]  AnyDocsOr ds -> [opt-env-conf-test]  case mapMaybe (go False) (withoutNothings ds) of [opt-env-conf-test]  [] -> Nothing [opt-env-conf-test]  [opt-env-conf-test] BoolLit at src/OptEnvConf/Doc.hs:637:38-43 [opt-env-conf-test] @@ -634,7 +634,7 @@ [opt-env-conf-test]  withoutNothings = [opt-env-conf-test]  filter [opt-env-conf-test]  ( \case [opt-env-conf-test] - AnyDocsSingle Nothing -> False [opt-env-conf-test] + AnyDocsSingle Nothing -> True [opt-env-conf-test]  AnyDocsAnd [] -> False [opt-env-conf-test]  AnyDocsOr [] -> False [opt-env-conf-test]  _ -> True [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:822:13-52 [opt-env-conf-test] @@ -819,11 +819,9 @@ [opt-env-conf-test]  [exampleValuesChunks confDocExamples | not (null confDocExamples)], [opt-env-conf-test]  concatMap [opt-env-conf-test]  ( \(key, schema) -> [opt-env-conf-test]  case jsonSchemaChunkLines schema of [opt-env-conf-test] - [line] -> [opt-env-conf-test] - [[confValChunk key, ": "] ++ line] [opt-env-conf-test]  ls -> [opt-env-conf-test]  [confValChunk key, ":"] : indent ls [opt-env-conf-test]  ) [opt-env-conf-test]  (NE.toList confDocKeys) [opt-env-conf-test]  ] [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Test.hs:67:3-96 [opt-env-conf-test] @@ -64,10 +64,8 @@ [opt-env-conf-test]  [opt-env-conf-test]  parserLintTest :: Parser a -> IO () [opt-env-conf-test]  parserLintTest parser = [opt-env-conf-test]  case lintParser parser of [opt-env-conf-test]  Nothing -> pure () [opt-env-conf-test] - Just errs -> [opt-env-conf-test] - expectationFailure $ T.unpack $ renderChunksText With24BitColours $ renderLintErrors errs [opt-env-conf-test]  [opt-env-conf-test]  settingsParserArgsTest :: (Show a, Eq a, HasParser a) => [String] -> a -> IO () [opt-env-conf-test]  settingsParserArgsTest = parserArgsTest settingsParser [opt-env-conf-test]  [opt-env-conf-test] RemoveCase at src/OptEnvConf/Test.hs:149:13-24 [opt-env-conf-test] @@ -146,14 +146,13 @@ [opt-env-conf-test]  [opt-env-conf-test]  generatedFileComment :: CallStack -> T.Text [opt-env-conf-test]  generatedFileComment cs = [opt-env-conf-test]  let loc = case getCallStack cs of [opt-env-conf-test]  (_, srcLoc) : _ -> [opt-env-conf-test]  packageName (Stack.srcLocPackage srcLoc) [opt-env-conf-test]  <> ":" [opt-env-conf-test]  <> Stack.srcLocFile srcLoc [opt-env-conf-test]  <> ":" [opt-env-conf-test]  <> show (Stack.srcLocStartLine srcLoc) [opt-env-conf-test] - [] -> "unknown" [opt-env-conf-test]  in T.pack $ [opt-env-conf-test]  unlines $ [opt-env-conf-test]  map [opt-env-conf-test]  [opt-env-conf-test] LogicOp at src/OptEnvConf/Test.hs:180:19-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) || elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test]  [opt-env-conf-test] LogicOp at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v || all (\c -> isDigit c || c == '.') v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:35-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && True [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:49-84 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && True [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:60-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True) v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:73-81 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || True) v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:60-69 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True || c == '.') v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:35-45 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (null v) && True && all (\c -> isDigit c || c == '.') v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:19-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = True && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:23-31 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not False && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test]  [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:24-30 [opt-env-conf-test] @@ -177,4 +177,4 @@ [opt-env-conf-test]  where [opt-env-conf-test]  version = takeWhile (\c -> isDigit c || c == '.') rest [opt-env-conf-test]  go (c : rest) = c : go rest [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] + isVersion v = not (False) && elem '.' v && all (\c -> isDigit c || c == '.') v [opt-env-conf-test] checkPhase completed in 27 minutes 48 seconds [opt-env-conf-test] Phase: haddockPhase [opt-env-conf-test] Phase: installPhase [opt-env-conf-test] Installing library in /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5 [opt-env-conf-test] Phase: fixupPhase [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 [opt-env-conf-test] shrinking /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSopt-env-conf-test-0.0.0.4-3WilUK79pGbKEOnYVCQCp5-ghc9.10.3.so [opt-env-conf-test] shrinking /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/bin/opt-env-conf-test [opt-env-conf-test] checking for references to /build/ in /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4... [opt-env-conf-test] patching script interpreter paths in /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 [opt-env-conf-test] stripping (with command strip and flags -S -p) in /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/lib /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4/bin [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest [opt-env-conf-test] checking for references to /build/ in /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest... [opt-env-conf-test] patching script interpreter paths in /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report [opt-env-conf-test] checking for references to /build/ in /nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report... [opt-env-conf-test] patching script interpreter paths in /nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest [post-build-hook] Pushing 3 paths (268 are already present) using zstd to cache sydtest ⏳ [post-build-hook]  [post-build-hook] Pushing /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest (33.58 KiB) [post-build-hook] Pushing /nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report (2.93 MiB) [post-build-hook] Pushing /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 (15.02 MiB) [post-build-hook]  [post-build-hook] All done. [post-build-hook] Uploading to the NixCI staging cache: /nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report /nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4 /nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 3 paths... [post-build-hook] copying path '/nix/store/krf5j3msrd398pmg9711psc83m0bzl39-opt-env-conf-test-0.0.0.4-manifest' to 'https://cache.staging.nix-ci.com'... [post-build-hook] copying path '/nix/store/3m2m0sr1y9h4fq5v0c002xdvm9826fs4-opt-env-conf-test-0.0.0.4-report' to 'https://cache.staging.nix-ci.com'... [post-build-hook] copying path '/nix/store/kg6vc3ciivlcjplr4j87pcag4c9fllqp-opt-env-conf-test-0.0.0.4' to 'https://cache.staging.nix-ci.com'... [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead [post-build-hook] copying 1 paths... [post-build-hook] copying path '/nix/store/ia3vvp6ack61n1s2pbjryxcwym6pq0sq-opt-env-conf-test-0.0.0.4.drv' to 'https://cache.staging.nix-ci.com'... Progress: 8 of 9 built