$ /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=005f0daebea888c43c983d9be46fc636a7b09795#checks.x86_64-linux.mutation-safe-coloured-text --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
error (ignored): SQLite database '/var/cache/private/nix-ci-worker/eval-cache-v6/9bb080e97e6cbce65cb267b9daa3288eefb727a3c0f246c67620b89f86c27137.sqlite' is busy

Downloading cached safe-coloured-text-0.5.0.0-manifest from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-gen-source from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-layout-0.2.0.1-manifest from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-parsing-0.0.0.0-manifest from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-terminfo-0.3.0.0-manifest from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text from https://cache.staging.nix-ci.com
Downloading cached autodocodec-yaml-0.4.0.2-doc from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-gen-0.0.0.5-doc from https://cache.staging.nix-ci.com
Progress: 0 of 12 built, 1 of 23 downloaded from cache (7 downloading)
Progress: 0 of 11 built, 2 of 23 downloaded from cache (6 downloading)
Progress: 0 of 10 built, 3 of 23 downloaded from cache (5 downloading)
Progress: 0 of 9 built, 4 of 23 downloaded from cache (4 downloading)
Progress: 0 of 8 built, 5 of 23 downloaded from cache (3 downloading)
Progress: 0 of 7 built, 6 of 23 downloaded from cache (2 downloading)
Downloading cached safe-coloured-text-layout from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-parsing from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-terminfo from https://cache.staging.nix-ci.com
Progress: 0 of 6 built, 7 of 23 downloaded from cache (4 downloading)
Downloading cached autodocodec-yaml from https://cache.staging.nix-ci.com
Downloading cached opt-env-conf-0.15.0.1-doc from https://cache.staging.nix-ci.com
Progress: 0 of 6 built, 8 of 23 downloaded from cache (5 downloading)
Downloading cached safe-coloured-text-gen from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-layout-gen-0.0.0.1-doc from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-parsing-gen-0.0.0.0-doc from https://cache.staging.nix-ci.com
Progress: 0 of 6 built, 9 of 23 downloaded from cache (7 downloading)
Progress: 0 of 6 built, 10 of 23 downloaded from cache (6 downloading)
Progress: 0 of 6 built, 11 of 23 downloaded from cache (5 downloading)
Progress: 0 of 5 built, 12 of 23 downloaded from cache (4 downloading)
Downloading cached sydtest-0.23.0.2-doc from https://cache.staging.nix-ci.com
Progress: 0 of 5 built, 13 of 23 downloaded from cache (4 downloading)
Progress: 0 of 5 built, 14 of 23 downloaded from cache (3 downloading)
Downloading cached opt-env-conf from https://cache.staging.nix-ci.com
Progress: 0 of 5 built, 15 of 23 downloaded from cache (3 downloading)
Progress: 0 of 5 built, 16 of 23 downloaded from cache (2 downloading)
Downloading cached safe-coloured-text-layout-gen from https://cache.staging.nix-ci.com
Downloading cached safe-coloured-text-parsing-gen from https://cache.staging.nix-ci.com
Progress: 0 of 5 built, 17 of 23 downloaded from cache (3 downloading)
Downloading cached genvalidity-sydtest-1.0.1.0-doc from https://cache.staging.nix-ci.com
Progress: 0 of 5 built, 18 of 23 downloaded from cache (3 downloading)
Progress: 0 of 4 built, 19 of 23 downloaded from cache (2 downloading)
Downloading cached sydtest from https://cache.staging.nix-ci.com
Progress: 0 of 4 built, 20 of 23 downloaded from cache (2 downloading)
Progress: 0 of 4 built, 21 of 23 downloaded from cache (1 downloading)
Progress: 0 of 3 built, 22 of 23 downloaded from cache
Downloading cached genvalidity-sydtest from https://cache.staging.nix-ci.com
Progress: 0 of 2 built, 23 of 23 downloaded from cache
Building safe-coloured-text-gen
[safe-coloured-text-gen] Phase: setupCompilerEnvironmentPhase
[safe-coloured-text-gen] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3.
[safe-coloured-text-gen] Phase: unpackPhase
[safe-coloured-text-gen] unpacking source archive /nix/store/v97gknh6wrcbadq3qjpqlz7g5797cf89-safe-coloured-text-gen-source-0.0.0.5/safe-coloured-text-gen-0.0.0.5.tar.gz
[safe-coloured-text-gen] source root is safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] setting SOURCE_DATE_EPOCH to timestamp 1778762481 of file "safe-coloured-text-gen-0.0.0.5/test/Text/ColourSpec.hs"
[safe-coloured-text-gen] Phase: patchPhase
[safe-coloured-text-gen] Phase: compileBuildDriverPhase
[safe-coloured-text-gen] setupCompileFlags: -package-db=/build/tmp.0pPEb8Jmk2/setup-package.conf.d -threaded
[safe-coloured-text-gen] [1 of 2] Compiling Main             ( Setup.hs, /build/tmp.0pPEb8Jmk2/Main.o )
[safe-coloured-text-gen] [2 of 2] Linking Setup
[safe-coloured-text-gen] Phase: updateAutotoolsGnuConfigScriptsPhase
[safe-coloured-text-gen] Phase: configurePhase
[safe-coloured-text-gen] configureFlags: --verbose --prefix=/nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc/share/doc/safe-coloured-text-gen-0.0.0.5 --with-gcc=gcc --package-db=/build/tmp.0pPEb8Jmk2/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
[safe-coloured-text-gen] Using Parsec parser
[safe-coloured-text-gen] Configuring safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] Dependency base >=4.7 && <5: using base-4.20.2.0
[safe-coloured-text-gen] Dependency genvalidity: using genvalidity-1.1.1.0
[safe-coloured-text-gen] Dependency genvalidity-bytestring: using genvalidity-bytestring-1.0.0.1
[safe-coloured-text-gen] Dependency genvalidity-text: using genvalidity-text-1.0.0.1
[safe-coloured-text-gen] Dependency safe-coloured-text >=0.3: using safe-coloured-text-0.5.0.0
[safe-coloured-text-gen] Dependency base >=4.7 && <5: using base-4.20.2.0
[safe-coloured-text-gen] Dependency bytestring: using bytestring-0.12.2.0
[safe-coloured-text-gen] Dependency genvalidity-sydtest: using genvalidity-sydtest-1.0.1.0
[safe-coloured-text-gen] Dependency path: using path-0.9.6
[safe-coloured-text-gen] Dependency path-io: using path-io-1.8.2
[safe-coloured-text-gen] Dependency safe-coloured-text: using safe-coloured-text-0.5.0.0
[safe-coloured-text-gen] Dependency safe-coloured-text-gen: using safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] Dependency safe-coloured-text-parsing: using
[safe-coloured-text-gen] safe-coloured-text-parsing-0.0.0.0
[safe-coloured-text-gen] Dependency sydtest: using sydtest-0.23.0.2
[safe-coloured-text-gen] Dependency text: using text-2.1.3
[safe-coloured-text-gen] Source component graph:
[safe-coloured-text-gen]     component lib
[safe-coloured-text-gen]     component test:safe-coloured-text-test dependency lib
[safe-coloured-text-gen] Configured component graph:
[safe-coloured-text-gen]     component safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen]         include base-4.20.2.0-64da
[safe-coloured-text-gen]         include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
[safe-coloured-text-gen]         include genvalidity-bytestring-1.0.0.1-4fBfb3XMKpNAbpDTB1pAXt
[safe-coloured-text-gen]         include genvalidity-text-1.0.0.1-3o9b8WY3tDp4YbgmJHHJUk
[safe-coloured-text-gen]         include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf
[safe-coloured-text-gen]     component safe-coloured-text-gen-0.0.0.5-EPvFecOnBkTILxsyjQkowS-safe-coloured-text-test
[safe-coloured-text-gen]         include base-4.20.2.0-64da
[safe-coloured-text-gen]         include bytestring-0.12.2.0-262e
[safe-coloured-text-gen]         include genvalidity-sydtest-1.0.1.0-Cj9ZxpByhih2ReY6BClfG1
[safe-coloured-text-gen]         include path-0.9.6-JuNdYVciddTDWUiQr3NuVx
[safe-coloured-text-gen]         include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL
[safe-coloured-text-gen]         include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf
[safe-coloured-text-gen]         include safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen]         include safe-coloured-text-parsing-0.0.0.0-H3JFVfyfgjFFqLWmBrwd7B
[safe-coloured-text-gen]         include sydtest-0.23.0.2-RzVaEpJISaERaSrCHYFLw
[safe-coloured-text-gen]         include text-2.1.3-c691
[safe-coloured-text-gen] Linked component graph:
[safe-coloured-text-gen]     unit safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen]         include base-4.20.2.0-64da
[safe-coloured-text-gen]         include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
[safe-coloured-text-gen]         include genvalidity-bytestring-1.0.0.1-4fBfb3XMKpNAbpDTB1pAXt
[safe-coloured-text-gen]         include genvalidity-text-1.0.0.1-3o9b8WY3tDp4YbgmJHHJUk
[safe-coloured-text-gen]         include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf
[safe-coloured-text-gen]         Text.Colour.Gen=safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ:Text.Colour.Gen
[safe-coloured-text-gen]     unit safe-coloured-text-gen-0.0.0.5-EPvFecOnBkTILxsyjQkowS-safe-coloured-text-test
[safe-coloured-text-gen]         include base-4.20.2.0-64da
[safe-coloured-text-gen]         include bytestring-0.12.2.0-262e
[safe-coloured-text-gen]         include genvalidity-sydtest-1.0.1.0-Cj9ZxpByhih2ReY6BClfG1
[safe-coloured-text-gen]         include path-0.9.6-JuNdYVciddTDWUiQr3NuVx
[safe-coloured-text-gen]         include path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL
[safe-coloured-text-gen]         include safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf
[safe-coloured-text-gen]         include safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen]         include safe-coloured-text-parsing-0.0.0.0-H3JFVfyfgjFFqLWmBrwd7B
[safe-coloured-text-gen]         include sydtest-0.23.0.2-RzVaEpJISaERaSrCHYFLw
[safe-coloured-text-gen]         include text-2.1.3-c691
[safe-coloured-text-gen] Ready component graph:
[safe-coloured-text-gen]     definite safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen]         depends base-4.20.2.0-64da
[safe-coloured-text-gen]         depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
[safe-coloured-text-gen]         depends genvalidity-bytestring-1.0.0.1-4fBfb3XMKpNAbpDTB1pAXt
[safe-coloured-text-gen]         depends genvalidity-text-1.0.0.1-3o9b8WY3tDp4YbgmJHHJUk
[safe-coloured-text-gen]         depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf
[safe-coloured-text-gen]     definite safe-coloured-text-gen-0.0.0.5-EPvFecOnBkTILxsyjQkowS-safe-coloured-text-test
[safe-coloured-text-gen]         depends base-4.20.2.0-64da
[safe-coloured-text-gen]         depends bytestring-0.12.2.0-262e
[safe-coloured-text-gen]         depends genvalidity-sydtest-1.0.1.0-Cj9ZxpByhih2ReY6BClfG1
[safe-coloured-text-gen]         depends path-0.9.6-JuNdYVciddTDWUiQr3NuVx
[safe-coloured-text-gen]         depends path-io-1.8.2-J5Tb8ehzZIb1sPaxTlVmSL
[safe-coloured-text-gen]         depends safe-coloured-text-0.5.0.0-4FuoIi5owbVJgc3wW3DUAf
[safe-coloured-text-gen]         depends safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen]         depends safe-coloured-text-parsing-0.0.0.0-H3JFVfyfgjFFqLWmBrwd7B
[safe-coloured-text-gen]         depends sydtest-0.23.0.2-RzVaEpJISaERaSrCHYFLw
[safe-coloured-text-gen]         depends text-2.1.3-c691
[safe-coloured-text-gen] Using Cabal-3.12.1.0 compiled by ghc-9.10
[safe-coloured-text-gen] Using compiler: ghc-9.10.3
[safe-coloured-text-gen] Using install prefix:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] Executables installed in:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/bin
[safe-coloured-text-gen] Libraries installed in:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen] Dynamic Libraries installed in:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6
[safe-coloured-text-gen] Private executables installed in:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/libexec/x86_64-linux-ghc-9.10.3-05f6/safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] Data files installed in:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/share/x86_64-linux-ghc-9.10.3-05f6/safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] Documentation installed in:
[safe-coloured-text-gen] /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc/share/doc/safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] Configuration files installed in:
[safe-coloured-text-gen] /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/etc
[safe-coloured-text-gen] No alex found
[safe-coloured-text-gen] Using ar found on system at:
[safe-coloured-text-gen] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar
[safe-coloured-text-gen] No c2hs found
[safe-coloured-text-gen] No cpphs found
[safe-coloured-text-gen] No doctest found
[safe-coloured-text-gen] Using gcc version 14.3.0 given by user at:
[safe-coloured-text-gen] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc
[safe-coloured-text-gen] Using ghc version 9.10.3 found on system at:
[safe-coloured-text-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc
[safe-coloured-text-gen] Using ghc-pkg version 9.10.3 found on system at:
[safe-coloured-text-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3
[safe-coloured-text-gen] No ghcjs found
[safe-coloured-text-gen] No ghcjs-pkg found
[safe-coloured-text-gen] No greencard found
[safe-coloured-text-gen] Using haddock version 2.31.1 found on system at:
[safe-coloured-text-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3
[safe-coloured-text-gen] No happy found
[safe-coloured-text-gen] Using haskell-suite found on system at: haskell-suite-dummy-location
[safe-coloured-text-gen] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
[safe-coloured-text-gen] No hmake found
[safe-coloured-text-gen] Using hpc version 0.69 found on system at:
[safe-coloured-text-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3
[safe-coloured-text-gen] Using hsc2hs version 0.68.10 found on system at:
[safe-coloured-text-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
[safe-coloured-text-gen] Using hscolour version 1.25 found on system at:
[safe-coloured-text-gen] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour
[safe-coloured-text-gen] No jhc found
[safe-coloured-text-gen] Using ld found on system at:
[safe-coloured-text-gen] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld
[safe-coloured-text-gen] No pkg-config found
[safe-coloured-text-gen] Using runghc version 9.10.3 found on system at:
[safe-coloured-text-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3
[safe-coloured-text-gen] Using strip version 2.44 found on system at:
[safe-coloured-text-gen] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip
[safe-coloured-text-gen] Using tar found on system at:
[safe-coloured-text-gen] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar
[safe-coloured-text-gen] No uhc found
[safe-coloured-text-gen] Phase: buildPhase
[safe-coloured-text-gen] Preprocessing library for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] Building library for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] [1 of 2] Compiling Paths_safe_coloured_text_gen ( dist/build/autogen/Paths_safe_coloured_text_gen.hs, dist/build/Paths_safe_coloured_text_gen.o, dist/build/Paths_safe_coloured_text_gen.dyn_o )
[safe-coloured-text-gen] [2 of 2] Compiling Text.Colour.Gen  ( src/Text/Colour/Gen.hs, dist/build/Text/Colour/Gen.o, dist/build/Text/Colour/Gen.dyn_o )
[safe-coloured-text-gen] [1 of 2] Compiling Paths_safe_coloured_text_gen ( dist/build/autogen/Paths_safe_coloured_text_gen.hs, dist/build/Paths_safe_coloured_text_gen.p_o )
[safe-coloured-text-gen] [2 of 2] Compiling Text.Colour.Gen  ( src/Text/Colour/Gen.hs, dist/build/Text/Colour/Gen.p_o )
[safe-coloured-text-gen] Preprocessing test suite 'safe-coloured-text-test' for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] Building test suite 'safe-coloured-text-test' for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] [1 of 6] Compiling Paths_safe_coloured_text_gen ( dist/build/safe-coloured-text-test/autogen/Paths_safe_coloured_text_gen.hs, dist/build/safe-coloured-text-test/safe-coloured-text-test-tmp/Paths_safe_coloured_text_gen.o )
[safe-coloured-text-gen] [2 of 6] Compiling Text.Colour.Chunk.ParsingRoundtripSpec ( test/Text/Colour/Chunk/ParsingRoundtripSpec.hs, dist/build/safe-coloured-text-test/safe-coloured-text-test-tmp/Text/Colour/Chunk/ParsingRoundtripSpec.o )
[safe-coloured-text-gen] [3 of 6] Compiling Text.Colour.ChunkSpec ( test/Text/Colour/ChunkSpec.hs, dist/build/safe-coloured-text-test/safe-coloured-text-test-tmp/Text/Colour/ChunkSpec.o )
[safe-coloured-text-gen] [4 of 6] Compiling Text.Colour.CodeSpec ( test/Text/Colour/CodeSpec.hs, dist/build/safe-coloured-text-test/safe-coloured-text-test-tmp/Text/Colour/CodeSpec.o )
[safe-coloured-text-gen] [5 of 6] Compiling Text.ColourSpec  ( test/Text/ColourSpec.hs, dist/build/safe-coloured-text-test/safe-coloured-text-test-tmp/Text/ColourSpec.o )
[safe-coloured-text-gen] [6 of 6] Compiling Main             ( test/Spec.hs, dist/build/safe-coloured-text-test/safe-coloured-text-test-tmp/Main.o )
[safe-coloured-text-gen] [7 of 7] Linking dist/build/safe-coloured-text-test/safe-coloured-text-test
[safe-coloured-text-gen] Phase: checkPhase
[safe-coloured-text-gen] mutation-nix: collecting coverage for suite safe-coloured-text-gen
[safe-coloured-text-gen] coverage (19/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (16,240,224) foreground on a(n) 8-bit colour (224,16,64) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (2/186): Text\.ColourSpec.GenValid ConsoleLayer.genValid   \:\: Gen ConsoleLayer.only generates valid 'ConsoleLayer's (1 mutations)
[safe-coloured-text-gen] coverage (18/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,0,224) foreground on a(n) 8-bit colour (240,240,240) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (1/186): Text\.ColourSpec.GenValid TerminalColour.genValid   \:\: Gen TerminalColour.only generates valid 'TerminalColour's (1 mutations)
[safe-coloured-text-gen] coverage (20/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (240,240,224) foreground on a(n) 8-bit colour (0,16,112) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (3/186): Text\.ColourSpec.GenValid CSI.genValid   \:\: Gen CSI.only generates valid 'CSI's (1 mutations)
[safe-coloured-text-gen] coverage (22/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,0,16) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (4/186): Text\.ColourSpec.GenValid Colour.genValid   \:\: Gen Colour.only generates valid 'Colour's (1 mutations)
[safe-coloured-text-gen] coverage (13/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,32,48) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (7/186): Text\.ColourSpec.GenValid TerminalColour.genValid   \:\: Gen TerminalColour.only generates valid 'TerminalColour's (1 mutations)
[safe-coloured-text-gen] coverage (14/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,48,224) foreground on a(n) 8-bit colour (240,208,16) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (5/186): Text\.ColourSpec.GenValid SGR.genValid   \:\: Gen SGR.only generates valid 'SGR's (1 mutations)
[safe-coloured-text-gen] coverage (10/186): Text\.ColourSpec.GenValid ColourIntensity.genValid   \:\: Gen ColourIntensity.only generates valid 'ColourIntensity's (1 mutations)
[safe-coloured-text-gen] coverage (27/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (32,0,112) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (8/186): Text\.ColourSpec.GenValid Chunk.genValid   \:\: Gen Chunk.only generates valid 'Chunk's (1 mutations)
[safe-coloured-text-gen] coverage (17/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,0,144) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (15/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,112,224) foreground on a(n) 8-bit colour (240,144,32) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (21/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,0,112) foreground on a(n) 8-bit colour (0,0,80) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (25/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,0,64) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (12/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,64,64) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (26/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,0,0) foreground on a(n) 8-bit colour (0,0,144) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (16/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,0,48) foreground on a(n) 8-bit colour (0,0,128) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (24/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (112,240,224) foreground on a(n) 8-bit colour (128,16,96) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (23/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (16,0,96) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (9/186): Text\.ColourSpec.GenValid ConsoleIntensity.genValid   \:\: Gen ConsoleIntensity.only generates valid 'ConsoleIntensity's (1 mutations)
[safe-coloured-text-gen] coverage (28/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (48,240,224) foreground on a(n) 8-bit colour (192,16,80) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (11/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,128,80) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (6/186): Text\.ColourSpec.GenValid Underlining.genValid   \:\: Gen Underlining.only generates valid 'Underlining's (1 mutations)
[safe-coloured-text-gen] coverage (29/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,16,224) foreground on a(n) 8-bit colour (240,240,0) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (30/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (64,0,128) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (31/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (0,16,32) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (33/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,240,224) foreground on a(n) 8-bit colour (240,16,48) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (32/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a a(n) 8-bit colour (0,0,16) foreground on a(n) 8-bit colour (0,0,144) background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (34/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on no background the same way as before (49 mutations)
[safe-coloured-text-gen] coverage (38/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on no background the same way as before (49 mutations)
[safe-coloured-text-gen] coverage (37/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 133 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (35/186): Text\.Colour\.ChunkSpec.renderChunk.24bit colours.outputs a no foreground on a(n) 8-bit colour (128,0,144) background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (36/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 126 foreground on a(n) 8-bit colour 142 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (39/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 4 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (50/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 254 foreground on a(n) 8-bit colour 15 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (51/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 0 foreground on a(n) 8-bit colour 5 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (52/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 35 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (45/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 62 foreground on a(n) 8-bit colour 205 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (41/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 18 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (48/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 14 foreground on a(n) 8-bit colour 251 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (40/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 9 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (44/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 68 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (42/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 3 foreground on a(n) 8-bit colour 4 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (49/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 7 foreground on a(n) 8-bit colour 1 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (43/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a no foreground on a(n) 8-bit colour 1 background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (46/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 1 foreground on a(n) 8-bit colour 5 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (54/186): Text\.Colour\.ChunkSpec.renderChunk.outputs plain text if the terminal has only 8bit colours and 24bit colours are needed (56 mutations)
[safe-coloured-text-gen] coverage (47/186): Text\.Colour\.ChunkSpec.renderChunk.8bit colours.outputs a a(n) 8-bit colour 30 foreground on a(n) 8-bit colour 236 background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (53/186): Text\.Colour\.ChunkSpec.renderChunk.outputs plain text if the terminal has no colours (56 mutations)
[safe-coloured-text-gen] coverage (55/186): Text\.Colour\.ChunkSpec.renderChunk.outputs a plain chunk the same as before (49 mutations)
[safe-coloured-text-gen] coverage (56/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with a(n) Bright Black foreground on a(n) Bright Black background the same way as before (77 mutations)
[safe-coloured-text-gen] coverage (57/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a strikethrough overlined faint no underline ook with a(n) Bright Green foreground on a(n) Dull Black background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (58/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a non-strikethrough non-overlined bold underline rapid blinking ook with a(n) Dull Red foreground on a(n) Dull Blue background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (59/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a non-italic non-strikethrough non-concealed overlined bold double underline ook with a(n) Dull Magenta foreground on a(n) Dull Black background the same way as before (78 mutations)
[safe-coloured-text-gen] coverage (60/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a slow blinking ook with a(n) Dull Cyan foreground on a(n) Bright Blue background the same way as before (78 mutations)
[safe-coloured-text-gen] coverage (61/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a non-overlined non-bold slow blinking ook with a(n) Dull Yellow foreground on a(n) Bright Green background the same way as before (79 mutations)
[safe-coloured-text-gen] coverage (62/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a non-reverse non-concealed overlined double underline no blinking ook with a(n) Bright Black foreground on a(n) Bright Red background the same way as before (79 mutations)
[safe-coloured-text-gen] coverage (69/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with no foreground on a(n) Bright Blue background the same way as before (78 mutations)
[safe-coloured-text-gen] coverage (68/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with no foreground on no background the same way as before (50 mutations)
[safe-coloured-text-gen] coverage (63/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a no blinking ook with a(n) Dull Blue foreground on a(n) Dull Cyan background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (64/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with no foreground on a(n) Dull Green background the same way as before (78 mutations)
[safe-coloured-text-gen] coverage (65/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with a(n) Dull White foreground on a(n) Bright Yellow background the same way as before (82 mutations)
[safe-coloured-text-gen] coverage (70/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a non-concealed faint rapid blinking ook with a(n) Dull Cyan foreground on a(n) Bright White background the same way as before (76 mutations)
[safe-coloured-text-gen] coverage (67/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a concealed non-overlined underline slow blinking ook with a(n) Bright Blue foreground on a(n) Dull Black background the same way as before (80 mutations)
[safe-coloured-text-gen] coverage (66/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with a(n) Bright Red foreground on a(n) Dull Black background the same way as before (80 mutations)
[safe-coloured-text-gen] coverage (73/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a no underline rapid blinking ook with a(n) Dull Red foreground on a(n) Bright Blue background the same way as before (79 mutations)
[safe-coloured-text-gen] coverage (71/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with a(n) Dull Yellow foreground on a(n) Dull White background the same way as before (80 mutations)
[safe-coloured-text-gen] coverage (77/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a bold no underline ook with a(n) Bright Green foreground on a(n) Bright Blue background the same way as before (74 mutations)
[safe-coloured-text-gen] coverage (72/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a italic strikethrough non-reverse non-overlined non-bold slow blinking ook with a(n) Bright Red foreground on no background the same way as before (73 mutations)
[safe-coloured-text-gen] coverage (78/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with no foreground on a(n) Bright Black background the same way as before (77 mutations)
[safe-coloured-text-gen] coverage (75/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a non-bold double underline ook with a(n) Bright Magenta foreground on a(n) Dull Blue background the same way as before (77 mutations)
[safe-coloured-text-gen] coverage (79/186): Text\.Colour\.ChunkSpec.renderChunk.outputs plain text if the terminal has only 8 colours and 24bit colours are needed (56 mutations)
[safe-coloured-text-gen] coverage (74/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a ook with a(n) Dull Black foreground on a(n) Bright Black background the same way as before (79 mutations)
[safe-coloured-text-gen] coverage (76/186): Text\.Colour\.ChunkSpec.renderChunk.8 colours.outputs a underline no blinking ook with a(n) Bright Black foreground on a(n) Dull Black background the same way as before (77 mutations)
[safe-coloured-text-gen] coverage (81/186): Text\.Colour\.ChunkSpec.renderChunk.outputs plain text if the terminal has no colours and 256 are needed (56 mutations)
[safe-coloured-text-gen] coverage (82/186): Text\.Colour\.ChunkSpec.renderChunk.outputs plain text if the terminal has no colours and 24bit colours are needed (56 mutations)
[safe-coloured-text-gen] coverage (83/186): Text\.Colour\.ChunkSpec.renderChunk.outputs plain text if the terminal has only 8 colours and 256 are needed (56 mutations)
[safe-coloured-text-gen] coverage (85/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.outputs an dull red background with bright blue foreground the same as before (19 mutations)
[safe-coloured-text-gen] coverage (80/186): Text\.Colour\.ChunkSpec.renderChunk.super fancy.outputs this super fancy thing the same way as before (126 mutations)
[safe-coloured-text-gen] coverage (84/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.outputs a blinking, bold, italic, underlined, dull yellow background with bright green foreground the same as before (39 mutations)
[safe-coloured-text-gen] coverage (86/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Cyan Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (88/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Yellow Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (87/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Red Background" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (89/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Blue Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (91/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Magenta Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (90/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Black Foreground" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (94/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Red Foreground" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (95/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Black Background" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (92/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Green Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (97/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Yellow Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (93/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Blue Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (98/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Red Foreground" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (99/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Green Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (96/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Red Background" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (100/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Yellow Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (101/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Magenta Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (103/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Yellow Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (107/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull White Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (102/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Green Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (106/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright White Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (105/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Cyan Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (104/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull White Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (111/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Blue Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (108/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright White Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (110/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Black Background" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (109/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Magenta Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (112/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Cyan Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (114/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Black Foreground" the same as before (12 mutations)
[safe-coloured-text-gen] coverage (115/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Magenta Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (117/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Bright Green Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (116/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Cyan Foreground" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (119/186): Text\.Colour\.CodeSpec.renderCSI.outputs a reset the same as before (2 mutations)
[safe-coloured-text-gen] coverage (120/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/0-fg-5-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (118/186): Text\.Colour\.CodeSpec.renderCSI.SGR.256 colours.outputs a pink foreground colour with light blue background the same as before (19 mutations)
[safe-coloured-text-gen] coverage (121/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-64-0-128-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (113/186): Text\.Colour\.CodeSpec.renderCSI.SGR.8 colours.simple, exhaustive.outputs a "Dull Blue Background" the same as before (13 mutations)
[safe-coloured-text-gen] coverage (123/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-16-32-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (122/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-0-64-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (126/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/dull-black-fg-bright-black-bg\.dat (344 mutations)
[safe-coloured-text-gen] coverage (124/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-128-0-144-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (125/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-64-64-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (127/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/240-240-224-fg-0-16-112-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (128/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-hd-faint-rapid-blinking-dull-cyan-fg-bright-white-bg\.dat (346 mutations)
[safe-coloured-text-gen] coverage (134/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-ol-non-bold-slow-blinking-dull-yellow-fg-bright-green-bg\.dat (349 mutations)
[safe-coloured-text-gen] coverage (135/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-fg-no-bg\.dat (67 mutations)
[safe-coloured-text-gen] coverage (130/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-18-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (129/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-4-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (131/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-112-224-fg-240-144-32-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (132/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-32-48-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (133/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/254-fg-15-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (137/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-68-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (136/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-fg-dull-green-bg\.dat (282 mutations)
[safe-coloured-text-gen] coverage (138/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-0-16-fg-0-0-144-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (139/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/48-240-224-fg-192-16-80-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (140/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-128-80-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (141/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-underline-rapid-blinking-dull-red-fg-bright-blue-bg\.dat (347 mutations)
[safe-coloured-text-gen] coverage (142/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-it-no-st-no-hd-ol-bold-double-underline-dull-magenta-fg-dull-black-bg\.dat (316 mutations)
[safe-coloured-text-gen] coverage (143/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/dull-white-fg-bright-yellow-bg\.dat (348 mutations)
[safe-coloured-text-gen] coverage (145/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-0-16-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (144/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/3-fg-4-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (146/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-1-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (148/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/30-fg-236-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (147/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-133-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (149/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/underline-no-blinking-bright-black-fg-dull-black-bg\.dat (327 mutations)
[safe-coloured-text-gen] coverage (150/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-no-bg\.dat (67 mutations)
[safe-coloured-text-gen] coverage (151/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/it-st-no-rv-no-ol-non-bold-slow-blinking-bright-red-fg-no-bg\.dat (324 mutations)
[safe-coloured-text-gen] coverage (155/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-st-no-ol-bold-underline-rapid-blinking-dull-red-fg-dull-blue-bg\.dat (315 mutations)
[safe-coloured-text-gen] coverage (156/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-48-224-fg-240-208-16-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (157/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/dull-yellow-fg-dull-white-bg\.dat (296 mutations)
[safe-coloured-text-gen] coverage (153/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/non-bold-double-underline-bright-magenta-fg-dull-blue-bg\.dat (328 mutations)
[safe-coloured-text-gen] coverage (162/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/1-fg-5-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (160/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/62-fg-205-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (159/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-0-112-fg-0-0-80-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (152/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/16-240-224-fg-224-16-64-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (158/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-0-48-fg-0-0-128-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (163/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-blinking-dull-blue-fg-dull-cyan-bg\.dat (293 mutations)
[safe-coloured-text-gen] coverage (165/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/hd-no-ol-underline-slow-blinking-bright-blue-fg-dull-black-bg\.dat (335 mutations)
[safe-coloured-text-gen] coverage (164/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-0-224-fg-240-240-240-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (161/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-rv-no-hd-ol-double-underline-no-blinking-bright-black-fg-bright-red-bg\.dat (353 mutations)
[safe-coloured-text-gen] coverage (166/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-32-0-112-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (167/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/112-240-224-fg-128-16-96-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (168/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/bright-black-fg-bright-black-bg\.dat (342 mutations)
[safe-coloured-text-gen] coverage (154/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips fancy\.dat (402 mutations)
[safe-coloured-text-gen] coverage (169/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-16-0-96-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (171/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-35-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (174/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips plain\.dat (67 mutations)
[safe-coloured-text-gen] coverage (170/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/slow-blinking-dull-cyan-fg-bright-blue-bg\.dat (345 mutations)
[safe-coloured-text-gen] coverage (172/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/7-fg-1-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (173/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-240-224-fg-240-16-48-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (177/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/14-fg-251-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (175/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/no-fg-9-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (178/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-0-0-144-bg\.dat (284 mutations)
[safe-coloured-text-gen] coverage (180/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/bright-red-fg-dull-black-bg\.dat (329 mutations)
[safe-coloured-text-gen] coverage (185/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-fg-bright-black-bg\.dat (331 mutations)
[safe-coloured-text-gen] coverage (181/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-16-224-fg-240-240-0-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (184/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/st-ol-faint-no-underline-bright-green-fg-dull-black-bg\.dat (329 mutations)
[safe-coloured-text-gen] coverage (182/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8bit/126-fg-142-bg\.dat (286 mutations)
[safe-coloured-text-gen] coverage (183/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/no-fg-no-bg\.dat (67 mutations)
[safe-coloured-text-gen] coverage (186/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/bold-no-underline-bright-green-fg-bright-blue-bg\.dat (342 mutations)
[safe-coloured-text-gen] coverage (176/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 8/no-fg-bright-blue-bg\.dat (332 mutations)
[safe-coloured-text-gen] coverage (179/186): Text\.Colour\.Chunk\.ParsingRoundtripSpec.golden file roundtrip.roundtrips 24bit/0-0-0-fg-0-0-144-bg\.dat (286 mutations)
[safe-coloured-text-gen] mutation-nix: collecting coverage for suite safe-coloured-text-layout-gen
[safe-coloured-text-gen] coverage (4/8): Text\.Colour\.LayoutSpec.layoutAsTable.outputs this two-column table the same as before (0 mutations)
[safe-coloured-text-gen] coverage (7/8): Text\.Colour\.Layout\.GenSpec.GenValid Table.genValid   \:\: Gen Table.only generates valid 'Table's (1 mutations)
[safe-coloured-text-gen] coverage (5/8): Text\.Colour\.LayoutSpec.layoutAsTable.outputs this table with a background colour the same as before (0 mutations)
[safe-coloured-text-gen] coverage (8/8): Text\.Colour\.Layout\.GenSpec.GenValid TableBackground.genValid   \:\: Gen TableBackground.only generates valid 'TableBackground's (1 mutations)
[safe-coloured-text-gen] coverage (6/8): Text\.Colour\.LayoutSpec.layoutAsTable.outputs this table with a bicoloured background the same as before (0 mutations)
[safe-coloured-text-gen] coverage (3/8): Text\.Colour\.LayoutSpec.layoutAsTable.outputs this weird two-column table the same as before (0 mutations)
[safe-coloured-text-gen] coverage (2/8): Text\.Colour\.LayoutSpec.layoutAsTable.outputs this two-column table with a custom column separator the same as before (0 mutations)
[safe-coloured-text-gen] coverage (1/8): Text\.Colour\.LayoutSpec.layoutAsTable.outputs this list the same as before (0 mutations)
[safe-coloured-text-gen] mutation-nix: collecting coverage for suite safe-coloured-text-parsing-gen
[safe-coloured-text-gen] coverage (10/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.returns plain text unchanged (19 mutations)
[safe-coloured-text-gen] coverage (23/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes bare ESC as plain text (18 mutations)
[safe-coloured-text-gen] coverage (6/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses bold (93 mutations)
[safe-coloured-text-gen] coverage (21/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.treats CSI with intermediate bytes as non-SGR (70 mutations)
[safe-coloured-text-gen] coverage (17/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses bright colours (239 mutations)
[safe-coloured-text-gen] coverage (7/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.threads state across calls (181 mutations)
[safe-coloured-text-gen] coverage (20/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes an SGR sequence (69 mutations)
[safe-coloured-text-gen] coverage (5/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.handles incomplete sequence at end of text (24 mutations)
[safe-coloured-text-gen] coverage (1/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokensLazy.works with multi-chunk lazy text (81 mutations)
[safe-coloured-text-gen] coverage (13/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses background colour (206 mutations)
[safe-coloured-text-gen] coverage (3/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.strips non-SGR CSI sequences (69 mutations)
[safe-coloured-text-gen] coverage (24/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes empty input (2 mutations)
[safe-coloured-text-gen] coverage (9/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses a simple red foreground (181 mutations)
[safe-coloured-text-gen] coverage (14/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.produces segment texts that concatenate to the input minus ANSI codes (18 mutations)
[safe-coloured-text-gen] coverage (12/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses 24-bit RGB foreground (185 mutations)
[safe-coloured-text-gen] coverage (8/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.handles text with no visible content between escapes (76 mutations)
[safe-coloured-text-gen] coverage (16/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.handles empty input (3 mutations)
[safe-coloured-text-gen] coverage (19/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.keeps incomplete ESC[ together as single token (18 mutations)
[safe-coloured-text-gen] coverage (28/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.drops parameter values that overflow Word8 (69 mutations)
[safe-coloured-text-gen] coverage (26/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes combined parameters (73 mutations)
[safe-coloured-text-gen] coverage (18/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes plain text (13 mutations)
[safe-coloured-text-gen] coverage (25/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes 256-colour parameters (73 mutations)
[safe-coloured-text-gen] coverage (11/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses 256-colour foreground (185 mutations)
[safe-coloured-text-gen] coverage (22/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes non-SGR CSI as OtherCsiSequence (53 mutations)
[safe-coloured-text-gen] coverage (4/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.never crashes on arbitrary input (18 mutations)
[safe-coloured-text-gen] coverage (15/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunks.parses combined bold and colour (187 mutations)
[safe-coloured-text-gen] coverage (2/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokensLazy.produces the same tokens as strict parsing (17 mutations)
[safe-coloured-text-gen] coverage (27/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiTokens.tokenizes mixed content (79 mutations)
[safe-coloured-text-gen] coverage (29/31): Text\.Colour\.Chunk\.ParsingSpec.GenValid AnsiToken.genValid   \:\: Gen AnsiToken.only generates valid 'AnsiToken's (1 mutations)
[safe-coloured-text-gen] coverage (31/31): Text\.Colour\.Chunk\.ParsingSpec.parseAnsiChunksLazy.produces the same chunks as strict parsing (23 mutations)
[safe-coloured-text-gen] coverage (30/31): Text\.Colour\.Chunk\.ParsingSpec.roundtrip.recovers chunk style from rendered output for non-empty chunks (510 mutations)
[safe-coloured-text-gen] mutation-nix: running mutations
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:228:39-47
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if tc >= tc' then Nothing else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if tc <= tc' then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if tc > tc' then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if True then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:215:75-90
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]  rapidBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just RapidBlinking}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  noBlinking :: Chunk -> Chunk
[safe-coloured-text-gen] -noBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just NoBlinking}}
[safe-coloured-text-gen] +noBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- TODO consider allowing an 8-colour alternative to a given 256-colour
[safe-coloured-text-gen]  data Colour
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if False then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if not (tc >= tc') then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:209:77-94
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]  noUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just NoUnderline}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  slowBlinking :: Chunk -> Chunk
[safe-coloured-text-gen] -slowBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just SlowBlinking}}
[safe-coloured-text-gen] +slowBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  rapidBlinking :: Chunk -> Chunk
[safe-coloured-text-gen]  rapidBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just RapidBlinking}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:212:78-96
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]  slowBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just SlowBlinking}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  rapidBlinking :: Chunk -> Chunk
[safe-coloured-text-gen] -rapidBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just RapidBlinking}}
[safe-coloured-text-gen] +rapidBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  noBlinking :: Chunk -> Chunk
[safe-coloured-text-gen]  noBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just NoBlinking}}
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:191:110-114
[safe-coloured-text-gen] @@ -188,7 +188,7 @@
[safe-coloured-text-gen]  strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  swapForegroundBackground :: Chunk -> Chunk
[safe-coloured-text-gen] -swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just True}}
[safe-coloured-text-gen] +swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just False}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  concealed :: Chunk -> Chunk
[safe-coloured-text-gen]  concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just True}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:197:75-84
[safe-coloured-text-gen] @@ -194,7 +194,7 @@
[safe-coloured-text-gen]  concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  overlined :: Chunk -> Chunk
[safe-coloured-text-gen] -overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Just True}}
[safe-coloured-text-gen] +overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  underline :: Chunk -> Chunk
[safe-coloured-text-gen]  underline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just SingleUnderline}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:203:83-103
[safe-coloured-text-gen] @@ -200,7 +200,7 @@
[safe-coloured-text-gen]  underline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just SingleUnderline}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  doubleUnderline :: Chunk -> Chunk
[safe-coloured-text-gen] -doubleUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just DoubleUnderline}}
[safe-coloured-text-gen] +doubleUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  noUnderline :: Chunk -> Chunk
[safe-coloured-text-gen]  noUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just NoUnderline}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:191:105-114
[safe-coloured-text-gen] @@ -188,7 +188,7 @@
[safe-coloured-text-gen]  strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  swapForegroundBackground :: Chunk -> Chunk
[safe-coloured-text-gen] -swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just True}}
[safe-coloured-text-gen] +swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  concealed :: Chunk -> Chunk
[safe-coloured-text-gen]  concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just True}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:182:78-97
[safe-coloured-text-gen] @@ -179,7 +179,7 @@
[safe-coloured-text-gen]  bold chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just BoldIntensity}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  faint :: Chunk -> Chunk
[safe-coloured-text-gen] -faint chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just FaintIntensity}}
[safe-coloured-text-gen] +faint chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  italic :: Chunk -> Chunk
[safe-coloured-text-gen]  italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Just True}}
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if tc < tc' then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:206:79-95
[safe-coloured-text-gen] @@ -203,7 +203,7 @@
[safe-coloured-text-gen]  doubleUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just DoubleUnderline}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  noUnderline :: Chunk -> Chunk
[safe-coloured-text-gen] -noUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just NoUnderline}}
[safe-coloured-text-gen] +noUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  slowBlinking :: Chunk -> Chunk
[safe-coloured-text-gen]  slowBlinking chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBlinking = Just SlowBlinking}}
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:185:74-78
[safe-coloured-text-gen] @@ -182,7 +182,7 @@
[safe-coloured-text-gen]  faint chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just FaintIntensity}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  italic :: Chunk -> Chunk
[safe-coloured-text-gen] -italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Just True}}
[safe-coloured-text-gen] +italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Just False}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  strikethrough :: Chunk -> Chunk
[safe-coloured-text-gen]  strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just True}}
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:194:80-84
[safe-coloured-text-gen] @@ -191,7 +191,7 @@
[safe-coloured-text-gen]  swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  concealed :: Chunk -> Chunk
[safe-coloured-text-gen] -concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just True}}
[safe-coloured-text-gen] +concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just False}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  overlined :: Chunk -> Chunk
[safe-coloured-text-gen]  overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Just True}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:194:75-84
[safe-coloured-text-gen] @@ -191,7 +191,7 @@
[safe-coloured-text-gen]  swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  concealed :: Chunk -> Chunk
[safe-coloured-text-gen] -concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just True}}
[safe-coloured-text-gen] +concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  overlined :: Chunk -> Chunk
[safe-coloured-text-gen]  overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Just True}}
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:197:80-84
[safe-coloured-text-gen] @@ -194,7 +194,7 @@
[safe-coloured-text-gen]  concealed chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConcealed = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  overlined :: Chunk -> Chunk
[safe-coloured-text-gen] -overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Just True}}
[safe-coloured-text-gen] +overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Just False}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  underline :: Chunk -> Chunk
[safe-coloured-text-gen]  underline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just SingleUnderline}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:179:77-95
[safe-coloured-text-gen] @@ -176,7 +176,7 @@
[safe-coloured-text-gen]  back col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBackground = Just col}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  bold :: Chunk -> Chunk
[safe-coloured-text-gen] -bold chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just BoldIntensity}}
[safe-coloured-text-gen] +bold chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  faint :: Chunk -> Chunk
[safe-coloured-text-gen]  faint chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just FaintIntensity}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:185:69-78
[safe-coloured-text-gen] @@ -182,7 +182,7 @@
[safe-coloured-text-gen]  faint chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just FaintIntensity}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  italic :: Chunk -> Chunk
[safe-coloured-text-gen] -italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Just True}}
[safe-coloured-text-gen] +italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  strikethrough :: Chunk -> Chunk
[safe-coloured-text-gen]  strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just True}}
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:188:88-92
[safe-coloured-text-gen] @@ -185,7 +185,7 @@
[safe-coloured-text-gen]  italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  strikethrough :: Chunk -> Chunk
[safe-coloured-text-gen] -strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just True}}
[safe-coloured-text-gen] +strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just False}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  swapForegroundBackground :: Chunk -> Chunk
[safe-coloured-text-gen]  swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just True}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:188:83-92
[safe-coloured-text-gen] @@ -185,7 +185,7 @@
[safe-coloured-text-gen]  italic chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleItalic = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  strikethrough :: Chunk -> Chunk
[safe-coloured-text-gen] -strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Just True}}
[safe-coloured-text-gen] +strikethrough chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleStrikethrough = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  swapForegroundBackground :: Chunk -> Chunk
[safe-coloured-text-gen]  swapForegroundBackground chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleSwapForegroundBackground = Just True}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:200:77-97
[safe-coloured-text-gen] @@ -197,7 +197,7 @@
[safe-coloured-text-gen]  overlined chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleOverlined = Just True}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  underline :: Chunk -> Chunk
[safe-coloured-text-gen] -underline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just SingleUnderline}}
[safe-coloured-text-gen] +underline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  doubleUnderline :: Chunk -> Chunk
[safe-coloured-text-gen]  doubleUnderline chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleUnderlining = Just DoubleUnderline}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:176:75-83
[safe-coloured-text-gen] @@ -173,7 +173,7 @@
[safe-coloured-text-gen]  fore col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleForeground = Just col}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  back :: Colour -> Chunk -> Chunk
[safe-coloured-text-gen] -back col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBackground = Just col}}
[safe-coloured-text-gen] +back col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBackground = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  bold :: Chunk -> Chunk
[safe-coloured-text-gen]  bold chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleConsoleIntensity = Just BoldIntensity}}
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk.hs:173:75-83
[safe-coloured-text-gen] @@ -170,7 +170,7 @@
[safe-coloured-text-gen]      }
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  fore :: Colour -> Chunk -> Chunk
[safe-coloured-text-gen] -fore col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleForeground = Just col}}
[safe-coloured-text-gen] +fore col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleForeground = Nothing}}
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  back :: Colour -> Chunk -> Chunk
[safe-coloured-text-gen]  back col chu = chu {chunkStyle = (chunkStyle chu) {chunkStyleBackground = Just col}}
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> False
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:136:5-6
[safe-coloured-text-gen] @@ -133,17 +133,16 @@
[safe-coloured-text-gen]  styleSGR :: TerminalCapabilities -> ChunkStyle -> [SGR]
[safe-coloured-text-gen]  styleSGR tc ChunkStyle {..} =
[safe-coloured-text-gen]    catMaybes
[safe-coloured-text-gen] -    [ SetItalic <$> chunkStyleItalic,
[safe-coloured-text-gen]        SetStrikethrough <$> chunkStyleStrikethrough,
[safe-coloured-text-gen]        SetSwapForegroundBackground <$> chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]        SetConcealed <$> chunkStyleConcealed,
[safe-coloured-text-gen]        SetOverlined <$> chunkStyleOverlined,
[safe-coloured-text-gen]        SetUnderlining <$> chunkStyleUnderlining,
[safe-coloured-text-gen]        SetBlinking <$> chunkStyleBlinking,
[safe-coloured-text-gen]        SetConsoleIntensity <$> chunkStyleConsoleIntensity,
[safe-coloured-text-gen]        chunkStyleForeground >>= colourSGR tc Foreground,
[safe-coloured-text-gen]        chunkStyleBackground >>= colourSGR tc Background
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Turn a text into a plain chunk, without any styling
[safe-coloured-text-gen]  chunk :: Text -> Chunk
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> tc >= With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:136:5-6
[safe-coloured-text-gen] @@ -133,17 +133,16 @@
[safe-coloured-text-gen]  styleSGR :: TerminalCapabilities -> ChunkStyle -> [SGR]
[safe-coloured-text-gen]  styleSGR tc ChunkStyle {..} =
[safe-coloured-text-gen]    catMaybes
[safe-coloured-text-gen]      [ SetItalic <$> chunkStyleItalic,
[safe-coloured-text-gen]        SetStrikethrough <$> chunkStyleStrikethrough,
[safe-coloured-text-gen]        SetSwapForegroundBackground <$> chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]        SetConcealed <$> chunkStyleConcealed,
[safe-coloured-text-gen]        SetOverlined <$> chunkStyleOverlined,
[safe-coloured-text-gen]        SetUnderlining <$> chunkStyleUnderlining,
[safe-coloured-text-gen]        SetBlinking <$> chunkStyleBlinking,
[safe-coloured-text-gen]        SetConsoleIntensity <$> chunkStyleConsoleIntensity,
[safe-coloured-text-gen]        chunkStyleForeground >>= colourSGR tc Foreground,
[safe-coloured-text-gen] -      chunkStyleBackground >>= colourSGR tc Background
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Turn a text into a plain chunk, without any styling
[safe-coloured-text-gen]  chunk :: Text -> Chunk
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> True
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> tc <= With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:136:5-6
[safe-coloured-text-gen] @@ -133,17 +133,7 @@
[safe-coloured-text-gen]  styleSGR :: TerminalCapabilities -> ChunkStyle -> [SGR]
[safe-coloured-text-gen]  styleSGR tc ChunkStyle {..} =
[safe-coloured-text-gen]    catMaybes
[safe-coloured-text-gen] -    [ SetItalic <$> chunkStyleItalic,
[safe-coloured-text-gen] -      SetStrikethrough <$> chunkStyleStrikethrough,
[safe-coloured-text-gen] -      SetSwapForegroundBackground <$> chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] -      SetConcealed <$> chunkStyleConcealed,
[safe-coloured-text-gen] -      SetOverlined <$> chunkStyleOverlined,
[safe-coloured-text-gen] -      SetUnderlining <$> chunkStyleUnderlining,
[safe-coloured-text-gen] -      SetBlinking <$> chunkStyleBlinking,
[safe-coloured-text-gen] -      SetConsoleIntensity <$> chunkStyleConsoleIntensity,
[safe-coloured-text-gen] -      chunkStyleForeground >>= colourSGR tc Foreground,
[safe-coloured-text-gen] -      chunkStyleBackground >>= colourSGR tc Background
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Turn a text into a plain chunk, without any styling
[safe-coloured-text-gen]  chunk :: Text -> Chunk
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> tc > With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> not (tc < With8Colours)
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> True
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:83:21-42
[safe-coloured-text-gen] @@ -80,7 +80,7 @@
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] -  Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen] +  Colour24Bit {} -> tc > With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen]  renderChunksUtf8BS :: (Foldable f) => TerminalCapabilities -> f Chunk -> ByteString
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> tc <= With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> False
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> tc > With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> tc >= With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> not (tc < With8BitColours)
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:83:21-42
[safe-coloured-text-gen] @@ -80,7 +80,7 @@
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] -  Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen] +  Colour24Bit {} -> tc >= With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen]  renderChunksUtf8BS :: (Foldable f) => TerminalCapabilities -> f Chunk -> ByteString
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk.hs:83:21-42
[safe-coloured-text-gen] @@ -80,7 +80,7 @@
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] -  Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen] +  Colour24Bit {} -> tc <= With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen]  renderChunksUtf8BS :: (Foldable f) => TerminalCapabilities -> f Chunk -> ByteString
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:83:21-42
[safe-coloured-text-gen] @@ -80,7 +80,7 @@
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] -  Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen] +  Colour24Bit {} -> True
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen]  renderChunksUtf8BS :: (Foldable f) => TerminalCapabilities -> f Chunk -> ByteString
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:83:21-42
[safe-coloured-text-gen] @@ -80,7 +80,7 @@
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] -  Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen] +  Colour24Bit {} -> not (tc < With24BitColours)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen]  renderChunksUtf8BS :: (Foldable f) => TerminalCapabilities -> f Chunk -> ByteString
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:83:21-42
[safe-coloured-text-gen] @@ -80,7 +80,7 @@
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] -  Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen] +  Colour24Bit {} -> False
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen]  renderChunksUtf8BS :: (Foldable f) => TerminalCapabilities -> f Chunk -> ByteString
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:62:11-37
[safe-coloured-text-gen] @@ -59,7 +59,7 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] +        [ True,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:62:11-37
[safe-coloured-text-gen] @@ -59,7 +59,7 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] +        [ False,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:62:11-37
[safe-coloured-text-gen] @@ -59,7 +59,7 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] +        [ not (isNothing chunkStyleItalic),
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:63:11-44
[safe-coloured-text-gen] @@ -60,7 +60,7 @@
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] -          isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:63:11-44
[safe-coloured-text-gen] @@ -60,7 +60,7 @@
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] -          isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:63:11-44
[safe-coloured-text-gen] @@ -60,7 +60,7 @@
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] -          isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] +          not (isNothing chunkStyleStrikethrough),
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:64:11-55
[safe-coloured-text-gen] @@ -61,7 +61,7 @@
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] -          isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:64:11-55
[safe-coloured-text-gen] @@ -61,7 +61,7 @@
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] -          isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:65:11-40
[safe-coloured-text-gen] @@ -62,7 +62,7 @@
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] -          isNothing chunkStyleConcealed,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:64:11-55
[safe-coloured-text-gen] @@ -61,7 +61,7 @@
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] -          isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] +          not (isNothing chunkStyleSwapForegroundBackground),
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:65:11-40
[safe-coloured-text-gen] @@ -62,7 +62,7 @@
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] -          isNothing chunkStyleConcealed,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:66:11-40
[safe-coloured-text-gen] @@ -63,7 +63,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] -          isNothing chunkStyleOverlined,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:67:11-47
[safe-coloured-text-gen] @@ -64,7 +64,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] -          isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:65:11-40
[safe-coloured-text-gen] @@ -62,7 +62,7 @@
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] -          isNothing chunkStyleConcealed,
[safe-coloured-text-gen] +          not (isNothing chunkStyleConcealed),
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:66:11-40
[safe-coloured-text-gen] @@ -63,7 +63,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] -          isNothing chunkStyleOverlined,
[safe-coloured-text-gen] +          not (isNothing chunkStyleOverlined),
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:67:11-47
[safe-coloured-text-gen] @@ -64,7 +64,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] -          isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:67:11-47
[safe-coloured-text-gen] @@ -64,7 +64,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] -          isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] +          not (isNothing chunkStyleConsoleIntensity),
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:68:11-42
[safe-coloured-text-gen] @@ -65,7 +65,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] -          isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:66:11-40
[safe-coloured-text-gen] @@ -63,7 +63,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] -          isNothing chunkStyleOverlined,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:68:11-42
[safe-coloured-text-gen] @@ -65,7 +65,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] -          isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:68:11-42
[safe-coloured-text-gen] @@ -65,7 +65,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] -          isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] +          not (isNothing chunkStyleUnderlining),
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:69:11-39
[safe-coloured-text-gen] @@ -66,7 +66,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] -          isNothing chunkStyleBlinking,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:69:11-39
[safe-coloured-text-gen] @@ -66,7 +66,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] -          isNothing chunkStyleBlinking,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:69:11-39
[safe-coloured-text-gen] @@ -66,7 +66,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] -          isNothing chunkStyleBlinking,
[safe-coloured-text-gen] +          not (isNothing chunkStyleBlinking),
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:70:17-21
[safe-coloured-text-gen] @@ -67,7 +67,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] +          maybe False (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:70:11-59
[safe-coloured-text-gen] @@ -67,7 +67,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] +          False,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:70:11-59
[safe-coloured-text-gen] @@ -67,7 +67,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:70:11-59
[safe-coloured-text-gen] @@ -67,7 +67,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] +          not (maybe True (plainColour tc) chunkStyleForeground),
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk.hs:71:17-21
[safe-coloured-text-gen] @@ -68,7 +68,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] +          maybe False (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:71:11-59
[safe-coloured-text-gen] @@ -68,7 +68,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] +          True
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:71:11-59
[safe-coloured-text-gen] @@ -68,7 +68,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] +          False
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:71:11-59
[safe-coloured-text-gen] @@ -68,7 +68,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] +          not (maybe True (plainColour tc) chunkStyleBackground)
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:62:9-10
[safe-coloured-text-gen] @@ -59,17 +59,7 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] -          isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] -          isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] -          isNothing chunkStyleConcealed,
[safe-coloured-text-gen] -          isNothing chunkStyleOverlined,
[safe-coloured-text-gen] -          isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] -          isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] -          isNothing chunkStyleBlinking,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:62:9-10
[safe-coloured-text-gen] @@ -59,17 +59,16 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:62:9-10
[safe-coloured-text-gen] @@ -59,17 +59,16 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:61:7-10
[safe-coloured-text-gen] @@ -58,18 +58,18 @@
[safe-coloured-text-gen]  plainStyle :: TerminalCapabilities -> ChunkStyle -> Bool
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen] -   in and
[safe-coloured-text-gen] +   in True
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:61:7-10
[safe-coloured-text-gen] @@ -58,18 +58,18 @@
[safe-coloured-text-gen]  plainStyle :: TerminalCapabilities -> ChunkStyle -> Bool
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen] -   in and
[safe-coloured-text-gen] +   in False
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:61:7-10
[safe-coloured-text-gen] @@ -58,18 +58,18 @@
[safe-coloured-text-gen]  plainStyle :: TerminalCapabilities -> ChunkStyle -> Bool
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen] -   in and
[safe-coloured-text-gen] +   in not (and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] -        ]
[safe-coloured-text-gen] +        ])
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:60:3-10
[safe-coloured-text-gen] @@ -57,19 +57,19 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainStyle :: TerminalCapabilities -> ChunkStyle -> Bool
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen] -  let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen] +  TruenkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:60:3-10
[safe-coloured-text-gen] @@ -57,19 +57,19 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainStyle :: TerminalCapabilities -> ChunkStyle -> Bool
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen] -  let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen] +  FalsenkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:60:3-10
[safe-coloured-text-gen] @@ -57,19 +57,19 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainStyle :: TerminalCapabilities -> ChunkStyle -> Bool
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen] -  let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen] +  not (let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] -        ]
[safe-coloured-text-gen] +        ])
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:77:7-31
[safe-coloured-text-gen] @@ -74,7 +74,7 @@
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen]    let Chunk _ _ = undefined
[safe-coloured-text-gen] -   in plainStyle tc chunkStyle
[safe-coloured-text-gen] +   in True
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:77:7-31
[safe-coloured-text-gen] @@ -74,7 +74,7 @@
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen]    let Chunk _ _ = undefined
[safe-coloured-text-gen] -   in plainStyle tc chunkStyle
[safe-coloured-text-gen] +   in False
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:76:3-31
[safe-coloured-text-gen] @@ -73,8 +73,8 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] -  let Chunk _ _ = undefined
[safe-coloured-text-gen] +  False
[safe-coloured-text-gen]     in plainStyle tc chunkStyle
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:77:7-31
[safe-coloured-text-gen] @@ -74,7 +74,7 @@
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen]    let Chunk _ _ = undefined
[safe-coloured-text-gen] -   in plainStyle tc chunkStyle
[safe-coloured-text-gen] +   in not (plainStyle tc chunkStyle)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:76:3-31
[safe-coloured-text-gen] @@ -73,8 +73,8 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] -  let Chunk _ _ = undefined
[safe-coloured-text-gen] +  True
[safe-coloured-text-gen]     in plainStyle tc chunkStyle
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:76:3-31
[safe-coloured-text-gen] @@ -73,8 +73,8 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] -  let Chunk _ _ = undefined
[safe-coloured-text-gen] -   in plainStyle tc chunkStyle
[safe-coloured-text-gen] +  not (let Chunk _ _ = undefined
[safe-coloured-text-gen] +   in plainStyle tc chunkStyle)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:124:6-21
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]  -- | Render a chunk to a lazy 'LT.Text' 'Text.Builder'
[safe-coloured-text-gen]  renderChunkBuilder :: TerminalCapabilities -> Chunk -> Text.Builder
[safe-coloured-text-gen]  renderChunkBuilder tc c@Chunk {..} =
[safe-coloured-text-gen] -  if plainChunk tc c
[safe-coloured-text-gen] +  if True
[safe-coloured-text-gen]      then LTB.fromText chunkText
[safe-coloured-text-gen]      else
[safe-coloured-text-gen]        mconcat
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk.hs:124:6-21
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]  -- | Render a chunk to a lazy 'LT.Text' 'Text.Builder'
[safe-coloured-text-gen]  renderChunkBuilder :: TerminalCapabilities -> Chunk -> Text.Builder
[safe-coloured-text-gen]  renderChunkBuilder tc c@Chunk {..} =
[safe-coloured-text-gen] -  if plainChunk tc c
[safe-coloured-text-gen] +  if False
[safe-coloured-text-gen]      then LTB.fromText chunkText
[safe-coloured-text-gen]      else
[safe-coloured-text-gen]        mconcat
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk.hs:124:6-21
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]  -- | Render a chunk to a lazy 'LT.Text' 'Text.Builder'
[safe-coloured-text-gen]  renderChunkBuilder :: TerminalCapabilities -> Chunk -> Text.Builder
[safe-coloured-text-gen]  renderChunkBuilder tc c@Chunk {..} =
[safe-coloured-text-gen] -  if plainChunk tc c
[safe-coloured-text-gen] +  if not (plainChunk tc c)
[safe-coloured-text-gen]      then LTB.fromText chunkText
[safe-coloured-text-gen]      else
[safe-coloured-text-gen]        mconcat
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:128:9-10
[safe-coloured-text-gen] @@ -125,10 +125,7 @@
[safe-coloured-text-gen]      then LTB.fromText chunkText
[safe-coloured-text-gen]      else
[safe-coloured-text-gen]        mconcat
[safe-coloured-text-gen] -        [ renderCSI (SGR (styleSGR tc chunkStyle)),
[safe-coloured-text-gen] -          LTB.fromText chunkText,
[safe-coloured-text-gen] -          renderCSI (SGR [Reset])
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  styleSGR :: TerminalCapabilities -> ChunkStyle -> [SGR]
[safe-coloured-text-gen]  styleSGR tc ChunkStyle {..} =
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:128:9-10
[safe-coloured-text-gen] @@ -125,10 +125,9 @@
[safe-coloured-text-gen]      then LTB.fromText chunkText
[safe-coloured-text-gen]      else
[safe-coloured-text-gen]        mconcat
[safe-coloured-text-gen] -        [ renderCSI (SGR (styleSGR tc chunkStyle)),
[safe-coloured-text-gen]            LTB.fromText chunkText,
[safe-coloured-text-gen]            renderCSI (SGR [Reset])
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  styleSGR :: TerminalCapabilities -> ChunkStyle -> [SGR]
[safe-coloured-text-gen]  styleSGR tc ChunkStyle {..} =
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Chunk.hs:128:9-10
[safe-coloured-text-gen] @@ -125,10 +125,9 @@
[safe-coloured-text-gen]      then LTB.fromText chunkText
[safe-coloured-text-gen]      else
[safe-coloured-text-gen]        mconcat
[safe-coloured-text-gen]          [ renderCSI (SGR (styleSGR tc chunkStyle)),
[safe-coloured-text-gen]            LTB.fromText chunkText,
[safe-coloured-text-gen] -          renderCSI (SGR [Reset])
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  styleSGR :: TerminalCapabilities -> ChunkStyle -> [SGR]
[safe-coloured-text-gen]  styleSGR tc ChunkStyle {..} =
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:220:8-18
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  terminalColourFromIndex :: Word8 -> Maybe TerminalColour
[safe-coloured-text-gen]  terminalColourFromIndex = \case
[safe-coloured-text-gen] -  0 -> Just Black
[safe-coloured-text-gen] +  0 -> Nothing
[safe-coloured-text-gen]    1 -> Just Red
[safe-coloured-text-gen]    2 -> Just Green
[safe-coloured-text-gen]    3 -> Just Yellow
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:222:8-18
[safe-coloured-text-gen] @@ -219,7 +219,7 @@
[safe-coloured-text-gen]  terminalColourFromIndex = \case
[safe-coloured-text-gen]    0 -> Just Black
[safe-coloured-text-gen]    1 -> Just Red
[safe-coloured-text-gen] -  2 -> Just Green
[safe-coloured-text-gen] +  2 -> Nothing
[safe-coloured-text-gen]    3 -> Just Yellow
[safe-coloured-text-gen]    4 -> Just Blue
[safe-coloured-text-gen]    5 -> Just Magenta
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:221:8-16
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]  terminalColourFromIndex :: Word8 -> Maybe TerminalColour
[safe-coloured-text-gen]  terminalColourFromIndex = \case
[safe-coloured-text-gen]    0 -> Just Black
[safe-coloured-text-gen] -  1 -> Just Red
[safe-coloured-text-gen] +  1 -> Nothing
[safe-coloured-text-gen]    2 -> Just Green
[safe-coloured-text-gen]    3 -> Just Yellow
[safe-coloured-text-gen]    4 -> Just Blue
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:223:8-19
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    0 -> Just Black
[safe-coloured-text-gen]    1 -> Just Red
[safe-coloured-text-gen]    2 -> Just Green
[safe-coloured-text-gen] -  3 -> Just Yellow
[safe-coloured-text-gen] +  3 -> Nothing
[safe-coloured-text-gen]    4 -> Just Blue
[safe-coloured-text-gen]    5 -> Just Magenta
[safe-coloured-text-gen]    6 -> Just Cyan
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:224:8-17
[safe-coloured-text-gen] @@ -221,7 +221,7 @@
[safe-coloured-text-gen]    1 -> Just Red
[safe-coloured-text-gen]    2 -> Just Green
[safe-coloured-text-gen]    3 -> Just Yellow
[safe-coloured-text-gen] -  4 -> Just Blue
[safe-coloured-text-gen] +  4 -> Nothing
[safe-coloured-text-gen]    5 -> Just Magenta
[safe-coloured-text-gen]    6 -> Just Cyan
[safe-coloured-text-gen]    7 -> Just White
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:225:8-20
[safe-coloured-text-gen] @@ -222,7 +222,7 @@
[safe-coloured-text-gen]    2 -> Just Green
[safe-coloured-text-gen]    3 -> Just Yellow
[safe-coloured-text-gen]    4 -> Just Blue
[safe-coloured-text-gen] -  5 -> Just Magenta
[safe-coloured-text-gen] +  5 -> Nothing
[safe-coloured-text-gen]    6 -> Just Cyan
[safe-coloured-text-gen]    7 -> Just White
[safe-coloured-text-gen]    _ -> Nothing
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:226:8-17
[safe-coloured-text-gen] @@ -223,6 +223,6 @@
[safe-coloured-text-gen]    3 -> Just Yellow
[safe-coloured-text-gen]    4 -> Just Blue
[safe-coloured-text-gen]    5 -> Just Magenta
[safe-coloured-text-gen] -  6 -> Just Cyan
[safe-coloured-text-gen] +  6 -> Nothing
[safe-coloured-text-gen]    7 -> Just White
[safe-coloured-text-gen]    _ -> Nothing
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Code.hs:227:8-18
[safe-coloured-text-gen] @@ -224,5 +224,5 @@
[safe-coloured-text-gen]    4 -> Just Blue
[safe-coloured-text-gen]    5 -> Just Magenta
[safe-coloured-text-gen]    6 -> Just Cyan
[safe-coloured-text-gen] -  7 -> Just White
[safe-coloured-text-gen] +  7 -> Nothing
[safe-coloured-text-gen]    _ -> Nothing
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:209:12-13
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  terminalColourSGRParameter :: TerminalColour -> Word8
[safe-coloured-text-gen]  terminalColourSGRParameter = \case
[safe-coloured-text-gen] -  Black -> 0
[safe-coloured-text-gen] +  Black -> 1
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:210:10-11
[safe-coloured-text-gen] @@ -207,7 +207,7 @@
[safe-coloured-text-gen]  terminalColourSGRParameter :: TerminalColour -> Word8
[safe-coloured-text-gen]  terminalColourSGRParameter = \case
[safe-coloured-text-gen]    Black -> 0
[safe-coloured-text-gen] -  Red -> 1
[safe-coloured-text-gen] +  Red -> 0
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:211:12-13
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]  terminalColourSGRParameter = \case
[safe-coloured-text-gen]    Black -> 0
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen] -  Green -> 2
[safe-coloured-text-gen] +  Green -> 0
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:211:12-13
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]  terminalColourSGRParameter = \case
[safe-coloured-text-gen]    Black -> 0
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen] -  Green -> 2
[safe-coloured-text-gen] +  Green -> 1
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:212:13-14
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    Black -> 0
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen] -  Yellow -> 3
[safe-coloured-text-gen] +  Yellow -> 0
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:212:13-14
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    Black -> 0
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen] -  Yellow -> 3
[safe-coloured-text-gen] +  Yellow -> 1
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:213:11-12
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen] -  Blue -> 4
[safe-coloured-text-gen] +  Blue -> 0
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen]    White -> 7
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:213:11-12
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    Red -> 1
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen] -  Blue -> 4
[safe-coloured-text-gen] +  Blue -> 1
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen]    White -> 7
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:214:14-15
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen] -  Magenta -> 5
[safe-coloured-text-gen] +  Magenta -> 0
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen]    White -> 7
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:214:14-15
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    Green -> 2
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen] -  Magenta -> 5
[safe-coloured-text-gen] +  Magenta -> 1
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen]    White -> 7
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:215:11-12
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen] -  Cyan -> 6
[safe-coloured-text-gen] +  Cyan -> 0
[safe-coloured-text-gen]    White -> 7
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  terminalColourFromIndex :: Word8 -> Maybe TerminalColour
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:215:11-12
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    Yellow -> 3
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen] -  Cyan -> 6
[safe-coloured-text-gen] +  Cyan -> 1
[safe-coloured-text-gen]    White -> 7
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  terminalColourFromIndex :: Word8 -> Maybe TerminalColour
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:216:12-13
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen] -  White -> 7
[safe-coloured-text-gen] +  White -> 0
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  terminalColourFromIndex :: Word8 -> Maybe TerminalColour
[safe-coloured-text-gen]  terminalColourFromIndex = \case
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:216:12-13
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    Blue -> 4
[safe-coloured-text-gen]    Magenta -> 5
[safe-coloured-text-gen]    Cyan -> 6
[safe-coloured-text-gen] -  White -> 7
[safe-coloured-text-gen] +  White -> 1
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  terminalColourFromIndex :: Word8 -> Maybe TerminalColour
[safe-coloured-text-gen]  terminalColourFromIndex = \case
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:101:22-23
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if True then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:101:22-23
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if False then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Code.hs:101:22-23
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if not (b) then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:101:29-30
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if b then 0 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:101:36-38
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if b then 3 else 0]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:101:36-38
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if b then 3 else 1]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:102:29-30
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if False then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:102:29-30
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if True then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Code.hs:102:29-30
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if not (b) then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:102:36-37
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if b then 0 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:102:36-37
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if b then 1 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:102:43-45
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if b then 9 else 0]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:102:43-45
[safe-coloured-text-gen] @@ -99,7 +99,7 @@
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] -  SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] +  SetStrikethrough b -> [if b then 9 else 1]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:103:40-41
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if True then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:103:47-48
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if b then 0 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Code.hs:103:40-41
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if not (b) then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:101:29-30
[safe-coloured-text-gen] @@ -98,7 +98,7 @@
[safe-coloured-text-gen]  sgrToCSIParams :: SGR -> [Word8]
[safe-coloured-text-gen]  sgrToCSIParams = \case
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen] -  SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen] +  SetItalic b -> [if b then 1 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:103:54-56
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if b then 7 else 1]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:103:54-56
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if b then 7 else 0]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:103:40-41
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if False then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:103:47-48
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]    Reset -> [] -- [0] would be fine too
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen] -  SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] +  SetSwapForegroundBackground b -> [if b then 1 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:104:25-26
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if True then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:104:25-26
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if False then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:104:32-33
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if b then 0 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:104:32-33
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if b then 1 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Code.hs:104:25-26
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if not (b) then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:104:39-41
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if b then 8 else 0]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:104:39-41
[safe-coloured-text-gen] @@ -101,7 +101,7 @@
[safe-coloured-text-gen]    SetItalic b -> [if b then 3 else 23]
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen] -  SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] +  SetConcealed b -> [if b then 8 else 1]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:105:25-26
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if True then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Code.hs:105:25-26
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if False then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Code.hs:105:25-26
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if not (b) then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:105:32-34
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if b then 0 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:105:32-34
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if b then 1 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:105:40-42
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if b then 53 else 1]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:105:40-42
[safe-coloured-text-gen] @@ -102,7 +102,7 @@
[safe-coloured-text-gen]    SetStrikethrough b -> [if b then 9 else 29]
[safe-coloured-text-gen]    SetSwapForegroundBackground b -> [if b then 7 else 27]
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen] -  SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen] +  SetOverlined b -> [if b then 53 else 0]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:108:28-29
[safe-coloured-text-gen] @@ -105,7 +105,7 @@
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] -        SingleUnderline -> 4
[safe-coloured-text-gen] +        SingleUnderline -> 1
[safe-coloured-text-gen]          DoubleUnderline -> 21
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:108:28-29
[safe-coloured-text-gen] @@ -105,7 +105,7 @@
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] -        SingleUnderline -> 4
[safe-coloured-text-gen] +        SingleUnderline -> 0
[safe-coloured-text-gen]          DoubleUnderline -> 21
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:109:28-30
[safe-coloured-text-gen] @@ -106,7 +106,7 @@
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] -        DoubleUnderline -> 21
[safe-coloured-text-gen] +        DoubleUnderline -> 0
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:109:28-30
[safe-coloured-text-gen] @@ -106,7 +106,7 @@
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] -        DoubleUnderline -> 21
[safe-coloured-text-gen] +        DoubleUnderline -> 1
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:110:24-26
[safe-coloured-text-gen] @@ -107,7 +107,7 @@
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen]          DoubleUnderline -> 21
[safe-coloured-text-gen] -        NoUnderline -> 24
[safe-coloured-text-gen] +        NoUnderline -> 1
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:107:7-26
[safe-coloured-text-gen] @@ -104,10 +104,9 @@
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen] -        SingleUnderline -> 4
[safe-coloured-text-gen]          DoubleUnderline -> 21
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:110:24-26
[safe-coloured-text-gen] @@ -107,7 +107,7 @@
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen]          DoubleUnderline -> 21
[safe-coloured-text-gen] -        NoUnderline -> 24
[safe-coloured-text-gen] +        NoUnderline -> 0
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:107:7-26
[safe-coloured-text-gen] @@ -104,10 +104,9 @@
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen] -        DoubleUnderline -> 21
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:107:7-26
[safe-coloured-text-gen] @@ -104,10 +104,9 @@
[safe-coloured-text-gen]    SetConcealed b -> [if b then 8 else 28]
[safe-coloured-text-gen]    SetOverlined b -> [if b then 53 else 55]
[safe-coloured-text-gen]    SetUnderlining u ->
[safe-coloured-text-gen]      [ case u of
[safe-coloured-text-gen]          SingleUnderline -> 4
[safe-coloured-text-gen]          DoubleUnderline -> 21
[safe-coloured-text-gen] -        NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:114:25-26
[safe-coloured-text-gen] @@ -111,7 +111,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] -        SlowBlinking -> 5
[safe-coloured-text-gen] +        SlowBlinking -> 0
[safe-coloured-text-gen]          RapidBlinking -> 6
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:114:25-26
[safe-coloured-text-gen] @@ -111,7 +111,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] -        SlowBlinking -> 5
[safe-coloured-text-gen] +        SlowBlinking -> 1
[safe-coloured-text-gen]          RapidBlinking -> 6
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:115:26-27
[safe-coloured-text-gen] @@ -112,7 +112,7 @@
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen]          SlowBlinking -> 5
[safe-coloured-text-gen] -        RapidBlinking -> 6
[safe-coloured-text-gen] +        RapidBlinking -> 0
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:115:26-27
[safe-coloured-text-gen] @@ -112,7 +112,7 @@
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen]          SlowBlinking -> 5
[safe-coloured-text-gen] -        RapidBlinking -> 6
[safe-coloured-text-gen] +        RapidBlinking -> 1
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:116:23-25
[safe-coloured-text-gen] @@ -113,7 +113,7 @@
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen]          SlowBlinking -> 5
[safe-coloured-text-gen]          RapidBlinking -> 6
[safe-coloured-text-gen] -        NoBlinking -> 25
[safe-coloured-text-gen] +        NoBlinking -> 0
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:116:23-25
[safe-coloured-text-gen] @@ -113,7 +113,7 @@
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen]          SlowBlinking -> 5
[safe-coloured-text-gen]          RapidBlinking -> 6
[safe-coloured-text-gen] -        NoBlinking -> 25
[safe-coloured-text-gen] +        NoBlinking -> 1
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:113:7-25
[safe-coloured-text-gen] @@ -110,10 +110,9 @@
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen] -        SlowBlinking -> 5
[safe-coloured-text-gen]          RapidBlinking -> 6
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:113:7-25
[safe-coloured-text-gen] @@ -110,10 +110,9 @@
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen]          SlowBlinking -> 5
[safe-coloured-text-gen]          RapidBlinking -> 6
[safe-coloured-text-gen] -        NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:113:7-25
[safe-coloured-text-gen] @@ -110,10 +110,9 @@
[safe-coloured-text-gen]          NoUnderline -> 24
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetBlinking b ->
[safe-coloured-text-gen]      [ case b of
[safe-coloured-text-gen]          SlowBlinking -> 5
[safe-coloured-text-gen] -        RapidBlinking -> 6
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:120:26-27
[safe-coloured-text-gen] @@ -117,7 +117,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] -        BoldIntensity -> 1
[safe-coloured-text-gen] +        BoldIntensity -> 0
[safe-coloured-text-gen]          FaintIntensity -> 2
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:121:27-28
[safe-coloured-text-gen] @@ -118,7 +118,7 @@
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen]          BoldIntensity -> 1
[safe-coloured-text-gen] -        FaintIntensity -> 2
[safe-coloured-text-gen] +        FaintIntensity -> 0
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:121:27-28
[safe-coloured-text-gen] @@ -118,7 +118,7 @@
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen]          BoldIntensity -> 1
[safe-coloured-text-gen] -        FaintIntensity -> 2
[safe-coloured-text-gen] +        FaintIntensity -> 1
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:122:28-30
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen]          BoldIntensity -> 1
[safe-coloured-text-gen]          FaintIntensity -> 2
[safe-coloured-text-gen] -        NormalIntensity -> 22
[safe-coloured-text-gen] +        NormalIntensity -> 0
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:122:28-30
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen]          BoldIntensity -> 1
[safe-coloured-text-gen]          FaintIntensity -> 2
[safe-coloured-text-gen] -        NormalIntensity -> 22
[safe-coloured-text-gen] +        NormalIntensity -> 1
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:119:7-30
[safe-coloured-text-gen] @@ -116,10 +116,9 @@
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen] -        BoldIntensity -> 1
[safe-coloured-text-gen]          FaintIntensity -> 2
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:119:7-30
[safe-coloured-text-gen] @@ -116,10 +116,9 @@
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen]          BoldIntensity -> 1
[safe-coloured-text-gen] -        FaintIntensity -> 2
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:119:7-30
[safe-coloured-text-gen] @@ -116,10 +116,9 @@
[safe-coloured-text-gen]          NoBlinking -> 25
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetConsoleIntensity ci ->
[safe-coloured-text-gen]      [ case ci of
[safe-coloured-text-gen]          BoldIntensity -> 1
[safe-coloured-text-gen]          FaintIntensity -> 2
[safe-coloured-text-gen] -        NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:127:25-27
[safe-coloured-text-gen] @@ -124,7 +124,7 @@
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen] -          Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 0 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:127:25-58
[safe-coloured-text-gen] @@ -124,7 +124,7 @@
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen] -          Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 30 - terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:127:25-27
[safe-coloured-text-gen] @@ -124,7 +124,7 @@
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen] -          Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 1 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:127:25-58
[safe-coloured-text-gen] @@ -124,7 +124,7 @@
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen] -          Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 30 * terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:128:25-27
[safe-coloured-text-gen] @@ -125,7 +125,7 @@
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 0 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:128:25-27
[safe-coloured-text-gen] @@ -125,7 +125,7 @@
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 1 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:128:25-58
[safe-coloured-text-gen] @@ -125,7 +125,7 @@
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 40 - terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:128:25-58
[safe-coloured-text-gen] @@ -125,7 +125,7 @@
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 40 * terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:126:17-58
[safe-coloured-text-gen] @@ -123,9 +123,8 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen] -          Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:130:25-27
[safe-coloured-text-gen] @@ -127,7 +127,7 @@
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen] -          Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 0 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:126:17-58
[safe-coloured-text-gen] @@ -123,9 +123,8 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:130:25-27
[safe-coloured-text-gen] @@ -127,7 +127,7 @@
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen] -          Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 1 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:130:25-58
[safe-coloured-text-gen] @@ -127,7 +127,7 @@
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen] -          Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 90 - terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:130:25-58
[safe-coloured-text-gen] @@ -127,7 +127,7 @@
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen] -          Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Foreground -> 90 * terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:131:25-28
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 1 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:131:25-28
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 0 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:131:25-59
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 100 - terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Code.hs:131:25-59
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen] +          Background -> 100 * terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:129:19-59
[safe-coloured-text-gen] @@ -126,9 +126,8 @@
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen] -          Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:129:19-59
[safe-coloured-text-gen] @@ -126,9 +126,8 @@
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:125:7-59
[safe-coloured-text-gen] @@ -122,13 +122,10 @@
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen] -        Dull -> case l of
[safe-coloured-text-gen] -          Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen]          Bright -> case l of
[safe-coloured-text-gen]            Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:125:7-59
[safe-coloured-text-gen] @@ -122,13 +122,10 @@
[safe-coloured-text-gen]          NormalIntensity -> 22
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    SetColour i l c ->
[safe-coloured-text-gen]      [ case i of
[safe-coloured-text-gen]          Dull -> case l of
[safe-coloured-text-gen]            Foreground -> 30 + terminalColourSGRParameter c
[safe-coloured-text-gen]            Background -> 40 + terminalColourSGRParameter c
[safe-coloured-text-gen] -        Bright -> case l of
[safe-coloured-text-gen] -          Foreground -> 90 + terminalColourSGRParameter c
[safe-coloured-text-gen] -          Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:135:23-25
[safe-coloured-text-gen] @@ -132,7 +132,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] +        Foreground -> 0
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:135:23-25
[safe-coloured-text-gen] @@ -132,7 +132,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] +        Foreground -> 1
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:136:23-25
[safe-coloured-text-gen] @@ -133,7 +133,7 @@
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen] +        Background -> 0,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:136:23-25
[safe-coloured-text-gen] @@ -133,7 +133,7 @@
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen] +        Background -> 1,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:134:7-25
[safe-coloured-text-gen] @@ -131,9 +131,8 @@
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:134:7-25
[safe-coloured-text-gen] @@ -131,9 +131,8 @@
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:137:7-8
[safe-coloured-text-gen] @@ -134,7 +134,7 @@
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen] -      5,
[safe-coloured-text-gen] +      0,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:137:7-8
[safe-coloured-text-gen] @@ -134,7 +134,7 @@
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen] -      5,
[safe-coloured-text-gen] +      1,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:134:5-6
[safe-coloured-text-gen] @@ -131,12 +131,7 @@
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen] -    [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen] -      5,
[safe-coloured-text-gen] -      w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:134:5-6
[safe-coloured-text-gen] @@ -131,12 +131,9 @@
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen] -    [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:142:23-25
[safe-coloured-text-gen] @@ -139,7 +139,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] +        Foreground -> 0
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:134:5-6
[safe-coloured-text-gen] @@ -131,12 +131,11 @@
[safe-coloured-text-gen]            Background -> 100 + terminalColourSGRParameter c
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set8BitColour l w ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        5,
[safe-coloured-text-gen] -      w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:142:23-25
[safe-coloured-text-gen] @@ -139,7 +139,7 @@
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] +        Foreground -> 1
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:143:23-25
[safe-coloured-text-gen] @@ -140,7 +140,7 @@
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen] +        Background -> 0,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:143:23-25
[safe-coloured-text-gen] @@ -140,7 +140,7 @@
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen] +        Background -> 1,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:141:7-25
[safe-coloured-text-gen] @@ -138,9 +138,8 @@
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Code.hs:141:7-25
[safe-coloured-text-gen] @@ -138,9 +138,8 @@
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:144:7-8
[safe-coloured-text-gen] @@ -141,7 +141,7 @@
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen] -      2,
[safe-coloured-text-gen] +      1,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen]        b
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Code.hs:144:7-8
[safe-coloured-text-gen] @@ -141,7 +141,7 @@
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen] -      2,
[safe-coloured-text-gen] +      0,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen]        b
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Layout.hs:134:46-52
[safe-coloured-text-gen] @@ -131,5 +131,5 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  backgroundForRow :: Int -> Maybe TableBackground -> Maybe Colour
[safe-coloured-text-gen]  backgroundForRow _ Nothing = Nothing
[safe-coloured-text-gen] -backgroundForRow _ (Just (SingleColour c)) = Just c
[safe-coloured-text-gen] +backgroundForRow _ (Just (SingleColour c)) = Nothing
[safe-coloured-text-gen]  backgroundForRow i (Just (Bicolour ec oc)) = if even i then ec else oc
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:141:5-6
[safe-coloured-text-gen] @@ -138,14 +138,7 @@
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen] -    [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen] -      2,
[safe-coloured-text-gen] -      r,
[safe-coloured-text-gen] -      g,
[safe-coloured-text-gen] -      b
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | ANSI text underlining
[safe-coloured-text-gen]  data Underlining
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Layout.hs:135:49-55
[safe-coloured-text-gen] @@ -132,4 +132,4 @@
[safe-coloured-text-gen]  backgroundForRow :: Int -> Maybe TableBackground -> Maybe Colour
[safe-coloured-text-gen]  backgroundForRow _ Nothing = Nothing
[safe-coloured-text-gen]  backgroundForRow _ (Just (SingleColour c)) = Just c
[safe-coloured-text-gen] -backgroundForRow i (Just (Bicolour ec oc)) = if even i then ec else oc
[safe-coloured-text-gen] +backgroundForRow i (Just (Bicolour ec oc)) = if False then ec else oc
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:141:5-6
[safe-coloured-text-gen] @@ -138,14 +138,11 @@
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen] -    [ case l of
[safe-coloured-text-gen] -        Foreground -> 38
[safe-coloured-text-gen] -        Background -> 48,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen]        b
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | ANSI text underlining
[safe-coloured-text-gen]  data Underlining
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Layout.hs:135:49-55
[safe-coloured-text-gen] @@ -132,4 +132,4 @@
[safe-coloured-text-gen]  backgroundForRow :: Int -> Maybe TableBackground -> Maybe Colour
[safe-coloured-text-gen]  backgroundForRow _ Nothing = Nothing
[safe-coloured-text-gen]  backgroundForRow _ (Just (SingleColour c)) = Just c
[safe-coloured-text-gen] -backgroundForRow i (Just (Bicolour ec oc)) = if even i then ec else oc
[safe-coloured-text-gen] +backgroundForRow i (Just (Bicolour ec oc)) = if not (even i) then ec else oc
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:62:11-12
[safe-coloured-text-gen] @@ -59,11 +59,10 @@
[safe-coloured-text-gen]  renderCSI =
[safe-coloured-text-gen]    let csi ps c =
[safe-coloured-text-gen]          mconcat
[safe-coloured-text-gen]            [ LTB.singleton asciiEscape,
[safe-coloured-text-gen]              LTB.singleton csiStart,
[safe-coloured-text-gen]              renderCSIParams ps,
[safe-coloured-text-gen] -            LTB.singleton c
[safe-coloured-text-gen]            ]
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          SGR sgrs -> csi (concatMap sgrToCSIParams sgrs) 'm'
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Layout.hs:135:49-55
[safe-coloured-text-gen] @@ -132,4 +132,4 @@
[safe-coloured-text-gen]  backgroundForRow :: Int -> Maybe TableBackground -> Maybe Colour
[safe-coloured-text-gen]  backgroundForRow _ Nothing = Nothing
[safe-coloured-text-gen]  backgroundForRow _ (Just (SingleColour c)) = Just c
[safe-coloured-text-gen] -backgroundForRow i (Just (Bicolour ec oc)) = if even i then ec else oc
[safe-coloured-text-gen] +backgroundForRow i (Just (Bicolour ec oc)) = if True then ec else oc
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:141:5-6
[safe-coloured-text-gen] @@ -138,14 +138,13 @@
[safe-coloured-text-gen]        w
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]    Set24BitColour l r g b ->
[safe-coloured-text-gen]      [ case l of
[safe-coloured-text-gen]          Foreground -> 38
[safe-coloured-text-gen]          Background -> 48,
[safe-coloured-text-gen]        2,
[safe-coloured-text-gen]        r,
[safe-coloured-text-gen]        g,
[safe-coloured-text-gen] -      b
[safe-coloured-text-gen]      ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | ANSI text underlining
[safe-coloured-text-gen]  data Underlining
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:62:11-12
[safe-coloured-text-gen] @@ -59,11 +59,7 @@
[safe-coloured-text-gen]  renderCSI =
[safe-coloured-text-gen]    let csi ps c =
[safe-coloured-text-gen]          mconcat
[safe-coloured-text-gen] -          [ LTB.singleton asciiEscape,
[safe-coloured-text-gen] -            LTB.singleton csiStart,
[safe-coloured-text-gen] -            renderCSIParams ps,
[safe-coloured-text-gen] -            LTB.singleton c
[safe-coloured-text-gen]            ]
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          SGR sgrs -> csi (concatMap sgrToCSIParams sgrs) 'm'
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ListLit at src/Text/Colour/Code.hs:62:11-12
[safe-coloured-text-gen] @@ -59,11 +59,10 @@
[safe-coloured-text-gen]  renderCSI =
[safe-coloured-text-gen]    let csi ps c =
[safe-coloured-text-gen]          mconcat
[safe-coloured-text-gen] -          [ LTB.singleton asciiEscape,
[safe-coloured-text-gen]              LTB.singleton csiStart,
[safe-coloured-text-gen]              renderCSIParams ps,
[safe-coloured-text-gen]              LTB.singleton c
[safe-coloured-text-gen]            ]
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          SGR sgrs -> csi (concatMap sgrToCSIParams sgrs) 'm'
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Layout.hs:118:38-55
[safe-coloured-text-gen] @@ -115,7 +115,7 @@
[safe-coloured-text-gen]        maximumLength :: Int
[safe-coloured-text-gen]        maximumLength = maximum $ map fst withLengths
[safe-coloured-text-gen]        pad :: (Int, [a]) -> [a]
[safe-coloured-text-gen] -      pad (l, cs) = cs ++ replicate (maximumLength - l) d
[safe-coloured-text-gen] +      pad (l, cs) = cs ++ replicate (maximumLength * l) d
[safe-coloured-text-gen]     in map pad withLengths
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  cellWidth :: [Chunk] -> Int
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Layout.hs:118:38-55
[safe-coloured-text-gen] @@ -115,7 +115,7 @@
[safe-coloured-text-gen]        maximumLength :: Int
[safe-coloured-text-gen]        maximumLength = maximum $ map fst withLengths
[safe-coloured-text-gen]        pad :: (Int, [a]) -> [a]
[safe-coloured-text-gen] -      pad (l, cs) = cs ++ replicate (maximumLength - l) d
[safe-coloured-text-gen] +      pad (l, cs) = cs ++ replicate (maximumLength + l) d
[safe-coloured-text-gen]     in map pad withLengths
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  cellWidth :: [Chunk] -> Int
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Layout.hs:79:65-78
[safe-coloured-text-gen] @@ -76,7 +76,7 @@
[safe-coloured-text-gen]        maxLengthOfColum :: [(Int, [Chunk])] -> Int
[safe-coloured-text-gen]        maxLengthOfColum = maximum . map fst
[safe-coloured-text-gen]        padColumn :: Int -> [(Int, [Chunk])] -> [[Chunk]]
[safe-coloured-text-gen] -      padColumn maxLength = map (\(l, c) -> c ++ [paddingChunk (maxLength - l) ' '])
[safe-coloured-text-gen] +      padColumn maxLength = map (\(l, c) -> c ++ [paddingChunk (maxLength + l) ' '])
[safe-coloured-text-gen]        padEntireColumn :: [(Int, [Chunk])] -> [[Chunk]]
[safe-coloured-text-gen]        padEntireColumn col =
[safe-coloured-text-gen]          let maxLength = maxLengthOfColum col
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Layout.hs:79:65-78
[safe-coloured-text-gen] @@ -76,7 +76,7 @@
[safe-coloured-text-gen]        maxLengthOfColum :: [(Int, [Chunk])] -> Int
[safe-coloured-text-gen]        maxLengthOfColum = maximum . map fst
[safe-coloured-text-gen]        padColumn :: Int -> [(Int, [Chunk])] -> [[Chunk]]
[safe-coloured-text-gen] -      padColumn maxLength = map (\(l, c) -> c ++ [paddingChunk (maxLength - l) ' '])
[safe-coloured-text-gen] +      padColumn maxLength = map (\(l, c) -> c ++ [paddingChunk (maxLength * l) ' '])
[safe-coloured-text-gen]        padEntireColumn :: [(Int, [Chunk])] -> [[Chunk]]
[safe-coloured-text-gen]        padEntireColumn col =
[safe-coloured-text-gen]          let maxLength = maxLengthOfColum col
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:204:10-11
[safe-coloured-text-gen] @@ -201,7 +201,7 @@
[safe-coloured-text-gen]  goSGR :: ChunkStyle -> [Word8] -> ChunkStyle
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen] -  | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] +  | p == 1 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:204:5-11
[safe-coloured-text-gen] @@ -201,7 +201,7 @@
[safe-coloured-text-gen]  goSGR :: ChunkStyle -> [Word8] -> ChunkStyle
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen] -  | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] +  | True = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:204:5-11
[safe-coloured-text-gen] @@ -201,7 +201,7 @@
[safe-coloured-text-gen]  goSGR :: ChunkStyle -> [Word8] -> ChunkStyle
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen] -  | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] +  | not (p == 0) = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:205:10-11
[safe-coloured-text-gen] @@ -202,7 +202,7 @@
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] -  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:205:5-11
[safe-coloured-text-gen] @@ -202,7 +202,7 @@
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] -  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:205:5-11
[safe-coloured-text-gen] @@ -202,7 +202,7 @@
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] -  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] +  | not (p == 1) = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:205:53-71
[safe-coloured-text-gen] @@ -202,7 +202,7 @@
[safe-coloured-text-gen]  goSGR s [] = s
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen] -  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Nothing}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:206:10-11
[safe-coloured-text-gen] @@ -203,7 +203,7 @@
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] -  | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:206:10-11
[safe-coloured-text-gen] @@ -203,7 +203,7 @@
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] -  | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:206:5-11
[safe-coloured-text-gen] @@ -203,7 +203,7 @@
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] -  | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:207:10-11
[safe-coloured-text-gen] @@ -204,7 +204,7 @@
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] -  | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:206:5-11
[safe-coloured-text-gen] @@ -203,7 +203,7 @@
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] -  | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] +  | not (p == 2) = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:206:53-72
[safe-coloured-text-gen] @@ -203,7 +203,7 @@
[safe-coloured-text-gen]  goSGR s (p : ps)
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen] -  | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] +  | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Nothing}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:207:10-11
[safe-coloured-text-gen] @@ -204,7 +204,7 @@
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] -  | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:207:5-11
[safe-coloured-text-gen] @@ -204,7 +204,7 @@
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] -  | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:207:5-11
[safe-coloured-text-gen] @@ -204,7 +204,7 @@
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] -  | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] +  | not (p == 3) = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:207:48-52
[safe-coloured-text-gen] @@ -204,7 +204,7 @@
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] -  | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] +  | p == 3 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:207:43-52
[safe-coloured-text-gen] @@ -204,7 +204,7 @@
[safe-coloured-text-gen]    | p == 0 = goSGR noStyle ps
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen] -  | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] +  | p == 3 = goSGR (s {chunkStyleItalic = Nothing}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:208:10-11
[safe-coloured-text-gen] @@ -205,7 +205,7 @@
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] -  | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:208:10-11
[safe-coloured-text-gen] @@ -205,7 +205,7 @@
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] -  | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:208:5-11
[safe-coloured-text-gen] @@ -205,7 +205,7 @@
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] -  | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:208:5-11
[safe-coloured-text-gen] @@ -205,7 +205,7 @@
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] -  | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] +  | not (p == 4) = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:208:48-68
[safe-coloured-text-gen] @@ -205,7 +205,7 @@
[safe-coloured-text-gen]    | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just BoldIntensity}) ps
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen] -  | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] +  | p == 4 = goSGR (s {chunkStyleUnderlining = Nothing}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:209:10-11
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] -  | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:209:10-11
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] -  | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:209:5-11
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] -  | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:209:5-11
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] -  | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] +  | not (p == 5) = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:209:45-62
[safe-coloured-text-gen] @@ -206,7 +206,7 @@
[safe-coloured-text-gen]    | p == 2 = goSGR (s {chunkStyleConsoleIntensity = Just FaintIntensity}) ps
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen] -  | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] +  | p == 5 = goSGR (s {chunkStyleBlinking = Nothing}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:210:10-11
[safe-coloured-text-gen] @@ -207,7 +207,7 @@
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] -  | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:210:10-11
[safe-coloured-text-gen] @@ -207,7 +207,7 @@
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] -  | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:210:5-11
[safe-coloured-text-gen] @@ -207,7 +207,7 @@
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] -  | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:210:5-11
[safe-coloured-text-gen] @@ -207,7 +207,7 @@
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] -  | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] +  | not (p == 6) = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:211:10-11
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] -  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:210:45-63
[safe-coloured-text-gen] @@ -207,7 +207,7 @@
[safe-coloured-text-gen]    | p == 3 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen] -  | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] +  | p == 6 = goSGR (s {chunkStyleBlinking = Nothing}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:211:5-11
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] -  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:211:10-11
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] -  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:211:5-11
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] -  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] +  | not (p == 7) = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:211:66-70
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] -  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] +  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:211:61-70
[safe-coloured-text-gen] @@ -208,7 +208,7 @@
[safe-coloured-text-gen]    | p == 4 = goSGR (s {chunkStyleUnderlining = Just SingleUnderline}) ps
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen] -  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] +  | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:212:10-11
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] -  | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:212:10-11
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] -  | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:212:5-11
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] -  | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:212:5-11
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] -  | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] +  | not (p == 8) = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:212:51-55
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] -  | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] +  | p == 8 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:212:46-55
[safe-coloured-text-gen] @@ -209,7 +209,7 @@
[safe-coloured-text-gen]    | p == 5 = goSGR (s {chunkStyleBlinking = Just SlowBlinking}) ps
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen] -  | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] +  | p == 8 = goSGR (s {chunkStyleConcealed = Nothing}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:213:10-11
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] -  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:213:10-11
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] -  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:213:5-11
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] -  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:213:5-11
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] -  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] +  | not (p == 9) = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:213:50-59
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] -  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] +  | p == 9 = goSGR (s {chunkStyleStrikethrough = Nothing}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:213:55-59
[safe-coloured-text-gen] @@ -210,7 +210,7 @@
[safe-coloured-text-gen]    | p == 6 = goSGR (s {chunkStyleBlinking = Just RapidBlinking}) ps
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen] -  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] +  | p == 9 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:214:10-12
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] -  | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:214:10-12
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] -  | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:214:5-12
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] -  | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] +  | not (p == 21) = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:214:49-69
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] -  | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] +  | p == 21 = goSGR (s {chunkStyleUnderlining = Nothing}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:214:5-12
[safe-coloured-text-gen] @@ -211,7 +211,7 @@
[safe-coloured-text-gen]    | p == 7 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen] -  | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:215:10-12
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] -  | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:215:10-12
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] -  | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:215:5-12
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] -  | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:215:5-12
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] -  | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] +  | not (p == 22) = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:215:54-74
[safe-coloured-text-gen] @@ -212,7 +212,7 @@
[safe-coloured-text-gen]    | p == 8 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen] -  | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] +  | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Nothing}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:216:10-12
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] -  | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:216:10-12
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] -  | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:216:5-12
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] -  | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:216:5-12
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] -  | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] +  | not (p == 23) = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:216:49-54
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] -  | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] +  | p == 23 = goSGR (s {chunkStyleItalic = Just True}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:216:44-54
[safe-coloured-text-gen] @@ -213,7 +213,7 @@
[safe-coloured-text-gen]    | p == 9 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen] -  | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] +  | p == 23 = goSGR (s {chunkStyleItalic = Nothing}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:217:10-12
[safe-coloured-text-gen] @@ -214,7 +214,7 @@
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] -  | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:217:5-12
[safe-coloured-text-gen] @@ -214,7 +214,7 @@
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] -  | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:217:5-12
[safe-coloured-text-gen] @@ -214,7 +214,7 @@
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] -  | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] +  | not (p == 24) = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:217:49-65
[safe-coloured-text-gen] @@ -214,7 +214,7 @@
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] -  | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] +  | p == 24 = goSGR (s {chunkStyleUnderlining = Nothing}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:218:10-12
[safe-coloured-text-gen] @@ -215,7 +215,7 @@
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] -  | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:218:10-12
[safe-coloured-text-gen] @@ -215,7 +215,7 @@
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] -  | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:217:10-12
[safe-coloured-text-gen] @@ -214,7 +214,7 @@
[safe-coloured-text-gen]    | p == 21 = goSGR (s {chunkStyleUnderlining = Just DoubleUnderline}) ps
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen] -  | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:218:5-12
[safe-coloured-text-gen] @@ -215,7 +215,7 @@
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] -  | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] +  | not (p == 25) = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:218:5-12
[safe-coloured-text-gen] @@ -215,7 +215,7 @@
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] -  | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:219:10-12
[safe-coloured-text-gen] @@ -216,7 +216,7 @@
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] -  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:218:46-61
[safe-coloured-text-gen] @@ -215,7 +215,7 @@
[safe-coloured-text-gen]    | p == 22 = goSGR (s {chunkStyleConsoleIntensity = Just NormalIntensity}) ps
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen] -  | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] +  | p == 25 = goSGR (s {chunkStyleBlinking = Nothing}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:219:10-12
[safe-coloured-text-gen] @@ -216,7 +216,7 @@
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] -  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:219:5-12
[safe-coloured-text-gen] @@ -216,7 +216,7 @@
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] -  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:219:5-12
[safe-coloured-text-gen] @@ -216,7 +216,7 @@
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] -  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] +  | not (p == 27) = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:219:67-72
[safe-coloured-text-gen] @@ -216,7 +216,7 @@
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] -  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] +  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just True}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:219:62-72
[safe-coloured-text-gen] @@ -216,7 +216,7 @@
[safe-coloured-text-gen]    | p == 23 = goSGR (s {chunkStyleItalic = Just False}) ps
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen] -  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] +  | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:220:10-12
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] -  | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:220:10-12
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] -  | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:220:5-12
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] -  | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:220:5-12
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] -  | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] +  | not (p == 28) = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:220:52-57
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] -  | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] +  | p == 28 = goSGR (s {chunkStyleConcealed = Just True}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:220:47-57
[safe-coloured-text-gen] @@ -217,7 +217,7 @@
[safe-coloured-text-gen]    | p == 24 = goSGR (s {chunkStyleUnderlining = Just NoUnderline}) ps
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen] -  | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] +  | p == 28 = goSGR (s {chunkStyleConcealed = Nothing}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:221:10-12
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] -  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:221:10-12
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] -  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:221:5-12
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] -  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:221:56-61
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] -  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] +  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just True}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:221:5-12
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] -  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] +  | not (p == 29) = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:221:51-61
[safe-coloured-text-gen] @@ -218,7 +218,7 @@
[safe-coloured-text-gen]    | p == 25 = goSGR (s {chunkStyleBlinking = Just NoBlinking}) ps
[safe-coloured-text-gen]    | p == 27 = goSGR (s {chunkStyleSwapForegroundBackground = Just False}) ps
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen] -  | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen] +  | p == 29 = goSGR (s {chunkStyleStrikethrough = Nothing}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:223:10-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:223:10-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:223:5-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p < 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:223:5-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p <= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:223:5-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p > 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:223:5-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | True && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:223:5-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | not (p >= 30) && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:223:21-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && p <= 0 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:223:21-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && p <= 1 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:223:16-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && p < 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:223:16-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && p > 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:223:16-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && p >= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:223:16-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:223:5-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:223:16-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 && not (p <= 37) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:223:5-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 30 || p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:224:41-43
[safe-coloured-text-gen] @@ -221,7 +221,7 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 0) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:223:5-23
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | not (p >= 30 && p <= 37) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:224:41-43
[safe-coloured-text-gen] @@ -221,7 +221,7 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 1) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:224:37-43
[safe-coloured-text-gen] @@ -221,7 +221,7 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p + 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:224:37-43
[safe-coloured-text-gen] @@ -221,7 +221,7 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p * 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:225:53-75
[safe-coloured-text-gen] @@ -222,7 +222,7 @@
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen] +        Just tc -> goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:224:7-30
[safe-coloured-text-gen] @@ -221,9 +221,8 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:224:7-30
[safe-coloured-text-gen] @@ -221,9 +221,8 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:228:10-12
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] -  | p == 38 = case ps of
[safe-coloured-text-gen] +  | p == 0 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:228:10-12
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] -  | p == 38 = case ps of
[safe-coloured-text-gen] +  | p == 1 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:228:5-12
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] -  | p == 38 = case ps of
[safe-coloured-text-gen] +  | True = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:228:5-12
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen] -  | p == 38 = case ps of
[safe-coloured-text-gen] +  | not (p == 38) = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:229:56-75
[safe-coloured-text-gen] @@ -226,7 +226,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen] -      5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] +      5 : n : rest -> goSGR (s {chunkStyleForeground = Nothing}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:230:64-88
[safe-coloured-text-gen] @@ -227,7 +227,7 @@
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] -      2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen] +      2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Nothing}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:228:15-22
[safe-coloured-text-gen] @@ -225,10 +225,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] -      2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:228:15-22
[safe-coloured-text-gen] @@ -225,10 +225,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen] -      _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:228:15-22
[safe-coloured-text-gen] @@ -225,10 +225,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen] -      5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:233:10-12
[safe-coloured-text-gen] @@ -230,7 +230,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] -  | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:233:10-12
[safe-coloured-text-gen] @@ -230,7 +230,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] -  | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:233:5-12
[safe-coloured-text-gen] @@ -230,7 +230,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] -  | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:233:5-12
[safe-coloured-text-gen] @@ -230,7 +230,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] -  | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] +  | not (p == 39) = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:235:10-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:235:10-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:235:5-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p < 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:235:5-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p <= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:235:5-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p > 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:235:5-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | True && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:235:5-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | not (p >= 40) && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:235:21-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && p <= 0 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:235:21-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && p <= 1 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:235:16-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && p < 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:235:16-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && p > 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:235:16-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && p >= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:235:16-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:235:16-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 && not (p <= 47) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:235:5-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:235:5-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 40 || p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:235:5-23
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | not (p >= 40 && p <= 47) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:236:41-43
[safe-coloured-text-gen] @@ -233,7 +233,7 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 0) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:236:41-43
[safe-coloured-text-gen] @@ -233,7 +233,7 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 1) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:236:37-43
[safe-coloured-text-gen] @@ -233,7 +233,7 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p + 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:236:37-43
[safe-coloured-text-gen] @@ -233,7 +233,7 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p * 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:237:53-75
[safe-coloured-text-gen] @@ -234,7 +234,7 @@
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen] +        Just tc -> goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:236:7-30
[safe-coloured-text-gen] @@ -233,9 +233,8 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:236:7-30
[safe-coloured-text-gen] @@ -233,9 +233,8 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:240:10-12
[safe-coloured-text-gen] @@ -237,7 +237,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] -  | p == 48 = case ps of
[safe-coloured-text-gen] +  | p == 0 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:240:10-12
[safe-coloured-text-gen] @@ -237,7 +237,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] -  | p == 48 = case ps of
[safe-coloured-text-gen] +  | p == 1 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:240:5-12
[safe-coloured-text-gen] @@ -237,7 +237,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] -  | p == 48 = case ps of
[safe-coloured-text-gen] +  | True = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:240:5-12
[safe-coloured-text-gen] @@ -237,7 +237,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen] -  | p == 48 = case ps of
[safe-coloured-text-gen] +  | not (p == 48) = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:241:56-75
[safe-coloured-text-gen] @@ -238,7 +238,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen] -      5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] +      5 : n : rest -> goSGR (s {chunkStyleBackground = Nothing}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:242:64-88
[safe-coloured-text-gen] @@ -239,7 +239,7 @@
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] -      2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen] +      2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Nothing}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:240:15-22
[safe-coloured-text-gen] @@ -237,10 +237,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen] -      5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:240:15-22
[safe-coloured-text-gen] @@ -237,10 +237,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] -      2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:240:15-22
[safe-coloured-text-gen] @@ -237,10 +237,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen] -      _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:245:10-12
[safe-coloured-text-gen] @@ -242,7 +242,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] -  | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:245:10-12
[safe-coloured-text-gen] @@ -242,7 +242,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] -  | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:245:5-12
[safe-coloured-text-gen] @@ -242,7 +242,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] -  | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:245:5-12
[safe-coloured-text-gen] @@ -242,7 +242,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] -  | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] +  | not (p == 49) = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:246:10-12
[safe-coloured-text-gen] @@ -243,7 +243,7 @@
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] -  | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:246:10-12
[safe-coloured-text-gen] @@ -243,7 +243,7 @@
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] -  | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:246:5-12
[safe-coloured-text-gen] @@ -243,7 +243,7 @@
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] -  | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:246:5-12
[safe-coloured-text-gen] @@ -243,7 +243,7 @@
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] -  | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] +  | not (p == 53) = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:246:52-56
[safe-coloured-text-gen] @@ -243,7 +243,7 @@
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] -  | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] +  | p == 53 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:246:47-56
[safe-coloured-text-gen] @@ -243,7 +243,7 @@
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] -  | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] +  | p == 53 = goSGR (s {chunkStyleOverlined = Nothing}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:247:10-12
[safe-coloured-text-gen] @@ -244,7 +244,7 @@
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] -  | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:247:10-12
[safe-coloured-text-gen] @@ -244,7 +244,7 @@
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] -  | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:247:5-12
[safe-coloured-text-gen] @@ -244,7 +244,7 @@
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] -  | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen] +  | True = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:247:5-12
[safe-coloured-text-gen] @@ -244,7 +244,7 @@
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] -  | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen] +  | not (p == 55) = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:247:52-57
[safe-coloured-text-gen] @@ -244,7 +244,7 @@
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] -  | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen] +  | p == 55 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:247:47-57
[safe-coloured-text-gen] @@ -244,7 +244,7 @@
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] -  | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen] +  | p == 55 = goSGR (s {chunkStyleOverlined = Nothing}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:249:10-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:249:10-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:249:5-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p < 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:249:5-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p <= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:249:5-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p > 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:249:5-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | True && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:249:21-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && p <= 0 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:249:5-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | not (p >= 90) && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:249:21-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && p <= 1 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:249:16-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && p < 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:249:16-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && p > 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:249:16-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && p >= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:249:16-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:249:16-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 && not (p <= 97) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:249:5-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:249:5-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 90 || p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:249:5-23
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | not (p >= 90 && p <= 97) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:250:41-43
[safe-coloured-text-gen] @@ -247,7 +247,7 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 0) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:250:41-43
[safe-coloured-text-gen] @@ -247,7 +247,7 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 1) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:251:53-77
[safe-coloured-text-gen] @@ -248,7 +248,7 @@
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen] +        Just tc -> goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:250:37-43
[safe-coloured-text-gen] @@ -247,7 +247,7 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p * 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:250:37-43
[safe-coloured-text-gen] @@ -247,7 +247,7 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p + 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:250:7-30
[safe-coloured-text-gen] @@ -247,9 +247,8 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:254:10-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:250:7-30
[safe-coloured-text-gen] @@ -247,9 +247,8 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:254:10-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:254:5-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p < 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:254:5-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p <= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:254:5-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p > 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:254:5-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | True && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:254:22-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && p <= 0 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:254:22-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && p <= 1 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:254:5-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | not (p >= 100) && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:254:17-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && p < 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:254:17-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && p > 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:254:17-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && p >= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:254:17-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:254:17-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && not (p <= 107) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:254:5-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:254:5-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 || p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:255:41-44
[safe-coloured-text-gen] @@ -252,7 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 0) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:254:5-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | not (p >= 100 && p <= 107) =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Chunk/Parsing.hs:255:41-44
[safe-coloured-text-gen] @@ -252,7 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p - 1) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:255:37-44
[safe-coloured-text-gen] @@ -252,7 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p + 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen] Testing mutation Arith at src/Text/Colour/Chunk/Parsing.hs:255:37-44
[safe-coloured-text-gen] @@ -252,7 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen] -      case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] +      case terminalColourFromIndex (p * 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen] Testing mutation MaybeOp at src/Text/Colour/Chunk/Parsing.hs:256:53-77
[safe-coloured-text-gen] @@ -253,7 +253,7 @@
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen] +        Just tc -> goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen]    | otherwise = goSGR s ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:255:7-30
[safe-coloured-text-gen] @@ -252,8 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] -        Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen]    | otherwise = goSGR s ps
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:255:7-30
[safe-coloured-text-gen] @@ -252,8 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen]    | otherwise = goSGR s ps
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:168:11-22
[safe-coloured-text-gen] @@ -165,7 +165,7 @@
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen]        PlainText t
[safe-coloured-text-gen] -        | Text.null t -> go s rest
[safe-coloured-text-gen] +        | True -> go s rest
[safe-coloured-text-gen]          | otherwise ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:168:11-22
[safe-coloured-text-gen] @@ -165,7 +165,7 @@
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen]        PlainText t
[safe-coloured-text-gen] -        | Text.null t -> go s rest
[safe-coloured-text-gen] +        | not (Text.null t) -> go s rest
[safe-coloured-text-gen]          | otherwise ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:175:9-25
[safe-coloured-text-gen] @@ -172,11 +172,8 @@
[safe-coloured-text-gen]        SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen]        OtherCsiSequence -> go s rest
[safe-coloured-text-gen]        CarriageReturn ->
[safe-coloured-text-gen]          case rest of
[safe-coloured-text-gen] -          (PlainText _ : _) ->
[safe-coloured-text-gen] -            let (finalS, restChunks) = go s rest
[safe-coloured-text-gen] -             in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen]            _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:166:27-25
[safe-coloured-text-gen] @@ -163,20 +163,15 @@
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: ChunkStyle -> [AnsiToken] -> (ChunkStyle, [Chunk])
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen] -      PlainText t
[safe-coloured-text-gen] -        | Text.null t -> go s rest
[safe-coloured-text-gen] -        | otherwise ->
[safe-coloured-text-gen] -            let (finalS, restChunks) = go s rest
[safe-coloured-text-gen] -             in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen]        SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen]        OtherCsiSequence -> go s rest
[safe-coloured-text-gen]        CarriageReturn ->
[safe-coloured-text-gen]          case rest of
[safe-coloured-text-gen]            (PlainText _ : _) ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen]            _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:175:9-25
[safe-coloured-text-gen] @@ -172,11 +172,10 @@
[safe-coloured-text-gen]        SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen]        OtherCsiSequence -> go s rest
[safe-coloured-text-gen]        CarriageReturn ->
[safe-coloured-text-gen]          case rest of
[safe-coloured-text-gen]            (PlainText _ : _) ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen] -          _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:166:27-25
[safe-coloured-text-gen] @@ -163,20 +163,19 @@
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: ChunkStyle -> [AnsiToken] -> (ChunkStyle, [Chunk])
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen]        PlainText t
[safe-coloured-text-gen]          | Text.null t -> go s rest
[safe-coloured-text-gen]          | otherwise ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen] -      SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen]        OtherCsiSequence -> go s rest
[safe-coloured-text-gen]        CarriageReturn ->
[safe-coloured-text-gen]          case rest of
[safe-coloured-text-gen]            (PlainText _ : _) ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen]            _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:166:27-25
[safe-coloured-text-gen] @@ -163,20 +163,19 @@
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: ChunkStyle -> [AnsiToken] -> (ChunkStyle, [Chunk])
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen]        PlainText t
[safe-coloured-text-gen]          | Text.null t -> go s rest
[safe-coloured-text-gen]          | otherwise ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen]        SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen] -      OtherCsiSequence -> go s rest
[safe-coloured-text-gen]        CarriageReturn ->
[safe-coloured-text-gen]          case rest of
[safe-coloured-text-gen]            (PlainText _ : _) ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen]            _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:166:27-25
[safe-coloured-text-gen] @@ -163,20 +163,14 @@
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: ChunkStyle -> [AnsiToken] -> (ChunkStyle, [Chunk])
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen]        PlainText t
[safe-coloured-text-gen]          | Text.null t -> go s rest
[safe-coloured-text-gen]          | otherwise ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen]        SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen]        OtherCsiSequence -> go s rest
[safe-coloured-text-gen] -      CarriageReturn ->
[safe-coloured-text-gen] -        case rest of
[safe-coloured-text-gen] -          (PlainText _ : _) ->
[safe-coloured-text-gen] -            let (finalS, restChunks) = go s rest
[safe-coloured-text-gen] -             in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen] -          _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:130:38-43
[safe-coloured-text-gen] @@ -127,7 +127,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiParamsP :: Parser ([Word8], Bool)
[safe-coloured-text-gen]  csiParamsP = do
[safe-coloured-text-gen] -  (revAcc, hasIntermediate) <- go [] False
[safe-coloured-text-gen] +  (revAcc, hasIntermediate) <- go [] True
[safe-coloured-text-gen]    pure (reverse revAcc, hasIntermediate)
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:131:25-40
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]  csiParamsP :: Parser ([Word8], Bool)
[safe-coloured-text-gen]  csiParamsP = do
[safe-coloured-text-gen]    (revAcc, hasIntermediate) <- go [] False
[safe-coloured-text-gen] -  pure (reverse revAcc, hasIntermediate)
[safe-coloured-text-gen] +  pure (reverse revAcc, True)
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen]      go acc hasIntermediate = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:131:25-40
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]  csiParamsP :: Parser ([Word8], Bool)
[safe-coloured-text-gen]  csiParamsP = do
[safe-coloured-text-gen]    (revAcc, hasIntermediate) <- go [] False
[safe-coloured-text-gen] -  pure (reverse revAcc, hasIntermediate)
[safe-coloured-text-gen] +  pure (reverse revAcc, False)
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen]      go acc hasIntermediate = do
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:131:25-40
[safe-coloured-text-gen] @@ -128,7 +128,7 @@
[safe-coloured-text-gen]  csiParamsP :: Parser ([Word8], Bool)
[safe-coloured-text-gen]  csiParamsP = do
[safe-coloured-text-gen]    (revAcc, hasIntermediate) <- go [] False
[safe-coloured-text-gen] -  pure (reverse revAcc, hasIntermediate)
[safe-coloured-text-gen] +  pure (reverse revAcc, not (hasIntermediate))
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen]      go acc hasIntermediate = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:136:10-19
[safe-coloured-text-gen] @@ -133,7 +133,7 @@
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen]      go acc hasIntermediate = do
[safe-coloured-text-gen]        c <- peekChar'
[safe-coloured-text-gen] -      if isDigit c
[safe-coloured-text-gen] +      if False
[safe-coloured-text-gen]          then do
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:136:10-19
[safe-coloured-text-gen] @@ -133,7 +133,7 @@
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen]      go acc hasIntermediate = do
[safe-coloured-text-gen]        c <- peekChar'
[safe-coloured-text-gen] -      if isDigit c
[safe-coloured-text-gen] +      if True
[safe-coloured-text-gen]          then do
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:136:10-19
[safe-coloured-text-gen] @@ -133,7 +133,7 @@
[safe-coloured-text-gen]      go :: [Word8] -> Bool -> Parser ([Word8], Bool)
[safe-coloured-text-gen]      go acc hasIntermediate = do
[safe-coloured-text-gen]        c <- peekChar'
[safe-coloured-text-gen] -      if isDigit c
[safe-coloured-text-gen] +      if not (isDigit c)
[safe-coloured-text-gen]          then do
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:141:17-35
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | n < (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:141:17-35
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | n > (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:141:17-35
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | n >= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:141:17-35
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | True -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:141:17-35
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | not (n <= (255 :: Word)) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:141:65-80
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | n <= (255 :: Word) -> go (fromIntegral n : acc) True
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:141:65-80
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | n <= (255 :: Word) -> go (fromIntegral n : acc) False
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:141:65-80
[safe-coloured-text-gen] @@ -138,7 +138,7 @@
[safe-coloured-text-gen]            digits <- takeWhile1 isDigit
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen] -              | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] +              | n <= (255 :: Word) -> go (fromIntegral n : acc) not (hasIntermediate)
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:142:25-40
[safe-coloured-text-gen] @@ -139,7 +139,7 @@
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] -            _ -> go acc hasIntermediate
[safe-coloured-text-gen] +            _ -> go acc True
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:142:25-40
[safe-coloured-text-gen] @@ -139,7 +139,7 @@
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] -            _ -> go acc hasIntermediate
[safe-coloured-text-gen] +            _ -> go acc False
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:142:25-40
[safe-coloured-text-gen] @@ -139,7 +139,7 @@
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] -            _ -> go acc hasIntermediate
[safe-coloured-text-gen] +            _ -> go acc not (hasIntermediate)
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:144:14-22
[safe-coloured-text-gen] @@ -141,7 +141,7 @@
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen] -          if c == ';'
[safe-coloured-text-gen] +          if True
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:144:14-22
[safe-coloured-text-gen] @@ -141,7 +141,7 @@
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen] -          if c == ';'
[safe-coloured-text-gen] +          if False
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:144:14-22
[safe-coloured-text-gen] @@ -141,7 +141,7 @@
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen] -          if c == ';'
[safe-coloured-text-gen] +          if not (c == ';')
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:145:36-51
[safe-coloured-text-gen] @@ -142,7 +142,7 @@
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] -            then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] +            then anyChar >> go acc True
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:145:36-51
[safe-coloured-text-gen] @@ -142,7 +142,7 @@
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] -            then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] +            then anyChar >> go acc False
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:145:36-51
[safe-coloured-text-gen] @@ -142,7 +142,7 @@
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] -            then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] +            then anyChar >> go acc not (hasIntermediate)
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] Testing mutation RemoveAction at src/Text/Colour/Chunk/Parsing.hs:145:18-51
[safe-coloured-text-gen] @@ -142,7 +142,6 @@
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] -            then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c < '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c <= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c > '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if True && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if False && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if not (c >= '\x20') && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && c < '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && c > '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && c >= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && False
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && True
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && not (c <= '\x2F')
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:18-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if True
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:18-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if False
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:147:18-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' || c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:147:18-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if not (c >= '\x20' && c <= '\x2F')
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:148:40-44
[safe-coloured-text-gen] @@ -145,7 +145,7 @@
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] -                then anyChar >> go acc True
[safe-coloured-text-gen] +                then anyChar >> go acc False
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Convert a stream of 'AnsiToken's into styled 'Chunk's.
[safe-coloured-text-gen] Testing mutation RemoveAction at src/Text/Colour/Chunk/Parsing.hs:148:22-44
[safe-coloured-text-gen] @@ -145,7 +145,6 @@
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] -                then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Convert a stream of 'AnsiToken's into styled 'Chunk's.
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:149:33-48
[safe-coloured-text-gen] @@ -146,7 +146,7 @@
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] -                else pure (acc, hasIntermediate)
[safe-coloured-text-gen] +                else pure (acc, True)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Convert a stream of 'AnsiToken's into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:149:33-48
[safe-coloured-text-gen] @@ -146,7 +146,7 @@
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] -                else pure (acc, hasIntermediate)
[safe-coloured-text-gen] +                else pure (acc, False)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Convert a stream of 'AnsiToken's into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:149:33-48
[safe-coloured-text-gen] @@ -146,7 +146,7 @@
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] -                else pure (acc, hasIntermediate)
[safe-coloured-text-gen] +                else pure (acc, not (hasIntermediate))
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Convert a stream of 'AnsiToken's into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c <= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c < '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> True && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> False && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c > '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> not (c >= '\x40') && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && c < '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && c > '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && c >= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && True)
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && False)
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && not (c <= '\x7E'))
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:31-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> True)
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:31-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> False)
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:122:31-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> not (c >= '\x40' && c <= '\x7E'))
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:122:31-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' || c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:8-24
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if True && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:8-24
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if False && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:124:8-24
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if not (finalByte == 'm') && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:32-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' && not True
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:32-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' && not False
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:124:32-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' && not not (hasIntermediateBytes)
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:28-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' && False
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:28-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' && True
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:8-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if True
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:124:28-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' && not (not hasIntermediateBytes)
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:124:8-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if False
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:124:8-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if finalByte == 'm' || not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:124:8-52
[safe-coloured-text-gen] @@ -121,7 +121,7 @@
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen]    finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen] -    if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen] +    if not (finalByte == 'm' && not hasIntermediateBytes)
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen]        else OtherCsiSequence
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:114:33-37
[safe-coloured-text-gen] @@ -111,7 +111,7 @@
[safe-coloured-text-gen]  incompleteEscapeP :: Parser AnsiToken
[safe-coloured-text-gen]  incompleteEscapeP = do
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen] -  mBracket <- (char '[' >> pure True) <|> pure False
[safe-coloured-text-gen] +  mBracket <- (char '[' >> pure False) <|> pure False
[safe-coloured-text-gen]    pure $ PlainText $ if mBracket then "\ESC[" else "\ESC"
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiSequenceP :: Parser AnsiToken
[safe-coloured-text-gen] Testing mutation BoolLit at src/Text/Colour/Chunk/Parsing.hs:114:48-53
[safe-coloured-text-gen] @@ -111,7 +111,7 @@
[safe-coloured-text-gen]  incompleteEscapeP :: Parser AnsiToken
[safe-coloured-text-gen]  incompleteEscapeP = do
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen] -  mBracket <- (char '[' >> pure True) <|> pure False
[safe-coloured-text-gen] +  mBracket <- (char '[' >> pure True) <|> pure True
[safe-coloured-text-gen]    pure $ PlainText $ if mBracket then "\ESC[" else "\ESC"
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiSequenceP :: Parser AnsiToken
[safe-coloured-text-gen] Testing mutation RemoveAction at src/Text/Colour/Chunk/Parsing.hs:114:16-37
[safe-coloured-text-gen] @@ -111,7 +111,6 @@
[safe-coloured-text-gen]  incompleteEscapeP :: Parser AnsiToken
[safe-coloured-text-gen]  incompleteEscapeP = do
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen] -  mBracket <- (char '[' >> pure True) <|> pure False
[safe-coloured-text-gen]    pure $ PlainText $ if mBracket then "\ESC[" else "\ESC"
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiSequenceP :: Parser AnsiToken
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:115:25-33
[safe-coloured-text-gen] @@ -112,7 +112,7 @@
[safe-coloured-text-gen]  incompleteEscapeP = do
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    mBracket <- (char '[' >> pure True) <|> pure False
[safe-coloured-text-gen] -  pure $ PlainText $ if mBracket then "\ESC[" else "\ESC"
[safe-coloured-text-gen] +  pure $ PlainText $ if True then "\ESC[" else "\ESC"
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiSequenceP :: Parser AnsiToken
[safe-coloured-text-gen]  csiSequenceP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:115:25-33
[safe-coloured-text-gen] @@ -112,7 +112,7 @@
[safe-coloured-text-gen]  incompleteEscapeP = do
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    mBracket <- (char '[' >> pure True) <|> pure False
[safe-coloured-text-gen] -  pure $ PlainText $ if mBracket then "\ESC[" else "\ESC"
[safe-coloured-text-gen] +  pure $ PlainText $ if False then "\ESC[" else "\ESC"
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiSequenceP :: Parser AnsiToken
[safe-coloured-text-gen]  csiSequenceP = do
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:115:25-33
[safe-coloured-text-gen] @@ -112,7 +112,7 @@
[safe-coloured-text-gen]  incompleteEscapeP = do
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    mBracket <- (char '[' >> pure True) <|> pure False
[safe-coloured-text-gen] -  pure $ PlainText $ if mBracket then "\ESC[" else "\ESC"
[safe-coloured-text-gen] +  pure $ PlainText $ if not (mBracket) then "\ESC[" else "\ESC"
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  csiSequenceP :: Parser AnsiToken
[safe-coloured-text-gen]  csiSequenceP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:46-57
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> True && c /= '\r')
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:46-57
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> False && c /= '\r')
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:103:46-57
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> not (c /= '\ESC') && c /= '\r')
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:61-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && True)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:61-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && False)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:103:61-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && not (c /= '\r'))
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:46-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> True)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:46-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> False)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation LogicOp at src/Text/Colour/Chunk/Parsing.hs:103:46-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' || c /= '\r')
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Chunk/Parsing.hs:88:9-28
[safe-coloured-text-gen] @@ -85,7 +85,7 @@
[safe-coloured-text-gen]  parseAnsiTokensLazy = go
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go remaining
[safe-coloured-text-gen] -      | Lazy.null remaining = []
[safe-coloured-text-gen] +      | True = []
[safe-coloured-text-gen]        | otherwise =
[safe-coloured-text-gen]            case AL.parse ansiTokenP remaining of
[safe-coloured-text-gen]              AL.Done rest token -> token : go rest
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:90:11-52
[safe-coloured-text-gen] @@ -87,12 +87,11 @@
[safe-coloured-text-gen]      go remaining
[safe-coloured-text-gen]        | Lazy.null remaining = []
[safe-coloured-text-gen]        | otherwise =
[safe-coloured-text-gen]            case AL.parse ansiTokenP remaining of
[safe-coloured-text-gen] -            AL.Done rest token -> token : go rest
[safe-coloured-text-gen]              AL.Fail _ _ _ ->
[safe-coloured-text-gen]                -- This shouldn't happen since ansiTokenP always succeeds on
[safe-coloured-text-gen]                -- non-empty input (incompleteEscapeP and plainTextP are catch-alls).
[safe-coloured-text-gen]                [PlainText (Lazy.toStrict remaining)]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse a single ANSI token: a CSI sequence, a bare ESC, a carriage
[safe-coloured-text-gen]  -- return, or plain text.
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:88:9-28
[safe-coloured-text-gen] @@ -85,7 +85,7 @@
[safe-coloured-text-gen]  parseAnsiTokensLazy = go
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go remaining
[safe-coloured-text-gen] -      | Lazy.null remaining = []
[safe-coloured-text-gen] +      | not (Lazy.null remaining) = []
[safe-coloured-text-gen]        | otherwise =
[safe-coloured-text-gen]            case AL.parse ansiTokenP remaining of
[safe-coloured-text-gen]              AL.Done rest token -> token : go rest
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Chunk/Parsing.hs:103:46-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> not (c /= '\ESC' && c /= '\r'))
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:78:3-27
[safe-coloured-text-gen] @@ -75,9 +75,8 @@
[safe-coloured-text-gen]  -- Any incomplete escape sequence at the end of input is emitted as 'PlainText'.
[safe-coloured-text-gen]  parseAnsiTokens :: Text -> [AnsiToken]
[safe-coloured-text-gen]  parseAnsiTokens t =
[safe-coloured-text-gen]    case parseOnly (many' ansiTokenP <* endOfInput) t of
[safe-coloured-text-gen] -    Left _ -> [PlainText t]
[safe-coloured-text-gen]      Right tokens -> tokens
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse lazy 'Lazy.Text' into a list of 'AnsiToken's, produced lazily.
[safe-coloured-text-gen]  -- Tokens are yielded as soon as enough input has been consumed to complete them.
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:90:11-52
[safe-coloured-text-gen] @@ -87,12 +87,8 @@
[safe-coloured-text-gen]      go remaining
[safe-coloured-text-gen]        | Lazy.null remaining = []
[safe-coloured-text-gen]        | otherwise =
[safe-coloured-text-gen]            case AL.parse ansiTokenP remaining of
[safe-coloured-text-gen]              AL.Done rest token -> token : go rest
[safe-coloured-text-gen] -            AL.Fail _ _ _ ->
[safe-coloured-text-gen] -              -- This shouldn't happen since ansiTokenP always succeeds on
[safe-coloured-text-gen] -              -- non-empty input (incompleteEscapeP and plainTextP are catch-alls).
[safe-coloured-text-gen] -              [PlainText (Lazy.toStrict remaining)]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse a single ANSI token: a CSI sequence, a bare ESC, a carriage
[safe-coloured-text-gen]  -- return, or plain text.
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:36:25-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | c > 0 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:36:25-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | c > 1 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Chunk/Parsing.hs:78:3-27
[safe-coloured-text-gen] @@ -75,9 +75,8 @@
[safe-coloured-text-gen]  -- Any incomplete escape sequence at the end of input is emitted as 'PlainText'.
[safe-coloured-text-gen]  parseAnsiTokens :: Text -> [AnsiToken]
[safe-coloured-text-gen]  parseAnsiTokens t =
[safe-coloured-text-gen]    case parseOnly (many' ansiTokenP <* endOfInput) t of
[safe-coloured-text-gen]      Left _ -> [PlainText t]
[safe-coloured-text-gen] -    Right tokens -> tokens
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse lazy 'Lazy.Text' into a list of 'AnsiToken's, produced lazily.
[safe-coloured-text-gen]  -- Tokens are yielded as soon as enough input has been consumed to complete them.
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:36:25-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | c > -256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:36:21-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | c < 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:36:21-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | c <= 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:36:21-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | c >= 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Capabilities/FromEnv.hs:36:21-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | True -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Capabilities/FromEnv.hs:36:21-28
[safe-coloured-text-gen] @@ -33,7 +33,7 @@
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] +                  | not (c > 256) -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:37:26-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | c >= 0 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:37:26-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | c >= 1 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:37:26-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | c >= -256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:37:21-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | c < 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:37:21-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | c <= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Capabilities/FromEnv.hs:37:21-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | True -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:37:21-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | c > 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:38:26-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | c >= 0 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Capabilities/FromEnv.hs:37:21-29
[safe-coloured-text-gen] @@ -34,7 +34,7 @@
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] +                  | not (c >= 256) -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:38:26-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | c >= -8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation IntLit at src/Text/Colour/Capabilities/FromEnv.hs:38:26-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | c >= 1 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:38:21-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | c < 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:38:21-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | c <= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation Cmp at src/Text/Colour/Capabilities/FromEnv.hs:38:21-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | c > 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Capabilities/FromEnv.hs:38:21-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | True -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Capabilities/FromEnv.hs:38:21-27
[safe-coloured-text-gen] @@ -35,7 +35,7 @@
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] +                  | not (c >= 8) -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Capabilities/FromEnv.hs:33:15-48
[safe-coloured-text-gen] @@ -30,13 +30,12 @@
[safe-coloured-text-gen]              Just "truecolor" -> With24BitColours
[safe-coloured-text-gen]              Just "24bit" -> With24BitColours
[safe-coloured-text-gen]              _ ->
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen] -                Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Capabilities/FromEnv.hs:33:15-48
[safe-coloured-text-gen] @@ -30,13 +30,8 @@
[safe-coloured-text-gen]              Just "truecolor" -> With24BitColours
[safe-coloured-text-gen]              Just "24bit" -> With24BitColours
[safe-coloured-text-gen]              _ ->
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen] -                Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] -                  | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Capabilities/FromEnv.hs:29:18-48
[safe-coloured-text-gen] @@ -26,17 +26,16 @@
[safe-coloured-text-gen]            -- To support 24-bit colour:
[safe-coloured-text-gen]            -- https://unix.stackexchange.com/questions/450365/check-if-terminal-supports-24-bit-true-color
[safe-coloured-text-gen]            mct <- lookupEnv "COLORTERM"
[safe-coloured-text-gen]            pure $ case mct of
[safe-coloured-text-gen] -            Just "truecolor" -> With24BitColours
[safe-coloured-text-gen]              Just "24bit" -> With24BitColours
[safe-coloured-text-gen]              _ ->
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Capabilities/FromEnv.hs:29:18-48
[safe-coloured-text-gen] @@ -26,17 +26,16 @@
[safe-coloured-text-gen]            -- To support 24-bit colour:
[safe-coloured-text-gen]            -- https://unix.stackexchange.com/questions/450365/check-if-terminal-supports-24-bit-true-color
[safe-coloured-text-gen]            mct <- lookupEnv "COLORTERM"
[safe-coloured-text-gen]            pure $ case mct of
[safe-coloured-text-gen]              Just "truecolor" -> With24BitColours
[safe-coloured-text-gen] -            Just "24bit" -> With24BitColours
[safe-coloured-text-gen]              _ ->
[safe-coloured-text-gen]                case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen]                  Nothing -> WithoutColours
[safe-coloured-text-gen]                  Just c
[safe-coloured-text-gen]                    | c > 256 -> With24BitColours
[safe-coloured-text-gen]                    | c >= 256 -> With8BitColours
[safe-coloured-text-gen]                    | c >= 8 -> With8Colours
[safe-coloured-text-gen]                    | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation RemoveCase at src/Text/Colour/Capabilities/FromEnv.hs:29:18-48
[safe-coloured-text-gen] @@ -26,17 +26,9 @@
[safe-coloured-text-gen]            -- To support 24-bit colour:
[safe-coloured-text-gen]            -- https://unix.stackexchange.com/questions/450365/check-if-terminal-supports-24-bit-true-color
[safe-coloured-text-gen]            mct <- lookupEnv "COLORTERM"
[safe-coloured-text-gen]            pure $ case mct of
[safe-coloured-text-gen]              Just "truecolor" -> With24BitColours
[safe-coloured-text-gen]              Just "24bit" -> With24BitColours
[safe-coloured-text-gen] -            _ ->
[safe-coloured-text-gen] -              case Terminfo.getCapability term (Terminfo.tiGetNum "colors") of
[safe-coloured-text-gen] -                Nothing -> WithoutColours
[safe-coloured-text-gen] -                Just c
[safe-coloured-text-gen] -                  | c > 256 -> With24BitColours
[safe-coloured-text-gen] -                  | c >= 256 -> With8BitColours
[safe-coloured-text-gen] -                  | c >= 8 -> With8Colours
[safe-coloured-text-gen] -                  | otherwise -> WithoutColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Try to detect how many colours a given handle can handle.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Capabilities/FromEnv.hs:47:6-12
[safe-coloured-text-gen] @@ -44,6 +44,6 @@
[safe-coloured-text-gen]  getTerminalCapabilitiesFromHandle :: Handle -> IO TerminalCaKilled: 492
[safe-coloured-text-gen] Survived: 54
[safe-coloured-text-gen] Uncovered: 59
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Surviving mutations:
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:78:3-27
[safe-coloured-text-gen] @@ -75,9 +75,8 @@
[safe-coloured-text-gen]  -- Any incomplete escape sequence at the end of input is emitted as 'PlainText'.
[safe-coloured-text-gen]  parseAnsiTokens :: Text -> [AnsiToken]
[safe-coloured-text-gen]  parseAnsiTokens t =
[safe-coloured-text-gen]    case parseOnly (many' ansiTokenP <* endOfInput) t of
[safe-coloured-text-gen] -    Left _ -> [PlainText t]
[safe-coloured-text-gen]      Right tokens -> tokens
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse lazy 'Lazy.Text' into a list of 'AnsiToken's, produced lazily.
[safe-coloured-text-gen]  -- Tokens are yielded as soon as enough input has been consumed to complete them.
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:90:11-52
[safe-coloured-text-gen] @@ -87,12 +87,8 @@
[safe-coloured-text-gen]      go remaining
[safe-coloured-text-gen]        | Lazy.null remaining = []
[safe-coloured-text-gen]        | otherwise =
[safe-coloured-text-gen]            case AL.parse ansiTokenP remaining of
[safe-coloured-text-gen]              AL.Done rest token -> token : go rest
[safe-coloured-text-gen] -            AL.Fail _ _ _ ->
[safe-coloured-text-gen] -              -- This shouldn't happen since ansiTokenP always succeeds on
[safe-coloured-text-gen] -              -- non-empty input (incompleteEscapeP and plainTextP are catch-alls).
[safe-coloured-text-gen] -              [PlainText (Lazy.toStrict remaining)]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse a single ANSI token: a CSI sequence, a bare ESC, a carriage
[safe-coloured-text-gen]  -- return, or plain text.
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:103:61-70
[safe-coloured-text-gen] @@ -100,7 +100,7 @@
[safe-coloured-text-gen]  ansiTokenP = csiSequenceP <|> incompleteEscapeP <|> carriageReturnP <|> plainTextP
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainTextP :: Parser AnsiToken
[safe-coloured-text-gen] -plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && c /= '\r')
[safe-coloured-text-gen] +plainTextP = PlainText <$> takeWhile1 (\c -> c /= '\ESC' && True)
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  carriageReturnP :: Parser AnsiToken
[safe-coloured-text-gen]  carriageReturnP = do
[safe-coloured-text-gen] 
[safe-coloured-text-gen] LogicOp at src/Text/Colour/Chunk/Parsing.hs:122:31-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' || c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:31-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> True)
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && True)
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Cmp at src/Text/Colour/Chunk/Parsing.hs:122:46-57
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c >= '\x40' && c < '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> True && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Cmp at src/Text/Colour/Chunk/Parsing.hs:122:31-42
[safe-coloured-text-gen] @@ -119,7 +119,7 @@
[safe-coloured-text-gen]    _ <- char '\ESC'
[safe-coloured-text-gen]    _ <- char '['
[safe-coloured-text-gen]    (params, hasIntermediateBytes) <- csiParamsP
[safe-coloured-text-gen] -  finalByte <- satisfy (\c -> c >= '\x40' && c <= '\x7E')
[safe-coloured-text-gen] +  finalByte <- satisfy (\c -> c > '\x40' && c <= '\x7E')
[safe-coloured-text-gen]    pure $
[safe-coloured-text-gen]      if finalByte == 'm' && not hasIntermediateBytes
[safe-coloured-text-gen]        then SgrSequence params
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Cmp at src/Text/Colour/Chunk/Parsing.hs:147:33-44
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c >= '\x20' && c < '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if True && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Cmp at src/Text/Colour/Chunk/Parsing.hs:147:18-29
[safe-coloured-text-gen] @@ -144,7 +144,7 @@
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen]              else
[safe-coloured-text-gen] -              if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen] +              if c <= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen]                  else pure (acc, hasIntermediate)
[safe-coloured-text-gen]  
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:145:36-51
[safe-coloured-text-gen] @@ -142,7 +142,7 @@
[safe-coloured-text-gen]              _ -> go acc hasIntermediate
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen] -            then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] +            then anyChar >> go acc False
[safe-coloured-text-gen]              else
[safe-coloured-text-gen]                if c >= '\x20' && c <= '\x2F'
[safe-coloured-text-gen]                  then anyChar >> go acc True
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:142:25-40
[safe-coloured-text-gen] @@ -139,7 +139,7 @@
[safe-coloured-text-gen]            case readMaybe (Text.unpack digits) of
[safe-coloured-text-gen]              Just n
[safe-coloured-text-gen]                | n <= (255 :: Word) -> go (fromIntegral n : acc) hasIntermediate
[safe-coloured-text-gen] -            _ -> go acc hasIntermediate
[safe-coloured-text-gen] +            _ -> go acc False
[safe-coloured-text-gen]          else
[safe-coloured-text-gen]            if c == ';'
[safe-coloured-text-gen]              then anyChar >> go acc hasIntermediate
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:166:27-25
[safe-coloured-text-gen] @@ -163,20 +163,14 @@
[safe-coloured-text-gen]    where
[safe-coloured-text-gen]      go :: ChunkStyle -> [AnsiToken] -> (ChunkStyle, [Chunk])
[safe-coloured-text-gen]      go s [] = (s, [])
[safe-coloured-text-gen]      go s (token : rest) = case token of
[safe-coloured-text-gen]        PlainText t
[safe-coloured-text-gen]          | Text.null t -> go s rest
[safe-coloured-text-gen]          | otherwise ->
[safe-coloured-text-gen]              let (finalS, restChunks) = go s rest
[safe-coloured-text-gen]               in (finalS, Chunk {chunkText = t, chunkStyle = s} : restChunks)
[safe-coloured-text-gen]        SgrSequence params -> go (applySGRParams s params) rest
[safe-coloured-text-gen]        OtherCsiSequence -> go s rest
[safe-coloured-text-gen] -      CarriageReturn ->
[safe-coloured-text-gen] -        case rest of
[safe-coloured-text-gen] -          (PlainText _ : _) ->
[safe-coloured-text-gen] -            let (finalS, restChunks) = go s rest
[safe-coloured-text-gen] -             in (finalS, Chunk {chunkText = "\n", chunkStyle = s} : restChunks)
[safe-coloured-text-gen] -          _ -> go s rest
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Parse strict 'Text' containing ANSI escape codes into styled 'Chunk's.
[safe-coloured-text-gen]  --
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:255:7-30
[safe-coloured-text-gen] @@ -252,8 +252,7 @@
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Unknown code, skip
[safe-coloured-text-gen]    | otherwise = goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] LogicOp at src/Text/Colour/Chunk/Parsing.hs:254:5-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 || p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:254:5-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:254:17-25
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 100 && True =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:254:5-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | True && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:254:10-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:254:10-13
[safe-coloured-text-gen] @@ -251,7 +251,7 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen] -  | p >= 100 && p <= 107 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:250:7-30
[safe-coloured-text-gen] @@ -247,9 +247,8 @@
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen]    | p >= 90 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Bright background colours (100-107)
[safe-coloured-text-gen]    | p >= 100 && p <= 107 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 100) of
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:249:5-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | True && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:249:10-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:249:10-12
[safe-coloured-text-gen] @@ -246,7 +246,7 @@
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] -  | p >= 90 && p <= 97 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 97 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 90) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Bright tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:245:10-12
[safe-coloured-text-gen] @@ -242,7 +242,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] -  | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:245:10-12
[safe-coloured-text-gen] @@ -242,7 +242,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen] -  | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen]    | p == 55 = goSGR (s {chunkStyleOverlined = Just False}) ps
[safe-coloured-text-gen]    -- Bright foreground colours (90-97)
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:240:15-22
[safe-coloured-text-gen] @@ -237,10 +237,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleBackground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen] -      _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default background
[safe-coloured-text-gen]    | p == 49 = goSGR (s {chunkStyleBackground = Nothing}) ps
[safe-coloured-text-gen]    | p == 53 = goSGR (s {chunkStyleOverlined = Just True}) ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:236:7-30
[safe-coloured-text-gen] @@ -233,9 +233,8 @@
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended background colour
[safe-coloured-text-gen]    | p == 48 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleBackground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:235:5-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | True && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:235:10-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:235:10-12
[safe-coloured-text-gen] @@ -232,7 +232,7 @@
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] -  | p >= 40 && p <= 47 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleBackground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:233:10-12
[safe-coloured-text-gen] @@ -230,7 +230,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] -  | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 1 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:233:10-12
[safe-coloured-text-gen] @@ -230,7 +230,7 @@
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen]        _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen] -  | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen] +  | p == 0 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen]    | p >= 40 && p <= 47 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 40) of
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:228:15-22
[safe-coloured-text-gen] @@ -225,10 +225,9 @@
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen]        2 : r : g : b : rest -> goSGR (s {chunkStyleForeground = Just (Colour24Bit r g b)}) rest
[safe-coloured-text-gen] -      _ -> goSGR s ps
[safe-coloured-text-gen]    -- Default foreground
[safe-coloured-text-gen]    | p == 39 = goSGR (s {chunkStyleForeground = Nothing}) ps
[safe-coloured-text-gen]    -- Standard background colours (40-47)
[safe-coloured-text-gen] 
[safe-coloured-text-gen] RemoveCase at src/Text/Colour/Chunk/Parsing.hs:224:7-30
[safe-coloured-text-gen] @@ -221,9 +221,8 @@
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen]    | p >= 30 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen] -        Nothing -> goSGR s ps
[safe-coloured-text-gen]    -- Extended foreground colour
[safe-coloured-text-gen]    | p == 38 = case ps of
[safe-coloured-text-gen]        5 : n : rest -> goSGR (s {chunkStyleForeground = Just (Colour8Bit n)}) rest
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk/Parsing.hs:223:5-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | True && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:223:10-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 1 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] IntLit at src/Text/Colour/Chunk/Parsing.hs:223:10-12
[safe-coloured-text-gen] @@ -220,7 +220,7 @@
[safe-coloured-text-gen]    | p == 28 = goSGR (s {chunkStyleConcealed = Just False}) ps
[safe-coloured-text-gen]    | p == 29 = goSGR (s {chunkStyleStrikethrough = Just False}) ps
[safe-coloured-text-gen]    -- Standard foreground colours (30-37)
[safe-coloured-text-gen] -  | p >= 30 && p <= 37 =
[safe-coloured-text-gen] +  | p >= 0 && p <= 37 =
[safe-coloured-text-gen]        case terminalColourFromIndex (p - 30) of
[safe-coloured-text-gen]          Just tc -> goSGR (s {chunkStyleForeground = Just (Colour8 Dull tc)}) ps
[safe-coloured-text-gen]          Nothing -> goSGR s ps
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ListLit at src/Text/Colour/Chunk.hs:62:9-10
[safe-coloured-text-gen] @@ -59,17 +59,16 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ListLit at src/Text/Colour/Chunk.hs:62:9-10
[safe-coloured-text-gen] @@ -59,17 +59,16 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainChunk :: TerminalCapabilities -> Chunk -> Bool
[safe-coloured-text-gen]  plainChunk tc Chunk {..} =
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:70:11-59
[safe-coloured-text-gen] @@ -67,7 +67,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] -          maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen]  
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:69:11-39
[safe-coloured-text-gen] @@ -66,7 +66,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] -          isNothing chunkStyleBlinking,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen]          ]
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:68:11-42
[safe-coloured-text-gen] @@ -65,7 +65,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] -          isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleBackground
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:67:11-47
[safe-coloured-text-gen] @@ -64,7 +64,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] -          isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen]            maybe True (plainColour tc) chunkStyleForeground,
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:66:11-40
[safe-coloured-text-gen] @@ -63,7 +63,7 @@
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] -          isNothing chunkStyleOverlined,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen]            isNothing chunkStyleBlinking,
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:65:11-40
[safe-coloured-text-gen] @@ -62,7 +62,7 @@
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] -          isNothing chunkStyleConcealed,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen]            isNothing chunkStyleUnderlining,
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:64:11-55
[safe-coloured-text-gen] @@ -61,7 +61,7 @@
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] -          isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen]            isNothing chunkStyleConsoleIntensity,
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:63:11-44
[safe-coloured-text-gen] @@ -60,7 +60,7 @@
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen]          [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] -          isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen] +          True,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen]            isNothing chunkStyleOverlined,
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:62:11-37
[safe-coloured-text-gen] @@ -59,7 +59,7 @@
[safe-coloured-text-gen]  plainStyle tc ChunkStyle {..} =
[safe-coloured-text-gen]    let ChunkStyle _ _ _ _ _ _ _ _ _ _ = undefined
[safe-coloured-text-gen]     in and
[safe-coloured-text-gen] -        [ isNothing chunkStyleItalic,
[safe-coloured-text-gen] +        [ True,
[safe-coloured-text-gen]            isNothing chunkStyleStrikethrough,
[safe-coloured-text-gen]            isNothing chunkStyleSwapForegroundBackground,
[safe-coloured-text-gen]            isNothing chunkStyleConcealed,
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Cmp at src/Text/Colour/Chunk.hs:82:20-40
[safe-coloured-text-gen] @@ -79,7 +79,7 @@
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen]    Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] -  Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen] +  Colour8Bit {} -> tc <= With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  -- | Render chunks directly to a UTF8-encoded 'Bytestring'.
[safe-coloured-text-gen] 
[safe-coloured-text-gen] Cmp at src/Text/Colour/Chunk.hs:81:17-34
[safe-coloured-text-gen] @@ -78,7 +78,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  plainColour :: TerminalCapabilities -> Colour -> Bool
[safe-coloured-text-gen]  plainColour tc = \case
[safe-coloured-text-gen] -  Colour8 {} -> tc < With8Colours
[safe-coloured-text-gen] +  Colour8 {} -> tc <= With8Colours
[safe-coloured-text-gen]    Colour8Bit {} -> tc < With8BitColours
[safe-coloured-text-gen]    Colour24Bit {} -> tc < With24BitColours
[safe-coloured-text-gen]  
[safe-coloured-text-gen] 
[safe-coloured-text-gen] ConstBool at src/Text/Colour/Chunk.hs:228:24-33
[safe-coloured-text-gen] @@ -225,7 +225,7 @@
[safe-coloured-text-gen]  
[safe-coloured-text-gen]  colourSGR :: TerminalCapabilities -> ConsoleLayer -> Colour -> Maybe SGR
[safe-coloured-text-gen]  colourSGR tc layer =
[safe-coloured-text-gen] -  let cap tc' sgr = if tc >= tc' then Just sgr else Nothing
[safe-coloured-text-gen] +  let cap tc' sgr = if True then Just sgr else Nothing
[safe-coloured-text-gen]     in \case
[safe-coloured-text-gen]          Colour8 intensity terminalColour -> cap With8Colours $ SetColour intensity layer terminalColour
[safe-coloured-text-gen]          Colour8Bit w -> cap With8BitColours $ Set8BitColour layer w
[safe-coloured-text-gen] pabilities
[safe-coloured-text-gen]  getTerminalCapabilitiesFromHandle h = do
[safe-coloured-text-gen]    isTerm <- hIsTerminalDevice h
[safe-coloured-text-gen] -  if isTerm
[safe-coloured-text-gen] +  if True
[safe-coloured-text-gen]      then getTerminalCapabilitiesFromEnv
[safe-coloured-text-gen]      else pure WithoutColours
[safe-coloured-text-gen] Testing mutation ConstBool at src/Text/Colour/Capabilities/FromEnv.hs:47:6-12
[safe-coloured-text-gen] @@ -44,6 +44,6 @@
[safe-coloured-text-gen]  getTerminalCapabilitiesFromHandle :: Handle -> IO TerminalCapabilities
[safe-coloured-text-gen]  getTerminalCapabilitiesFromHandle h = do
[safe-coloured-text-gen]    isTerm <- hIsTerminalDevice h
[safe-coloured-text-gen] -  if isTerm
[safe-coloured-text-gen] +  if False
[safe-coloured-text-gen]      then getTerminalCapabilitiesFromEnv
[safe-coloured-text-gen]      else pure WithoutColours
[safe-coloured-text-gen] Testing mutation Negate at src/Text/Colour/Capabilities/FromEnv.hs:47:6-12
[safe-coloured-text-gen] @@ -44,6 +44,6 @@
[safe-coloured-text-gen]  getTerminalCapabilitiesFromHandle :: Handle -> IO TerminalCapabilities
[safe-coloured-text-gen]  getTerminalCapabilitiesFromHandle h = do
[safe-coloured-text-gen]    isTerm <- hIsTerminalDevice h
[safe-coloured-text-gen] -  if isTerm
[safe-coloured-text-gen] +  if not (isTerm)
[safe-coloured-text-gen]      then getTerminalCapabilitiesFromEnv
[safe-coloured-text-gen]      else pure WithoutColours
[safe-coloured-text-gen] checkPhase completed in 19 minutes 19 seconds
[safe-coloured-text-gen] Phase: haddockPhase
[safe-coloured-text-gen] Preprocessing library for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] Running Haddock on library for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] Warning: The documentation for the following packages are not installed. No
[safe-coloured-text-gen] links will be generated to these packages: safe-coloured-text-0.5.0.0
[safe-coloured-text-gen] [1 of 2] Compiling Paths_safe_coloured_text_gen ( dist/build/autogen/Paths_safe_coloured_text_gen.hs, nothing )
[safe-coloured-text-gen] [2 of 2] Compiling Text.Colour.Gen  ( src/Text/Colour/Gen.hs, nothing )
[safe-coloured-text-gen] Haddock coverage:
[safe-coloured-text-gen]    0% (  0 /  1) in 'Text.Colour.Gen'
[safe-coloured-text-gen]   Missing documentation for:
[safe-coloured-text-gen]     Module header
[safe-coloured-text-gen] Warning: Text.Colour.Gen: could not find link destinations for: 
[safe-coloured-text-gen] 	- Text.Colour.Chunk.Chunk
[safe-coloured-text-gen] 	- Text.Colour.Chunk.ChunkStyle
[safe-coloured-text-gen] 	- Text.Colour.Chunk.Colour
[safe-coloured-text-gen] 	- Text.Colour.Code.Blinking
[safe-coloured-text-gen] 	- Text.Colour.Code.CSI
[safe-coloured-text-gen] 	- Text.Colour.Code.ColourIntensity
[safe-coloured-text-gen] 	- Text.Colour.Code.ConsoleIntensity
[safe-coloured-text-gen] 	- Text.Colour.Code.ConsoleLayer
[safe-coloured-text-gen] 	- Text.Colour.Code.SGR
[safe-coloured-text-gen] 	- Text.Colour.Code.TerminalColour
[safe-coloured-text-gen] 	- Text.Colour.Code.Underlining
[safe-coloured-text-gen] Documentation created: dist/doc/html/safe-coloured-text-gen/,
[safe-coloured-text-gen] dist/doc/html/safe-coloured-text-gen/safe-coloured-text-gen.txt
[safe-coloured-text-gen] Preprocessing test suite 'safe-coloured-text-test' for safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] Phase: installPhase
[safe-coloured-text-gen] Installing library in /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/safe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ
[safe-coloured-text-gen] Phase: fixupPhase
[safe-coloured-text-gen] shrinking RPATHs of ELF executables and libraries in /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] shrinking /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSsafe-coloured-text-gen-0.0.0.5-GqYG0S9NpbAKEdEqIS0gtZ-ghc9.10.3.so
[safe-coloured-text-gen] checking for references to /build/ in /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5...
[safe-coloured-text-gen] patching script interpreter paths in /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5
[safe-coloured-text-gen] stripping (with command strip and flags -S -p) in  /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5/lib
[safe-coloured-text-gen] shrinking RPATHs of ELF executables and libraries in /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc
[safe-coloured-text-gen] checking for references to /build/ in /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc...
[safe-coloured-text-gen] patching script interpreter paths in /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc
[safe-coloured-text-gen] shrinking RPATHs of ELF executables and libraries in /nix/store/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report
[safe-coloured-text-gen] checking for references to /build/ in /nix/store/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report...
[safe-coloured-text-gen] patching script interpreter paths in /nix/store/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report
[post-build-hook] Uploading to cachix cache "sydtest": /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5 /nix/store/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc
[post-build-hook] Pushing 4 paths (199 are already present) using zstd to cache sydtest ⏳
[post-build-hook] 
[post-build-hook] Pushing /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5 (2.78 MiB)
[post-build-hook] Pushing /nix/store/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report (1.53 MiB)
[post-build-hook] Pushing /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc (182.34 KiB)
[post-build-hook] Pushing /nix/store/yiy472m7z9h1kxr2pqx8ipfc4mcq6zqq-safe-coloured-text-0.5.0.0 (12.00 MiB)
[post-build-hook] 
[post-build-hook] All done.
[post-build-hook] Uploading to the NixCI staging cache: /nix/store/2wgbrl75pfvq46xwkkm7gd6cjy5mb7k0-safe-coloured-text-gen-0.0.0.5 /nix/store/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report /nix/store/kbxhhfd5w6zs7v5ly3n6f2z5ld5bab2a-safe-coloured-text-gen-0.0.0.5-doc
[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/3q91g2rp92rpmwxfgkj4sivlk3h8anp8-safe-coloured-text-gen-0.0.0.5-report' 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 0 paths...
Progress: 1 of 2 built, 23 of 23 downloaded from cache