- 0.02 s
$ /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=per-test-coverage-manifest&rev=8ac332b46c5cd838d8c89d81205f0cb1d10530ea#checks.x86_64-linux.mutation-really-safe-money --print-build-logs
- 0.07 s
warning: ignoring untrusted flake configuration setting 'extra-substituters'.
- 0.07 s
Pass '--accept-flake-config' to trust it
- 0.07 s
warning: ignoring untrusted flake configuration setting 'extra-trusted-public-keys'.
- 0.07 s
Pass '--accept-flake-config' to trust it
- 0.09 s
error (ignored): SQLite database '/var/cache/private/nix-ci-worker/eval-cache-v6/2b6d9a15c0fcb3e1315f04311b877fd4d4e2792afd5f5540f94eb284a87f1ba5.sqlite' is busy
- 2.51 s
- 3.47 s
Downloading cached really-safe-money-0.0.0.0-manifest from https://cache.staging.nix-ci.com
- 3.47 s
Downloading cached really-safe-money-gen-source from https://cache.staging.nix-ci.com
- 3.48 s
Downloading cached ghc from https://cache.staging.nix-ci.com
- 3.48 s
Downloading cached genvalidity-containers-1.0.0.2-doc from https://cache.staging.nix-ci.com
- 3.48 s
Downloading cached genvalidity-vector-1.0.0.0-doc from https://cache.staging.nix-ci.com
- 3.49 s
Progress: 0 of 14 built, 1 of 104 downloaded from cache (4 downloading)
- 3.49 s
Progress: 0 of 13 built, 2 of 104 downloaded from cache (3 downloading)
- 3.50 s
Progress: 0 of 12 built, 3 of 104 downloaded from cache (2 downloading)
- 3.51 s
Progress: 0 of 12 built, 4 of 104 downloaded from cache (1 downloading)
- 16.67 s
Progress: 0 of 12 built, 5 of 104 downloaded from cache
- 16.67 s
Downloading cached OneTuple from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached StateVar from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached assoc from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached base-orphans from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached blaze-builder from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached call-stack from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached character-ps from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached colour from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached dlist from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached generically from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached hashable from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached haskell-lexer from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached indexed-traversable from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached integer-logarithms from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached prettyprinter from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached primitive from https://cache.staging.nix-ci.com
- 16.70 s
Progress: 0 of 11 built, 6 of 104 downloaded from cache (15 downloading)
- 16.70 s
Progress: 0 of 11 built, 7 of 104 downloaded from cache (14 downloading)
- 16.70 s
Progress: 0 of 11 built, 8 of 104 downloaded from cache (13 downloading)
- 16.70 s
Progress: 0 of 11 built, 9 of 104 downloaded from cache (12 downloading)
- 16.70 s
Progress: 0 of 11 built, 10 of 104 downloaded from cache (11 downloading)
- 16.70 s
Progress: 0 of 11 built, 11 of 104 downloaded from cache (10 downloading)
- 16.70 s
Progress: 0 of 11 built, 12 of 104 downloaded from cache (9 downloading)
- 16.70 s
Progress: 0 of 11 built, 13 of 104 downloaded from cache (8 downloading)
- 16.70 s
Progress: 0 of 11 built, 14 of 104 downloaded from cache (7 downloading)
- 16.70 s
Progress: 0 of 11 built, 15 of 104 downloaded from cache (6 downloading)
- 16.70 s
Progress: 0 of 11 built, 16 of 104 downloaded from cache (5 downloading)
- 16.70 s
Progress: 0 of 11 built, 17 of 104 downloaded from cache (4 downloading)
- 16.70 s
Progress: 0 of 11 built, 18 of 104 downloaded from cache (3 downloading)
- 16.70 s
Progress: 0 of 11 built, 19 of 104 downloaded from cache (2 downloading)
- 16.70 s
Progress: 0 of 11 built, 20 of 104 downloaded from cache (1 downloading)
- 16.70 s
Progress: 0 of 11 built, 21 of 104 downloaded from cache
- 16.70 s
Downloading cached safe from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached selective from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached split from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached splitmix from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached tagged from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached th-abstraction from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached th-compat from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached transformers-compat from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached unix-compat from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached validity from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached vector-stream from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached unliftio-core from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached HUnit from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached ansi-terminal-types from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached async from https://cache.staging.nix-ci.com
- 16.70 s
Downloading cached contravariant from https://cache.staging.nix-ci.com
- 16.70 s
Progress: 0 of 11 built, 22 of 104 downloaded from cache (15 downloading)
- 16.70 s
Progress: 0 of 11 built, 23 of 104 downloaded from cache (14 downloading)
- 16.70 s
Progress: 0 of 11 built, 24 of 104 downloaded from cache (13 downloading)
- 16.70 s
Progress: 0 of 11 built, 25 of 104 downloaded from cache (12 downloading)
- 16.70 s
Progress: 0 of 11 built, 26 of 104 downloaded from cache (11 downloading)
- 16.70 s
Progress: 0 of 11 built, 27 of 104 downloaded from cache (10 downloading)
- 16.70 s
Progress: 0 of 11 built, 28 of 104 downloaded from cache (9 downloading)
- 16.70 s
Progress: 0 of 11 built, 29 of 104 downloaded from cache (8 downloading)
- 16.70 s
Progress: 0 of 11 built, 30 of 104 downloaded from cache (7 downloading)
- 16.70 s
Progress: 0 of 11 built, 31 of 104 downloaded from cache (6 downloading)
- 16.70 s
Progress: 0 of 11 built, 32 of 104 downloaded from cache (5 downloading)
- 16.70 s
Progress: 0 of 11 built, 33 of 104 downloaded from cache (4 downloading)
- 16.70 s
Progress: 0 of 11 built, 34 of 104 downloaded from cache (3 downloading)
- 16.70 s
Progress: 0 of 11 built, 35 of 104 downloaded from cache (2 downloading)
- 16.70 s
Progress: 0 of 11 built, 36 of 104 downloaded from cache (1 downloading)
- 16.70 s
Downloading cached data-fix from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached integer-conversion from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached pretty-show from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached scientific from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached text-short from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached these from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached time-compat from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached unordered-containers from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached ansi-terminal from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached distributive from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached network-uri from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached random from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached resourcet from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached validity-bytestring from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached validity-containers from https://cache.staging.nix-ci.com
- 16.71 s
Progress: 0 of 11 built, 37 of 104 downloaded from cache (15 downloading)
- 16.71 s
Progress: 0 of 11 built, 38 of 104 downloaded from cache (14 downloading)
- 16.71 s
Progress: 0 of 11 built, 39 of 104 downloaded from cache (13 downloading)
- 16.71 s
Progress: 0 of 11 built, 40 of 104 downloaded from cache (12 downloading)
- 16.71 s
Progress: 0 of 11 built, 41 of 104 downloaded from cache (11 downloading)
- 16.71 s
Progress: 0 of 11 built, 42 of 104 downloaded from cache (10 downloading)
- 16.71 s
Progress: 0 of 11 built, 43 of 104 downloaded from cache (9 downloading)
- 16.71 s
Progress: 0 of 11 built, 44 of 104 downloaded from cache (8 downloading)
- 16.71 s
Progress: 0 of 11 built, 45 of 104 downloaded from cache (7 downloading)
- 16.71 s
Progress: 0 of 11 built, 46 of 104 downloaded from cache (6 downloading)
- 16.71 s
Progress: 0 of 11 built, 47 of 104 downloaded from cache (5 downloading)
- 16.71 s
Progress: 0 of 11 built, 48 of 104 downloaded from cache (4 downloading)
- 16.71 s
Progress: 0 of 11 built, 49 of 104 downloaded from cache (3 downloading)
- 16.71 s
Downloading cached validity-text from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached MonadRandom from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached QuickCheck from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached attoparsec from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached comonad from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached prettyprinter-ansi-terminal from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached strict from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached svg-builder from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached temporary from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached text-iso8601 from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached uuid-types from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached validity-scientific from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached validity-unordered-containers from https://cache.staging.nix-ci.com
- 16.71 s
Progress: 0 of 11 built, 50 of 104 downloaded from cache (15 downloading)
- 16.71 s
Progress: 0 of 11 built, 51 of 104 downloaded from cache (14 downloading)
- 16.71 s
Progress: 0 of 11 built, 52 of 104 downloaded from cache (13 downloading)
- 16.71 s
Progress: 0 of 11 built, 53 of 104 downloaded from cache (12 downloading)
- 16.71 s
Progress: 0 of 11 built, 54 of 104 downloaded from cache (11 downloading)
- 16.71 s
Progress: 0 of 11 built, 55 of 104 downloaded from cache (10 downloading)
- 16.71 s
Progress: 0 of 11 built, 56 of 104 downloaded from cache (9 downloading)
- 16.71 s
Progress: 0 of 11 built, 57 of 104 downloaded from cache (8 downloading)
- 16.71 s
Progress: 0 of 11 built, 58 of 104 downloaded from cache (7 downloading)
- 16.71 s
Progress: 0 of 11 built, 59 of 104 downloaded from cache (6 downloading)
- 16.71 s
Progress: 0 of 11 built, 60 of 104 downloaded from cache (5 downloading)
- 16.71 s
Progress: 0 of 11 built, 61 of 104 downloaded from cache (4 downloading)
- 16.71 s
Progress: 0 of 11 built, 62 of 104 downloaded from cache (3 downloading)
- 16.71 s
Progress: 0 of 11 built, 63 of 104 downloaded from cache (2 downloading)
- 16.71 s
Downloading cached bifunctors from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached genvalidity from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached optparse-applicative from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached quickcheck-io from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached random-shuffle from https://cache.staging.nix-ci.com
- 16.71 s
Downloading cached safe-coloured-text from https://cache.staging.nix-ci.com
- 16.71 s
Progress: 0 of 10 built, 64 of 104 downloaded from cache (7 downloading)
- 16.71 s
Progress: 0 of 10 built, 65 of 104 downloaded from cache (6 downloading)
- 16.71 s
Progress: 0 of 10 built, 66 of 104 downloaded from cache (5 downloading)
- 16.71 s
Progress: 0 of 10 built, 67 of 104 downloaded from cache (4 downloading)
- 16.72 s
Progress: 0 of 10 built, 68 of 104 downloaded from cache (3 downloading)
- 16.72 s
Progress: 0 of 10 built, 69 of 104 downloaded from cache (2 downloading)
- 16.72 s
Downloading cached genvalidity-containers from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached semigroupoids from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached tasty from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 9 built, 70 of 104 downloaded from cache (4 downloading)
- 16.72 s
Progress: 0 of 9 built, 71 of 104 downloaded from cache (3 downloading)
- 16.72 s
Progress: 0 of 9 built, 72 of 104 downloaded from cache (2 downloading)
- 16.72 s
Downloading cached safe-coloured-text-layout from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 9 built, 73 of 104 downloaded from cache (3 downloading)
- 16.72 s
Downloading cached safe-coloured-text-terminfo from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 9 built, 74 of 104 downloaded from cache (3 downloading)
- 16.72 s
Downloading cached vector from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 9 built, 75 of 104 downloaded from cache (2 downloading)
- 16.72 s
Progress: 0 of 9 built, 76 of 104 downloaded from cache (1 downloading)
- 16.72 s
Downloading cached bitvec from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached fast-myers-diff from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached indexed-traversable-instances from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached validity-vector from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 77 of 104 downloaded from cache (4 downloading)
- 16.72 s
Progress: 0 of 8 built, 78 of 104 downloaded from cache (3 downloading)
- 16.72 s
Progress: 0 of 8 built, 79 of 104 downloaded from cache (2 downloading)
- 16.72 s
Downloading cached semialign from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached vector-algorithms from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached witherable from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 80 of 104 downloaded from cache (4 downloading)
- 16.72 s
Progress: 0 of 8 built, 81 of 104 downloaded from cache (3 downloading)
- 16.72 s
Progress: 0 of 8 built, 82 of 104 downloaded from cache (3 downloading)
- 16.72 s
Downloading cached genvalidity-vector from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 83 of 104 downloaded from cache (2 downloading)
- 16.72 s
Downloading cached aeson from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 84 of 104 downloaded from cache (3 downloading)
- 16.72 s
Downloading cached mono-traversable from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached autodocodec from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached path from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 85 of 104 downloaded from cache (5 downloading)
- 16.72 s
Downloading cached validity-aeson from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 86 of 104 downloaded from cache (4 downloading)
- 16.72 s
Downloading cached autodocodec-nix from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 87 of 104 downloaded from cache (5 downloading)
- 16.72 s
Downloading cached conduit from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 88 of 104 downloaded from cache (4 downloading)
- 16.72 s
Progress: 0 of 8 built, 89 of 104 downloaded from cache (3 downloading)
- 16.72 s
Downloading cached autodocodec-schema from https://cache.staging.nix-ci.com
- 16.72 s
Downloading cached path-io from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 90 of 104 downloaded from cache (4 downloading)
- 16.72 s
Progress: 0 of 8 built, 91 of 104 downloaded from cache (4 downloading)
- 16.72 s
Downloading cached libyaml from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 92 of 104 downloaded from cache (3 downloading)
- 16.72 s
Downloading cached sydtest-discover from https://cache.staging.nix-ci.com
- 16.72 s
Progress: 0 of 8 built, 93 of 104 downloaded from cache (4 downloading)
- 16.72 s
Downloading cached sydtest-mutation-runtime from https://cache.staging.nix-ci.com
- 16.73 s
Progress: 0 of 8 built, 94 of 104 downloaded from cache (4 downloading)
- 16.73 s
Progress: 0 of 8 built, 95 of 104 downloaded from cache (3 downloading)
- 16.73 s
Downloading cached yaml from https://cache.staging.nix-ci.com
- 16.73 s
Downloading cached sydtest-mutation-plugin from https://cache.staging.nix-ci.com
- 16.73 s
Progress: 0 of 7 built, 96 of 104 downloaded from cache (3 downloading)
- 16.73 s
Progress: 0 of 7 built, 97 of 104 downloaded from cache (3 downloading)
- 16.73 s
Downloading cached autodocodec-yaml from https://cache.staging.nix-ci.com
- 16.73 s
Progress: 0 of 7 built, 98 of 104 downloaded from cache (3 downloading)
- 16.73 s
Downloading cached really-safe-money from https://cache.staging.nix-ci.com
- 16.73 s
Downloading cached opt-env-conf from https://cache.staging.nix-ci.com
- 16.73 s
Progress: 0 of 7 built, 99 of 104 downloaded from cache (3 downloading)
- 16.73 s
Downloading cached sydtest from https://cache.staging.nix-ci.com
- 16.73 s
Progress: 0 of 7 built, 100 of 104 downloaded from cache (3 downloading)
- 16.73 s
Downloading cached genvalidity-sydtest from https://cache.staging.nix-ci.com
- 16.73 s
Progress: 0 of 6 built, 101 of 104 downloaded from cache (3 downloading)
- 16.73 s
Progress: 0 of 5 built, 102 of 104 downloaded from cache (2 downloading)
- 16.74 s
Progress: 0 of 4 built, 103 of 104 downloaded from cache (1 downloading)
- 17.09 s
Progress: 0 of 3 built, 104 of 104 downloaded from cache
- 17.33 s
Building really-safe-money-gen
- 17.70 s
[really-safe-money-gen] Phase: setupCompilerEnvironmentPhase
- 17.71 s
[really-safe-money-gen] Build with /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3.
- 18.44 s
[really-safe-money-gen] Phase: unpackPhase
- 18.44 s
[really-safe-money-gen] unpacking source archive /nix/store/fymhl39zk09m29hmhhg5jp7c54v0flg9-really-safe-money-gen-source-0.0.0.0/really-safe-money-gen-0.0.0.0.tar.gz
- 18.46 s
[really-safe-money-gen] source root is really-safe-money-gen-0.0.0.0
- 18.47 s
[really-safe-money-gen] setting SOURCE_DATE_EPOCH to timestamp 1778512797 of file "really-safe-money-gen-0.0.0.0/test/Spec.hs"
- 18.48 s
[really-safe-money-gen] Phase: patchPhase
- 18.50 s
[really-safe-money-gen] Phase: compileBuildDriverPhase
- 18.51 s
[really-safe-money-gen] setupCompileFlags: -package-db=/build/tmp.fxcsEd6mD2/setup-package.conf.d -threaded
- 18.56 s
[really-safe-money-gen] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.fxcsEd6mD2/Main.o )
- 18.61 s
[really-safe-money-gen] [2 of 2] Linking Setup
- 19.86 s
[really-safe-money-gen] Phase: updateAutotoolsGnuConfigScriptsPhase
- 19.88 s
[really-safe-money-gen] Phase: configurePhase
- 19.89 s
[really-safe-money-gen] configureFlags: --verbose --prefix=/nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/nix/store/wn0r4439smrf3d3xfq0qghvprc2z8jaz-really-safe-money-gen-0.0.0.0-doc/share/doc/really-safe-money-gen-0.0.0.0 --with-gcc=gcc --package-db=/build/tmp.fxcsEd6mD2/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-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --extra-lib-dirs=/nix/store/45z5ja3qb26d66l44gkni38r7bk36fnh-ncurses-6.5/lib --extra-lib-dirs=/nix/store/6rwsi7k52chjbpxr74khmzdr5hzlc4bb-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/5nklmmj1ypr5vpkg7rxna1ywyzl8lca8-elfutils-0.194/lib --extra-lib-dirs=/nix/store/3xq68v4gdh0pmkxdwxy76bh36w99nb5q-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/kw1l2rrslifbdm7l8blgmaf7xidh0n5q-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/lib
- 19.90 s
[really-safe-money-gen] Using Parsec parser
- 19.90 s
[really-safe-money-gen] Configuring really-safe-money-gen-0.0.0.0...
- 20.66 s
[really-safe-money-gen] Dependency QuickCheck: using QuickCheck-2.15.0.1
- 20.66 s
[really-safe-money-gen] Dependency base >=4.7 && <5: using base-4.20.2.0
- 20.66 s
[really-safe-money-gen] Dependency genvalidity: using genvalidity-1.1.1.0
- 20.66 s
[really-safe-money-gen] Dependency genvalidity-containers: using genvalidity-containers-1.0.0.2
- 20.66 s
[really-safe-money-gen] Dependency really-safe-money: using really-safe-money-0.0.0.0
- 20.66 s
[really-safe-money-gen] Dependency base >=4.7 && <5: using base-4.20.2.0
- 20.66 s
[really-safe-money-gen] Dependency containers: using containers-0.7
- 20.66 s
[really-safe-money-gen] Dependency genvalidity-sydtest: using genvalidity-sydtest-1.0.1.0
- 20.66 s
[really-safe-money-gen] Dependency genvalidity-vector: using genvalidity-vector-1.0.0.0
- 20.66 s
[really-safe-money-gen] Dependency really-safe-money: using really-safe-money-0.0.0.0
- 20.66 s
[really-safe-money-gen] Dependency really-safe-money-gen: using really-safe-money-gen-0.0.0.0
- 20.66 s
[really-safe-money-gen] Dependency sydtest: using sydtest-0.23.0.2
- 20.66 s
[really-safe-money-gen] Dependency vector: using vector-0.13.2.0
- 20.66 s
[really-safe-money-gen] Source component graph:
- 20.66 s
[really-safe-money-gen] component lib
- 20.66 s
[really-safe-money-gen] component test:really-safe-money-test dependency lib
- 20.66 s
[really-safe-money-gen] Configured component graph:
- 20.66 s
[really-safe-money-gen] component really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.66 s
[really-safe-money-gen] include QuickCheck-2.15.0.1-2886bjxlOc222GFUIJ2dTf
- 20.66 s
[really-safe-money-gen] include base-4.20.2.0-69bc
- 20.66 s
[really-safe-money-gen] include genvalidity-1.1.1.0-C6lgfryVTNPDfTwCfdEzxl
- 20.66 s
[really-safe-money-gen] include genvalidity-containers-1.0.0.2-2lzNb8Y5dc2IJ6H0tDNeRX
- 20.66 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-L7n7qjdD2rt4pGhbIRDq5i
- 20.66 s
[really-safe-money-gen] component really-safe-money-gen-0.0.0.0-4eeDNd301Ib3lEQOGg1XlW-really-safe-money-test
- 20.66 s
[really-safe-money-gen] include base-4.20.2.0-69bc
- 20.66 s
[really-safe-money-gen] include containers-0.7-9663
- 20.66 s
[really-safe-money-gen] include genvalidity-sydtest-1.0.1.0-I5M8BpDXHCR6j7xVOiLeXL
- 20.66 s
[really-safe-money-gen] include genvalidity-vector-1.0.0.0-9MA0WAllRyX6yuBtKHvMqx
- 20.66 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-L7n7qjdD2rt4pGhbIRDq5i
- 20.66 s
[really-safe-money-gen] include really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.66 s
[really-safe-money-gen] include sydtest-0.23.0.2-9qDUZCgIzZAHN3zck4m6UZ
- 20.66 s
[really-safe-money-gen] include vector-0.13.2.0-8h07OZ6cN9Hc7tYmpamTf
- 20.66 s
[really-safe-money-gen] Linked component graph:
- 20.66 s
[really-safe-money-gen] unit really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.66 s
[really-safe-money-gen] include QuickCheck-2.15.0.1-2886bjxlOc222GFUIJ2dTf
- 20.66 s
[really-safe-money-gen] include base-4.20.2.0-69bc
- 20.66 s
[really-safe-money-gen] include genvalidity-1.1.1.0-C6lgfryVTNPDfTwCfdEzxl
- 20.66 s
[really-safe-money-gen] include genvalidity-containers-1.0.0.2-2lzNb8Y5dc2IJ6H0tDNeRX
- 20.66 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-L7n7qjdD2rt4pGhbIRDq5i
- 20.66 s
[really-safe-money-gen] Money.Account.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.Account.Gen,Money.AccountOf.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.AccountOf.Gen,Money.Amount.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.Amount.Gen,Money.AmountOf.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.AmountOf.Gen,Money.ConversionRate.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.ConversionRate.Gen,Money.ConversionRateOf.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.ConversionRateOf.Gen,Money.Currency.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.Currency.Gen,Money.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.Gen,Money.MultiAccount.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.MultiAccount.Gen,Money.MultiAmount.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.MultiAmount.Gen,Money.QuantisationFactor.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Money.QuantisationFactor.Gen,Numeric.DecimalLiteral.Gen=really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv:Numeric.DecimalLiteral.Gen
- 20.66 s
[really-safe-money-gen] unit really-safe-money-gen-0.0.0.0-4eeDNd301Ib3lEQOGg1XlW-really-safe-money-test
- 20.66 s
[really-safe-money-gen] include base-4.20.2.0-69bc
- 20.66 s
[really-safe-money-gen] include containers-0.7-9663
- 20.66 s
[really-safe-money-gen] include genvalidity-sydtest-1.0.1.0-I5M8BpDXHCR6j7xVOiLeXL
- 20.66 s
[really-safe-money-gen] include genvalidity-vector-1.0.0.0-9MA0WAllRyX6yuBtKHvMqx
- 20.66 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-L7n7qjdD2rt4pGhbIRDq5i
- 20.66 s
[really-safe-money-gen] include really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.66 s
[really-safe-money-gen] include sydtest-0.23.0.2-9qDUZCgIzZAHN3zck4m6UZ
- 20.66 s
[really-safe-money-gen] include vector-0.13.2.0-8h07OZ6cN9Hc7tYmpamTf
- 20.66 s
[really-safe-money-gen] Ready component graph:
- 20.66 s
[really-safe-money-gen] definite really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.67 s
[really-safe-money-gen] depends QuickCheck-2.15.0.1-2886bjxlOc222GFUIJ2dTf
- 20.67 s
[really-safe-money-gen] depends base-4.20.2.0-69bc
- 20.67 s
[really-safe-money-gen] depends genvalidity-1.1.1.0-C6lgfryVTNPDfTwCfdEzxl
- 20.67 s
[really-safe-money-gen] depends genvalidity-containers-1.0.0.2-2lzNb8Y5dc2IJ6H0tDNeRX
- 20.67 s
[really-safe-money-gen] depends really-safe-money-0.0.0.0-L7n7qjdD2rt4pGhbIRDq5i
- 20.67 s
[really-safe-money-gen] definite really-safe-money-gen-0.0.0.0-4eeDNd301Ib3lEQOGg1XlW-really-safe-money-test
- 20.67 s
[really-safe-money-gen] depends base-4.20.2.0-69bc
- 20.67 s
[really-safe-money-gen] depends containers-0.7-9663
- 20.67 s
[really-safe-money-gen] depends genvalidity-sydtest-1.0.1.0-I5M8BpDXHCR6j7xVOiLeXL
- 20.67 s
[really-safe-money-gen] depends genvalidity-vector-1.0.0.0-9MA0WAllRyX6yuBtKHvMqx
- 20.67 s
[really-safe-money-gen] depends really-safe-money-0.0.0.0-L7n7qjdD2rt4pGhbIRDq5i
- 20.67 s
[really-safe-money-gen] depends really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.67 s
[really-safe-money-gen] depends sydtest-0.23.0.2-9qDUZCgIzZAHN3zck4m6UZ
- 20.67 s
[really-safe-money-gen] depends vector-0.13.2.0-8h07OZ6cN9Hc7tYmpamTf
- 20.67 s
[really-safe-money-gen] Using Cabal-3.12.1.0 compiled by ghc-9.10
- 20.67 s
[really-safe-money-gen] Using compiler: ghc-9.10.3
- 20.67 s
[really-safe-money-gen] Using install prefix:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0
- 20.67 s
[really-safe-money-gen] Executables installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0/bin
- 20.67 s
[really-safe-money-gen] Libraries installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-c151/really-safe-money-gen-0.0.0.0-6WaElmpWHjxJDN4REgLguv
- 20.67 s
[really-safe-money-gen] Dynamic Libraries installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-c151
- 20.67 s
[really-safe-money-gen] Private executables installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0/libexec/x86_64-linux-ghc-9.10.3-c151/really-safe-money-gen-0.0.0.0
- 20.67 s
[really-safe-money-gen] Data files installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0/share/x86_64-linux-ghc-9.10.3-c151/really-safe-money-gen-0.0.0.0
- 20.67 s
[really-safe-money-gen] Documentation installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/wn0r4439smrf3d3xfq0qghvprc2z8jaz-really-safe-money-gen-0.0.0.0-doc/share/doc/really-safe-money-gen-0.0.0.0
- 20.67 s
[really-safe-money-gen] Configuration files installed in:
- 20.67 s
[really-safe-money-gen] /nix/store/7s8fcvdclifbfwxyq2ns2fhv9k74a7n0-really-safe-money-gen-0.0.0.0/etc
- 20.67 s
[really-safe-money-gen] No alex found
- 20.67 s
[really-safe-money-gen] Using ar found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/hnan7l0v68sahyxbazz5y358prz253d1-binutils-wrapper-2.44/bin/ar
- 20.67 s
[really-safe-money-gen] No c2hs found
- 20.67 s
[really-safe-money-gen] No cpphs found
- 20.67 s
[really-safe-money-gen] No doctest found
- 20.67 s
[really-safe-money-gen] Using gcc version 14.3.0 given by user at:
- 20.67 s
[really-safe-money-gen] /nix/store/kilyfvfmh9x9rlaj47ph1916lbc1pnsr-gcc-wrapper-14.3.0/bin/gcc
- 20.67 s
[really-safe-money-gen] Using ghc version 9.10.3 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/bin/ghc
- 20.67 s
[really-safe-money-gen] Using ghc-pkg version 9.10.3 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/bin/ghc-pkg-9.10.3
- 20.67 s
[really-safe-money-gen] No ghcjs found
- 20.67 s
[really-safe-money-gen] No ghcjs-pkg found
- 20.67 s
[really-safe-money-gen] No greencard found
- 20.67 s
[really-safe-money-gen] Using haddock version 2.31.1 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/bin/haddock-ghc-9.10.3
- 20.67 s
[really-safe-money-gen] No happy found
- 20.67 s
[really-safe-money-gen] Using haskell-suite found on system at: haskell-suite-dummy-location
- 20.67 s
[really-safe-money-gen] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
- 20.67 s
[really-safe-money-gen] No hmake found
- 20.67 s
[really-safe-money-gen] Using hpc version 0.69 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/bin/hpc-ghc-9.10.3
- 20.67 s
[really-safe-money-gen] Using hsc2hs version 0.68.10 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
- 20.67 s
[really-safe-money-gen] Using hscolour version 1.25 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/4f97zghyhdx2dj13mir9002n11iljwc5-hscolour-1.25/bin/HsColour
- 20.67 s
[really-safe-money-gen] No jhc found
- 20.67 s
[really-safe-money-gen] Using ld found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/kilyfvfmh9x9rlaj47ph1916lbc1pnsr-gcc-wrapper-14.3.0/bin/ld
- 20.67 s
[really-safe-money-gen] No pkg-config found
- 20.67 s
[really-safe-money-gen] Using runghc version 9.10.3 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/g22xx6fm6ghg0hfgnl7yc722xdyrmsn6-ghc-9.10.3/bin/runghc-9.10.3
- 20.67 s
[really-safe-money-gen] Using strip version 2.44 found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/kilyfvfmh9x9rlaj47ph1916lbc1pnsr-gcc-wrapper-14.3.0/bin/strip
- 20.67 s
[really-safe-money-gen] Using tar found on system at:
- 20.67 s
[really-safe-money-gen] /nix/store/df3vxyq7lwf9l02h0wljsq0h3189rp75-gnutar-1.35/bin/tar
- 20.67 s
[really-safe-money-gen] No uhc found
- 21.40 s
[really-safe-money-gen] Phase: buildPhase
- 21.47 s
[really-safe-money-gen] Preprocessing library for really-safe-money-gen-0.0.0.0...
- 21.47 s
[really-safe-money-gen] Building library for really-safe-money-gen-0.0.0.0...
- 21.57 s
[really-safe-money-gen] [ 1 of 13] Compiling Money.Amount.Gen ( src/Money/Amount/Gen.hs, dist/build/Money/Amount/Gen.o, dist/build/Money/Amount/Gen.dyn_o )
- 21.86 s
[really-safe-money-gen] [ 2 of 13] Compiling Money.Account.Gen ( src/Money/Account/Gen.hs, dist/build/Money/Account/Gen.o, dist/build/Money/Account/Gen.dyn_o )
- 21.94 s
[really-safe-money-gen] [ 3 of 13] Compiling Money.AccountOf.Gen ( src/Money/AccountOf/Gen.hs, dist/build/Money/AccountOf/Gen.o, dist/build/Money/AccountOf/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [ 4 of 13] Compiling Money.AmountOf.Gen ( src/Money/AmountOf/Gen.hs, dist/build/Money/AmountOf/Gen.o, dist/build/Money/AmountOf/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [ 5 of 13] Compiling Money.ConversionRate.Gen ( src/Money/ConversionRate/Gen.hs, dist/build/Money/ConversionRate/Gen.o, dist/build/Money/ConversionRate/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [ 6 of 13] Compiling Money.ConversionRateOf.Gen ( src/Money/ConversionRateOf/Gen.hs, dist/build/Money/ConversionRateOf/Gen.o, dist/build/Money/ConversionRateOf/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [ 7 of 13] Compiling Money.QuantisationFactor.Gen ( src/Money/QuantisationFactor/Gen.hs, dist/build/Money/QuantisationFactor/Gen.o, dist/build/Money/QuantisationFactor/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [ 8 of 13] Compiling Money.Currency.Gen ( src/Money/Currency/Gen.hs, dist/build/Money/Currency/Gen.o, dist/build/Money/Currency/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [ 9 of 13] Compiling Money.MultiAmount.Gen ( src/Money/MultiAmount/Gen.hs, dist/build/Money/MultiAmount/Gen.o, dist/build/Money/MultiAmount/Gen.dyn_o )
- 21.99 s
[really-safe-money-gen] [10 of 13] Compiling Money.MultiAccount.Gen ( src/Money/MultiAccount/Gen.hs, dist/build/Money/MultiAccount/Gen.o, dist/build/Money/MultiAccount/Gen.dyn_o )
- 22.01 s
[really-safe-money-gen] [11 of 13] Compiling Money.Gen ( src/Money/Gen.hs, dist/build/Money/Gen.o, dist/build/Money/Gen.dyn_o )
- 22.04 s
[really-safe-money-gen] [12 of 13] Compiling Numeric.DecimalLiteral.Gen ( src/Numeric/DecimalLiteral/Gen.hs, dist/build/Numeric/DecimalLiteral/Gen.o, dist/build/Numeric/DecimalLiteral/Gen.dyn_o )
- 22.04 s
[really-safe-money-gen] [13 of 13] Compiling Paths_really_safe_money_gen ( dist/build/autogen/Paths_really_safe_money_gen.hs, dist/build/Paths_really_safe_money_gen.o, dist/build/Paths_really_safe_money_gen.dyn_o )
- 22.20 s
[really-safe-money-gen] [ 1 of 13] Compiling Money.Amount.Gen ( src/Money/Amount/Gen.hs, dist/build/Money/Amount/Gen.p_o )
- 22.64 s
[really-safe-money-gen] [ 2 of 13] Compiling Money.Account.Gen ( src/Money/Account/Gen.hs, dist/build/Money/Account/Gen.p_o )
- 22.91 s
[really-safe-money-gen] [ 3 of 13] Compiling Money.AccountOf.Gen ( src/Money/AccountOf/Gen.hs, dist/build/Money/AccountOf/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [ 4 of 13] Compiling Money.AmountOf.Gen ( src/Money/AmountOf/Gen.hs, dist/build/Money/AmountOf/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [ 5 of 13] Compiling Money.ConversionRate.Gen ( src/Money/ConversionRate/Gen.hs, dist/build/Money/ConversionRate/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [ 6 of 13] Compiling Money.ConversionRateOf.Gen ( src/Money/ConversionRateOf/Gen.hs, dist/build/Money/ConversionRateOf/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [ 7 of 13] Compiling Money.QuantisationFactor.Gen ( src/Money/QuantisationFactor/Gen.hs, dist/build/Money/QuantisationFactor/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [ 8 of 13] Compiling Money.Currency.Gen ( src/Money/Currency/Gen.hs, dist/build/Money/Currency/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [ 9 of 13] Compiling Money.MultiAmount.Gen ( src/Money/MultiAmount/Gen.hs, dist/build/Money/MultiAmount/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [10 of 13] Compiling Money.MultiAccount.Gen ( src/Money/MultiAccount/Gen.hs, dist/build/Money/MultiAccount/Gen.p_o )
- 23.24 s
[really-safe-money-gen] [11 of 13] Compiling Money.Gen ( src/Money/Gen.hs, dist/build/Money/Gen.p_o )
- 23.44 s
[really-safe-money-gen] [12 of 13] Compiling Numeric.DecimalLiteral.Gen ( src/Numeric/DecimalLiteral/Gen.hs, dist/build/Numeric/DecimalLiteral/Gen.p_o )
- 23.44 s
[really-safe-money-gen] [13 of 13] Compiling Paths_really_safe_money_gen ( dist/build/autogen/Paths_really_safe_money_gen.hs, dist/build/Paths_really_safe_money_gen.p_o )
- 25.23 s
[really-safe-money-gen] Preprocessing test suite 'really-safe-money-test' for really-safe-money-gen-0.0.0.0...
- 25.23 s
[really-safe-money-gen] Building test suite 'really-safe-money-test' for really-safe-money-gen-0.0.0.0...
- 25.40 s
[really-safe-money-gen] [ 1 of 14] Compiling Money.AccountSpec ( test/Money/AccountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AccountSpec.o )
- 27.88 s
[really-safe-money-gen] [ 2 of 14] Compiling Money.AmountSpec ( test/Money/AmountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AmountSpec.o )
- 28.09 s
[really-safe-money-gen] [ 3 of 14] Compiling Money.ConversionRateSpec ( test/Money/ConversionRateSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/ConversionRateSpec.o )
- 28.09 s
[really-safe-money-gen] [ 4 of 14] Compiling Money.Currency.TestUtils ( test/Money/Currency/TestUtils.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/Currency/TestUtils.o )
- 28.09 s
[really-safe-money-gen] [ 5 of 14] Compiling Money.ConversionRateOfSpec ( test/Money/ConversionRateOfSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/ConversionRateOfSpec.o )
- 28.09 s
[really-safe-money-gen] [ 6 of 14] Compiling Money.AmountOfSpec ( test/Money/AmountOfSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AmountOfSpec.o )
- 28.09 s
[really-safe-money-gen] [ 7 of 14] Compiling Money.AccountOfSpec ( test/Money/AccountOfSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AccountOfSpec.o )
- 28.09 s
[really-safe-money-gen] [ 8 of 14] Compiling Money.CurrencySpec ( test/Money/CurrencySpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/CurrencySpec.o )
- 28.09 s
[really-safe-money-gen] [ 9 of 14] Compiling Money.MultiAccountSpec ( test/Money/MultiAccountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/MultiAccountSpec.o )
- 28.09 s
[really-safe-money-gen] [10 of 14] Compiling Money.MultiAmountSpec ( test/Money/MultiAmountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/MultiAmountSpec.o )
- 28.09 s
[really-safe-money-gen] [11 of 14] Compiling Money.QuantisationFactorSpec ( test/Money/QuantisationFactorSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/QuantisationFactorSpec.o )
- 28.09 s
[really-safe-money-gen] [12 of 14] Compiling Numeric.DecimalLiteralSpec ( test/Numeric/DecimalLiteralSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Numeric/DecimalLiteralSpec.o )
- 28.09 s
[really-safe-money-gen] [13 of 14] Compiling Main ( test/Spec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Main.o )
- 28.15 s
[really-safe-money-gen] [14 of 14] Compiling Paths_really_safe_money_gen ( dist/build/really-safe-money-test/autogen/Paths_really_safe_money_gen.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Paths_really_safe_money_gen.o )
- 28.42 s
[really-safe-money-gen] [15 of 15] Linking dist/build/really-safe-money-test/really-safe-money-test
- 30.45 s
[really-safe-money-gen] Phase: checkPhase
- 30.47 s
[really-safe-money-gen] mutation-nix: collecting per-test coverage
- 379.00 s
[really-safe-money-gen] mutation-nix: running mutations
- 379.05 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:87:27-28:
- 379.07 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
- 379.07 s
[really-safe-money-gen] fromDecimalLiteral dl = do
- 379.07 s
[really-safe-money-gen] irat <-
- 379.07 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
- 379.07 s
[really-safe-money-gen] - in if numerator r == 0
- 379.07 s
[really-safe-money-gen] + in if numerator r == 1
- 379.07 s
[really-safe-money-gen] then Nothing
- 379.07 s
[really-safe-money-gen] else pure r
- 379.07 s
[really-safe-money-gen]
- 379.07 s
[really-safe-money-gen]
- 379.15 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28:
- 379.15 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
- 379.15 s
[really-safe-money-gen] fromDecimalLiteral dl = do
- 379.15 s
[really-safe-money-gen] irat <-
- 379.15 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
- 379.15 s
[really-safe-money-gen] - in if numerator r == 0
- 379.15 s
[really-safe-money-gen] + in if False
- 379.15 s
[really-safe-money-gen] then Nothing
- 379.15 s
[really-safe-money-gen] else pure r
- 379.15 s
[really-safe-money-gen]
- 379.15 s
[really-safe-money-gen]
- 379.86 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28:
- 379.87 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
- 379.87 s
[really-safe-money-gen] fromDecimalLiteral dl = do
- 379.87 s
[really-safe-money-gen] irat <-
- 379.87 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
- 379.87 s
[really-safe-money-gen] - in if numerator r == 0
- 379.87 s
[really-safe-money-gen] + in if False
- 379.87 s
[really-safe-money-gen] then Nothing
- 379.87 s
[really-safe-money-gen] else pure r
- 379.87 s
[really-safe-money-gen]
- 379.87 s
[really-safe-money-gen]
- 380.57 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:87:12-28:
- 380.57 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
- 380.57 s
[really-safe-money-gen] fromDecimalLiteral dl = do
- 380.57 s
[really-safe-money-gen] irat <-
- 380.57 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
- 380.57 s
[really-safe-money-gen] - in if numerator r == 0
- 380.57 s
[really-safe-money-gen] + in if not (numerator r == 0)
- 380.57 s
[really-safe-money-gen] then Nothing
- 380.57 s
[really-safe-money-gen] else pure r
- 380.57 s
[really-safe-money-gen]
- 380.57 s
[really-safe-money-gen]
- 409.44 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/QuantisationFactor.hs:87:9-22:
- 409.46 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
- 409.46 s
[really-safe-money-gen] fromDecimalLiteral dl = do
- 409.46 s
[really-safe-money-gen] irat <-
- 409.46 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
- 409.46 s
[really-safe-money-gen] - in if numerator r == 0
- 409.46 s
[really-safe-money-gen] + in if numerator r == 0
- 409.46 s
[really-safe-money-gen] then Nothing
- 409.46 s
[really-safe-money-gen] else pure r
- 409.46 s
[really-safe-money-gen]
- 409.46 s
[really-safe-money-gen]
- 438.43 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14:
- 438.43 s
[really-safe-money-gen] @@ -89,7 +89,7 @@
- 438.45 s
[really-safe-money-gen] else pure r
- 438.45 s
[really-safe-money-gen]
- 438.45 s
[really-safe-money-gen] rat <-
- 438.45 s
[really-safe-money-gen] - let r = 1 / irat
- 438.45 s
[really-safe-money-gen] + let r = -1 / irat
- 438.45 s
[really-safe-money-gen] in if r < 0
- 438.45 s
[really-safe-money-gen] then Nothing
- 438.45 s
[really-safe-money-gen] else Just r
- 438.45 s
[really-safe-money-gen]
- 438.53 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14:
- 438.53 s
[really-safe-money-gen] @@ -89,7 +89,7 @@
- 438.53 s
[really-safe-money-gen] else pure r
- 438.53 s
[really-safe-money-gen]
- 438.53 s
[really-safe-money-gen] rat <-
- 438.53 s
[really-safe-money-gen] - let r = 1 / irat
- 438.53 s
[really-safe-money-gen] + let r = -1 / irat
- 438.53 s
[really-safe-money-gen] in if r < 0
- 438.53 s
[really-safe-money-gen] then Nothing
- 438.53 s
[really-safe-money-gen] else Just r
- 438.53 s
[really-safe-money-gen]
- 438.63 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:93:16-17:
- 438.63 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
- 438.63 s
[really-safe-money-gen]
- 438.63 s
[really-safe-money-gen] rat <-
- 438.63 s
[really-safe-money-gen] let r = 1 / irat
- 438.64 s
[really-safe-money-gen] - in if r < 0
- 438.64 s
[really-safe-money-gen] + in if r < 1
- 438.64 s
[really-safe-money-gen] then Nothing
- 438.64 s
[really-safe-money-gen] else Just r
- 438.64 s
[really-safe-money-gen]
- 438.64 s
[really-safe-money-gen]
- 438.74 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17:
- 438.74 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
- 438.74 s
[really-safe-money-gen]
- 438.74 s
[really-safe-money-gen] rat <-
- 438.74 s
[really-safe-money-gen] let r = 1 / irat
- 438.74 s
[really-safe-money-gen] - in if r < 0
- 438.74 s
[really-safe-money-gen] + in if False
- 438.74 s
[really-safe-money-gen] then Nothing
- 438.74 s
[really-safe-money-gen] else Just r
- 438.74 s
[really-safe-money-gen]
- 438.74 s
[really-safe-money-gen]
- 439.57 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17:
- 439.57 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
- 439.57 s
[really-safe-money-gen]
- 439.57 s
[really-safe-money-gen] rat <-
- 439.57 s
[really-safe-money-gen] let r = 1 / irat
- 439.57 s
[really-safe-money-gen] - in if r < 0
- 439.57 s
[really-safe-money-gen] + in if False
- 439.57 s
[really-safe-money-gen] then Nothing
- 439.57 s
[really-safe-money-gen] else Just r
- 439.57 s
[really-safe-money-gen]
- 439.57 s
[really-safe-money-gen]
- 440.37 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:93:12-17:
- 440.37 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
- 440.37 s
[really-safe-money-gen]
- 440.37 s
[really-safe-money-gen] rat <-
- 440.37 s
[really-safe-money-gen] let r = 1 / irat
- 440.37 s
[really-safe-money-gen] - in if r < 0
- 440.37 s
[really-safe-money-gen] + in if not (r < 0)
- 440.37 s
[really-safe-money-gen] then Nothing
- 440.37 s
[really-safe-money-gen] else Just r
- 440.37 s
[really-safe-money-gen]
- 440.37 s
[really-safe-money-gen]
- 441.03 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/QuantisationFactor.hs:93:9-22:
- 441.03 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
- 441.03 s
[really-safe-money-gen]
- 441.03 s
[really-safe-money-gen] rat <-
- 441.03 s
[really-safe-money-gen] let r = 1 / irat
- 441.03 s
[really-safe-money-gen] - in if r < 0
- 441.03 s
[really-safe-money-gen] + in if r < 0
- 441.03 s
[really-safe-money-gen] then Nothing
- 441.03 s
[really-safe-money-gen] else Just r
- 441.03 s
[really-safe-money-gen]
- 441.03 s
[really-safe-money-gen]
- 441.66 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28:
- 441.66 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
- 441.66 s
[really-safe-money-gen] else Just r
- 441.66 s
[really-safe-money-gen]
- 441.66 s
[really-safe-money-gen] fac <-
- 441.66 s
[really-safe-money-gen] - if denominator rat == 1
- 441.66 s
[really-safe-money-gen] + if denominator rat == -1
- 441.66 s
[really-safe-money-gen] then Just (numerator rat)
- 441.66 s
[really-safe-money-gen] else Nothing
- 441.66 s
[really-safe-money-gen]
- 441.66 s
[really-safe-money-gen]
- 441.80 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28:
- 441.81 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
- 441.81 s
[really-safe-money-gen] else Just r
- 441.81 s
[really-safe-money-gen]
- 441.81 s
[really-safe-money-gen] fac <-
- 441.81 s
[really-safe-money-gen] - if denominator rat == 1
- 441.81 s
[really-safe-money-gen] + if denominator rat == -1
- 441.81 s
[really-safe-money-gen] then Just (numerator rat)
- 441.81 s
[really-safe-money-gen] else Nothing
- 441.81 s
[really-safe-money-gen]
- 441.81 s
[really-safe-money-gen]
- 441.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28:
- 441.91 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
- 441.91 s
[really-safe-money-gen] else Just r
- 441.91 s
[really-safe-money-gen]
- 441.91 s
[really-safe-money-gen] fac <-
- 441.91 s
[really-safe-money-gen] - if denominator rat == 1
- 441.91 s
[really-safe-money-gen] + if False
- 441.91 s
[really-safe-money-gen] then Just (numerator rat)
- 441.91 s
[really-safe-money-gen] else Nothing
- 441.91 s
[really-safe-money-gen]
- 441.91 s
[really-safe-money-gen]
- 442.44 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28:
- 442.44 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
- 442.44 s
[really-safe-money-gen] else Just r
- 442.44 s
[really-safe-money-gen]
- 442.44 s
[really-safe-money-gen] fac <-
- 442.44 s
[really-safe-money-gen] - if denominator rat == 1
- 442.44 s
[really-safe-money-gen] + if False
- 442.44 s
[really-safe-money-gen] then Just (numerator rat)
- 442.44 s
[really-safe-money-gen] else Nothing
- 442.44 s
[really-safe-money-gen]
- 442.44 s
[really-safe-money-gen]
- 442.98 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:98:8-28:
- 442.98 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
- 442.98 s
[really-safe-money-gen] else Just r
- 442.98 s
[really-safe-money-gen]
- 442.98 s
[really-safe-money-gen] fac <-
- 442.98 s
[really-safe-money-gen] - if denominator rat == 1
- 442.99 s
[really-safe-money-gen] + if not (denominator rat == 1)
- 442.99 s
[really-safe-money-gen] then Just (numerator rat)
- 442.99 s
[really-safe-money-gen] else Nothing
- 442.99 s
[really-safe-money-gen]
- 442.99 s
[really-safe-money-gen]
- 443.50 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/QuantisationFactor.hs:98:5-19:
- 443.54 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
- 443.54 s
[really-safe-money-gen] else Just r
- 443.54 s
[really-safe-money-gen]
- 443.54 s
[really-safe-money-gen] fac <-
- 443.55 s
[really-safe-money-gen] - if denominator rat == 1
- 443.55 s
[really-safe-money-gen] + if denominator rat == 1
- 443.55 s
[really-safe-money-gen] then Just (numerator rat)
- 443.55 s
[really-safe-money-gen] else Nothing
- 443.55 s
[really-safe-money-gen]
- 443.55 s
[really-safe-money-gen]
- 444.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46:
- 444.06 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
- 444.06 s
[really-safe-money-gen] then Just (numerator rat)
- 444.06 s
[really-safe-money-gen] else Nothing
- 444.06 s
[really-safe-money-gen]
- 444.06 s
[really-safe-money-gen] - if fac <= fromIntegral (maxBound :: Word32)
- 444.06 s
[really-safe-money-gen] + if False
- 444.06 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
- 444.06 s
[really-safe-money-gen] else Nothing
- 444.06 s
[really-safe-money-gen]
- 444.59 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46:
- 444.59 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
- 444.59 s
[really-safe-money-gen] then Just (numerator rat)
- 444.59 s
[really-safe-money-gen] else Nothing
- 444.59 s
[really-safe-money-gen]
- 444.59 s
[really-safe-money-gen] - if fac <= fromIntegral (maxBound :: Word32)
- 444.59 s
[really-safe-money-gen] + if False
- 444.59 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
- 444.59 s
[really-safe-money-gen] else Nothing
- 444.59 s
[really-safe-money-gen]
- 445.11 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:102:6-46:
- 445.11 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
- 445.11 s
[really-safe-money-gen] then Just (numerator rat)
- 445.11 s
[really-safe-money-gen] else Nothing
- 445.11 s
[really-safe-money-gen]
- 445.11 s
[really-safe-money-gen] - if fac <= fromIntegral (maxBound :: Word32)
- 445.11 s
[really-safe-money-gen] + if not (fac <= fromIntegral (maxBound :: Word32))
- 445.11 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
- 445.11 s
[really-safe-money-gen] else Nothing
- 445.11 s
[really-safe-money-gen]
- 445.64 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68:
- 445.64 s
[really-safe-money-gen] @@ -64,7 +64,7 @@
- 445.64 s
[really-safe-money-gen] -- Just (DecimalLiteral Nothing 1 0)
- 445.64 s
[really-safe-money-gen] toDecimalLiteral :: QuantisationFactor -> Maybe DecimalLiteral
- 445.64 s
[really-safe-money-gen] toDecimalLiteral (QuantisationFactor qfw) =
- 445.64 s
[really-safe-money-gen] - DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational (1 % fromIntegral qfw)
- 445.64 s
[really-safe-money-gen] + DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational (-1 % fromIntegral qfw)
- 445.64 s
[really-safe-money-gen]
- 445.64 s
[really-safe-money-gen] -- | Parse a 'QuantisationFactor' from a 'DecimalLiteral' that represents the smallest unit
- 445.64 s
[really-safe-money-gen] -- TODO explain that it's the inverse.
- 445.64 s
[really-safe-money-gen]
- 446.17 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68:
- 446.17 s
[really-safe-money-gen] @@ -64,7 +64,7 @@
- 446.17 s
[really-safe-money-gen] -- Just (DecimalLiteral Nothing 1 0)
- 446.17 s
[really-safe-money-gen] toDecimalLiteral :: QuantisationFactor -> Maybe DecimalLiteral
- 446.17 s
[really-safe-money-gen] toDecimalLiteral (QuantisationFactor qfw) =
- 446.17 s
[really-safe-money-gen] - DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational (1 % fromIntegral qfw)
- 446.17 s
[really-safe-money-gen] + DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational (-1 % fromIntegral qfw)
- 446.17 s
[really-safe-money-gen]
- 446.17 s
[really-safe-money-gen] -- | Parse a 'QuantisationFactor' from a 'DecimalLiteral' that represents the smallest unit
- 446.17 s
[really-safe-money-gen] -- TODO explain that it's the inverse.
- 446.17 s
[really-safe-money-gen]
- 446.68 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:40:62-63:
- 446.68 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
- 446.68 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
- 446.68 s
[really-safe-money-gen] mconcat
- 446.68 s
[really-safe-money-gen] [ genericValidate qf,
- 446.68 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
- 446.68 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ w /= 1
- 446.68 s
[really-safe-money-gen] ]
- 446.68 s
[really-safe-money-gen]
- 446.68 s
[really-safe-money-gen] instance NFData QuantisationFactor
- 446.68 s
[really-safe-money-gen]
- 446.70 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63:
- 446.70 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
- 446.70 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
- 446.70 s
[really-safe-money-gen] mconcat
- 446.70 s
[really-safe-money-gen] [ genericValidate qf,
- 446.70 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
- 446.70 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ False
- 446.70 s
[really-safe-money-gen] ]
- 446.70 s
[really-safe-money-gen]
- 446.70 s
[really-safe-money-gen] instance NFData QuantisationFactor
- 446.70 s
[really-safe-money-gen]
- 447.57 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63:
- 447.57 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
- 447.57 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
- 447.57 s
[really-safe-money-gen] mconcat
- 447.57 s
[really-safe-money-gen] [ genericValidate qf,
- 447.57 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
- 447.57 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ False
- 447.57 s
[really-safe-money-gen] ]
- 447.57 s
[really-safe-money-gen]
- 447.57 s
[really-safe-money-gen] instance NFData QuantisationFactor
- 447.57 s
[really-safe-money-gen]
- 448.43 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:40:57-63:
- 448.43 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
- 448.43 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
- 448.43 s
[really-safe-money-gen] mconcat
- 448.43 s
[really-safe-money-gen] [ genericValidate qf,
- 448.43 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
- 448.43 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ not (w /= 0)
- 448.43 s
[really-safe-money-gen] ]
- 448.43 s
[really-safe-money-gen]
- 448.43 s
[really-safe-money-gen] instance NFData QuantisationFactor
- 448.43 s
[really-safe-money-gen]
- 448.52 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8:
- 448.52 s
[really-safe-money-gen] @@ -36,7 +36,7 @@
- 448.54 s
[really-safe-money-gen] instance Validity QuantisationFactor where
- 448.54 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
- 448.54 s
[really-safe-money-gen] mconcat
- 448.54 s
[really-safe-money-gen] - [ genericValidate qf,
- 448.54 s
[really-safe-money-gen] + [ genericValidate qf,
- 448.54 s
[really-safe-money-gen] declare "The quantisation factor is not zero" $ w /= 0
- 448.54 s
[really-safe-money-gen] ]
- 448.54 s
[really-safe-money-gen]
- 448.54 s
[really-safe-money-gen]
- 449.27 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8:
- 449.27 s
[really-safe-money-gen] @@ -36,7 +36,7 @@
- 449.27 s
[really-safe-money-gen] instance Validity QuantisationFactor where
- 449.27 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
- 449.27 s
[really-safe-money-gen] mconcat
- 449.27 s
[really-safe-money-gen] - [ genericValidate qf,
- 449.27 s
[really-safe-money-gen] + [ genericValidate qf,
- 449.27 s
[really-safe-money-gen] declare "The quantisation factor is not zero" $ w /= 0
- 449.27 s
[really-safe-money-gen] ]
- 449.27 s
[really-safe-money-gen]
- 449.27 s
[really-safe-money-gen]
- 450.02 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:801:36-38:
- 450.02 s
[really-safe-money-gen] @@ -798,7 +798,7 @@
- 450.02 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor 0) = "%f"
- 450.02 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor qf) =
- 450.02 s
[really-safe-money-gen] let decimals :: Int
- 450.02 s
[really-safe-money-gen] - decimals = ceiling $ logBase 10 (fromIntegral qf :: Float)
- 450.02 s
[really-safe-money-gen] + decimals = ceiling $ logBase -10 (fromIntegral qf :: Float)
- 450.02 s
[really-safe-money-gen] in printf "%%0.%df" decimals
- 450.02 s
[really-safe-money-gen]
- 450.02 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
- 450.02 s
[really-safe-money-gen]
- 450.10 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:801:36-38:
- 450.10 s
[really-safe-money-gen] @@ -798,7 +798,7 @@
- 450.10 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor 0) = "%f"
- 450.10 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor qf) =
- 450.10 s
[really-safe-money-gen] let decimals :: Int
- 450.10 s
[really-safe-money-gen] - decimals = ceiling $ logBase 10 (fromIntegral qf :: Float)
- 450.11 s
[really-safe-money-gen] + decimals = ceiling $ logBase -10 (fromIntegral qf :: Float)
- 450.11 s
[really-safe-money-gen] in printf "%%0.%df" decimals
- 450.11 s
[really-safe-money-gen]
- 450.11 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
- 450.11 s
[really-safe-money-gen]
- 450.18 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:801:36-38:
- 450.18 s
[really-safe-money-gen] @@ -798,7 +798,7 @@
- 450.18 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor 0) = "%f"
- 450.18 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor qf) =
- 450.18 s
[really-safe-money-gen] let decimals :: Int
- 450.18 s
[really-safe-money-gen] - decimals = ceiling $ logBase 10 (fromIntegral qf :: Float)
- 450.18 s
[really-safe-money-gen] + decimals = ceiling $ logBase -10 (fromIntegral qf :: Float)
- 450.18 s
[really-safe-money-gen] in printf "%%0.%df" decimals
- 450.18 s
[really-safe-money-gen]
- 450.18 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
- 450.18 s
[really-safe-money-gen]
- 450.26 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:569:18-19:
- 450.26 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
- 450.26 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
- 450.26 s
[really-safe-money-gen] smallerChunk :: Amount
- 450.26 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
- 450.26 s
[really-safe-money-gen] - in if rest == 0
- 450.26 s
[really-safe-money-gen] + in if rest == 1
- 450.26 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
- 450.26 s
[really-safe-money-gen] else
- 450.26 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
- 450.26 s
[really-safe-money-gen]
- 450.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:569:10-19:
- 450.26 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
- 450.26 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
- 450.26 s
[really-safe-money-gen] smallerChunk :: Amount
- 450.26 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
- 450.26 s
[really-safe-money-gen] - in if rest == 0
- 450.26 s
[really-safe-money-gen] + in if False
- 450.26 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
- 450.26 s
[really-safe-money-gen] else
- 450.26 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
- 450.26 s
[really-safe-money-gen]
- 450.54 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:569:10-19:
- 450.54 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
- 450.54 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
- 450.54 s
[really-safe-money-gen] smallerChunk :: Amount
- 450.54 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
- 450.54 s
[really-safe-money-gen] - in if rest == 0
- 450.54 s
[really-safe-money-gen] + in if False
- 450.54 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
- 450.54 s
[really-safe-money-gen] else
- 450.54 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
- 450.54 s
[really-safe-money-gen]
- 450.80 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:569:10-19:
- 450.80 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
- 450.80 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
- 450.80 s
[really-safe-money-gen] smallerChunk :: Amount
- 450.80 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
- 450.80 s
[really-safe-money-gen] - in if rest == 0
- 450.80 s
[really-safe-money-gen] + in if not (rest == 0)
- 450.80 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
- 450.80 s
[really-safe-money-gen] else
- 450.80 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
- 450.80 s
[really-safe-money-gen]
- 451.07 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:569:7-29:
- 451.07 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
- 451.07 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
- 451.07 s
[really-safe-money-gen] smallerChunk :: Amount
- 451.07 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
- 451.07 s
[really-safe-money-gen] - in if rest == 0
- 451.07 s
[really-safe-money-gen] + in if rest == 0
- 451.07 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
- 451.07 s
[really-safe-money-gen] else
- 451.07 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
- 451.07 s
[really-safe-money-gen]
- 451.34 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:544:10-23:
- 451.34 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
- 451.34 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
- 451.34 s
[really-safe-money-gen] r :: Integer
- 451.34 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
- 451.34 s
[really-safe-money-gen] - in if r > maxBoundI
- 451.34 s
[really-safe-money-gen] + in if False
- 451.34 s
[really-safe-money-gen] then Nothing
- 451.34 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 451.34 s
[really-safe-money-gen]
- 451.34 s
[really-safe-money-gen]
- 452.07 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:544:10-23:
- 452.07 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
- 452.07 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
- 452.07 s
[really-safe-money-gen] r :: Integer
- 452.07 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
- 452.07 s
[really-safe-money-gen] - in if r > maxBoundI
- 452.07 s
[really-safe-money-gen] + in if False
- 452.07 s
[really-safe-money-gen] then Nothing
- 452.07 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 452.07 s
[really-safe-money-gen]
- 452.07 s
[really-safe-money-gen]
- 452.84 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:544:10-23:
- 452.84 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
- 452.84 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
- 452.84 s
[really-safe-money-gen] r :: Integer
- 452.84 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
- 452.84 s
[really-safe-money-gen] - in if r > maxBoundI
- 452.84 s
[really-safe-money-gen] + in if not (r > maxBoundI)
- 452.84 s
[really-safe-money-gen] then Nothing
- 452.84 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 452.84 s
[really-safe-money-gen]
- 452.84 s
[really-safe-money-gen]
- 453.84 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:544:7-66:
- 453.84 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
- 453.84 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
- 453.88 s
[really-safe-money-gen] r :: Integer
- 453.88 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
- 453.88 s
[really-safe-money-gen] - in if r > maxBoundI
- 453.88 s
[really-safe-money-gen] + in if r > maxBoundI
- 453.88 s
[really-safe-money-gen] then Nothing
- 453.88 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 453.88 s
[really-safe-money-gen]
- 453.88 s
[really-safe-money-gen]
- 454.85 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:518:14-15:
- 454.85 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
- 454.85 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
- 454.85 s
[really-safe-money-gen] r :: Integer
- 454.85 s
[really-safe-money-gen] r = i1 - i2
- 454.85 s
[really-safe-money-gen] - in if r < 0
- 454.85 s
[really-safe-money-gen] + in if r < 1
- 454.85 s
[really-safe-money-gen] then Nothing
- 454.85 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 454.85 s
[really-safe-money-gen]
- 454.85 s
[really-safe-money-gen]
- 454.86 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:518:10-15:
- 454.86 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
- 454.86 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
- 454.86 s
[really-safe-money-gen] r :: Integer
- 454.86 s
[really-safe-money-gen] r = i1 - i2
- 454.86 s
[really-safe-money-gen] - in if r < 0
- 454.86 s
[really-safe-money-gen] + in if False
- 454.86 s
[really-safe-money-gen] then Nothing
- 454.86 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 454.86 s
[really-safe-money-gen]
- 454.86 s
[really-safe-money-gen]
- 454.94 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:518:10-15:
- 454.94 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
- 454.94 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
- 454.94 s
[really-safe-money-gen] r :: Integer
- 454.94 s
[really-safe-money-gen] r = i1 - i2
- 454.94 s
[really-safe-money-gen] - in if r < 0
- 454.95 s
[really-safe-money-gen] + in if False
- 454.95 s
[really-safe-money-gen] then Nothing
- 454.95 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 454.95 s
[really-safe-money-gen]
- 454.95 s
[really-safe-money-gen]
- 455.03 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:518:10-15:
- 455.03 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
- 455.03 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
- 455.03 s
[really-safe-money-gen] r :: Integer
- 455.03 s
[really-safe-money-gen] r = i1 - i2
- 455.03 s
[really-safe-money-gen] - in if r < 0
- 455.03 s
[really-safe-money-gen] + in if not (r < 0)
- 455.03 s
[really-safe-money-gen] then Nothing
- 455.03 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 455.03 s
[really-safe-money-gen]
- 455.03 s
[really-safe-money-gen]
- 455.16 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:518:7-66:
- 455.16 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
- 455.16 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
- 455.16 s
[really-safe-money-gen] r :: Integer
- 455.16 s
[really-safe-money-gen] r = i1 - i2
- 455.16 s
[really-safe-money-gen] - in if r < 0
- 455.16 s
[really-safe-money-gen] + in if r < 0
- 455.16 s
[really-safe-money-gen] then Nothing
- 455.16 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 455.16 s
[really-safe-money-gen]
- 455.16 s
[really-safe-money-gen]
- 455.32 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:476:10-23:
- 455.32 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
- 455.32 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 455.32 s
[really-safe-money-gen] r :: Integer
- 455.32 s
[really-safe-money-gen] r = i1 + i2
- 455.32 s
[really-safe-money-gen] - in if r > maxBoundI
- 455.32 s
[really-safe-money-gen] + in if False
- 455.32 s
[really-safe-money-gen] then Nothing
- 455.32 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 455.32 s
[really-safe-money-gen]
- 455.32 s
[really-safe-money-gen]
- 460.21 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:476:10-23:
- 460.23 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
- 460.23 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 460.23 s
[really-safe-money-gen] r :: Integer
- 460.23 s
[really-safe-money-gen] r = i1 + i2
- 460.23 s
[really-safe-money-gen] - in if r > maxBoundI
- 460.23 s
[really-safe-money-gen] + in if False
- 460.23 s
[really-safe-money-gen] then Nothing
- 460.23 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 460.23 s
[really-safe-money-gen]
- 460.23 s
[really-safe-money-gen]
- 465.17 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:476:10-23:
- 465.17 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
- 465.17 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 465.17 s
[really-safe-money-gen] r :: Integer
- 465.17 s
[really-safe-money-gen] r = i1 + i2
- 465.17 s
[really-safe-money-gen] - in if r > maxBoundI
- 465.17 s
[really-safe-money-gen] + in if not (r > maxBoundI)
- 465.17 s
[really-safe-money-gen] then Nothing
- 465.17 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 465.17 s
[really-safe-money-gen]
- 465.17 s
[really-safe-money-gen]
- 469.90 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:476:7-66:
- 469.96 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
- 469.96 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 469.96 s
[really-safe-money-gen] r :: Integer
- 469.96 s
[really-safe-money-gen] r = i1 + i2
- 469.96 s
[really-safe-money-gen] - in if r > maxBoundI
- 469.96 s
[really-safe-money-gen] + in if r > maxBoundI
- 469.96 s
[really-safe-money-gen] then Nothing
- 469.96 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 469.96 s
[really-safe-money-gen]
- 469.96 s
[really-safe-money-gen]
- 473.73 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:388:5-16:
- 473.73 s
[really-safe-money-gen] @@ -385,7 +385,7 @@
- 473.73 s
[really-safe-money-gen] -- Nothing
- 473.73 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 473.73 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 473.73 s
[really-safe-money-gen] - | isInvalid r = Nothing
- 473.73 s
[really-safe-money-gen] + | False = Nothing
- 473.73 s
[really-safe-money-gen] | r < 0 = Nothing
- 473.73 s
[really-safe-money-gen] | otherwise =
- 473.73 s
[really-safe-money-gen] let resultRational :: Rational
- 473.73 s
[really-safe-money-gen]
- 475.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:388:5-16:
- 475.26 s
[really-safe-money-gen] @@ -385,7 +385,7 @@
- 475.28 s
[really-safe-money-gen] -- Nothing
- 475.28 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 475.28 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 475.28 s
[really-safe-money-gen] - | isInvalid r = Nothing
- 475.28 s
[really-safe-money-gen] + | False = Nothing
- 475.28 s
[really-safe-money-gen] | r < 0 = Nothing
- 475.28 s
[really-safe-money-gen] | otherwise =
- 475.28 s
[really-safe-money-gen] let resultRational :: Rational
- 475.28 s
[really-safe-money-gen]
- 476.81 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:388:5-16:
- 476.81 s
[really-safe-money-gen] @@ -385,7 +385,7 @@
- 476.81 s
[really-safe-money-gen] -- Nothing
- 476.81 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 476.81 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 476.81 s
[really-safe-money-gen] - | isInvalid r = Nothing
- 476.81 s
[really-safe-money-gen] + | not (isInvalid r) = Nothing
- 476.81 s
[really-safe-money-gen] | r < 0 = Nothing
- 476.81 s
[really-safe-money-gen] | otherwise =
- 476.81 s
[really-safe-money-gen] let resultRational :: Rational
- 476.81 s
[really-safe-money-gen]
- 478.64 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:389:9-10:
- 478.64 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
- 478.64 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 478.64 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 478.64 s
[really-safe-money-gen] | isInvalid r = Nothing
- 478.64 s
[really-safe-money-gen] - | r < 0 = Nothing
- 478.64 s
[really-safe-money-gen] + | r < 1 = Nothing
- 478.64 s
[really-safe-money-gen] | otherwise =
- 478.64 s
[really-safe-money-gen] let resultRational :: Rational
- 478.64 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 478.64 s
[really-safe-money-gen]
- 478.77 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:389:5-10:
- 478.77 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
- 478.77 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 478.77 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 478.77 s
[really-safe-money-gen] | isInvalid r = Nothing
- 478.77 s
[really-safe-money-gen] - | r < 0 = Nothing
- 478.77 s
[really-safe-money-gen] + | False = Nothing
- 478.77 s
[really-safe-money-gen] | otherwise =
- 478.77 s
[really-safe-money-gen] let resultRational :: Rational
- 478.77 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 478.77 s
[really-safe-money-gen]
- 480.62 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:389:5-10:
- 480.64 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
- 480.64 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 480.65 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 480.65 s
[really-safe-money-gen] | isInvalid r = Nothing
- 480.65 s
[really-safe-money-gen] - | r < 0 = Nothing
- 480.65 s
[really-safe-money-gen] + | False = Nothing
- 480.65 s
[really-safe-money-gen] | otherwise =
- 480.65 s
[really-safe-money-gen] let resultRational :: Rational
- 480.65 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 480.65 s
[really-safe-money-gen]
- 482.45 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:389:5-10:
- 482.45 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
- 482.45 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
- 482.45 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 482.45 s
[really-safe-money-gen] | isInvalid r = Nothing
- 482.45 s
[really-safe-money-gen] - | r < 0 = Nothing
- 482.45 s
[really-safe-money-gen] + | not (r < 0) = Nothing
- 482.45 s
[really-safe-money-gen] | otherwise =
- 482.45 s
[really-safe-money-gen] let resultRational :: Rational
- 482.45 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 482.45 s
[really-safe-money-gen]
- 484.09 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:390:5-14:
- 484.09 s
[really-safe-money-gen] @@ -387,7 +387,7 @@
- 484.09 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 484.09 s
[really-safe-money-gen] | isInvalid r = Nothing
- 484.09 s
[really-safe-money-gen] | r < 0 = Nothing
- 484.09 s
[really-safe-money-gen] - | otherwise =
- 484.09 s
[really-safe-money-gen] + | False =
- 484.09 s
[really-safe-money-gen] let resultRational :: Rational
- 484.09 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 484.09 s
[really-safe-money-gen] ceiled :: Natural
- 484.09 s
[really-safe-money-gen]
- 484.22 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:390:5-14:
- 484.22 s
[really-safe-money-gen] @@ -387,7 +387,7 @@
- 484.22 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 484.22 s
[really-safe-money-gen] | isInvalid r = Nothing
- 484.22 s
[really-safe-money-gen] | r < 0 = Nothing
- 484.22 s
[really-safe-money-gen] - | otherwise =
- 484.22 s
[really-safe-money-gen] + | False =
- 484.22 s
[really-safe-money-gen] let resultRational :: Rational
- 484.22 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 484.22 s
[really-safe-money-gen] ceiled :: Natural
- 484.22 s
[really-safe-money-gen]
- 484.36 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:390:5-14:
- 484.36 s
[really-safe-money-gen] @@ -387,7 +387,7 @@
- 484.36 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
- 484.36 s
[really-safe-money-gen] | isInvalid r = Nothing
- 484.36 s
[really-safe-money-gen] | r < 0 = Nothing
- 484.36 s
[really-safe-money-gen] - | otherwise =
- 484.36 s
[really-safe-money-gen] + | not (otherwise) =
- 484.36 s
[really-safe-money-gen] let resultRational :: Rational
- 484.36 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
- 484.36 s
[really-safe-money-gen] ceiled :: Natural
- 484.36 s
[really-safe-money-gen]
- 484.48 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:397:14-31:
- 484.48 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
- 484.48 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
- 484.48 s
[really-safe-money-gen] floored :: Natural
- 484.48 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 484.48 s
[really-safe-money-gen] - in if ceiled == floored
- 484.48 s
[really-safe-money-gen] + in if False
- 484.48 s
[really-safe-money-gen] then
- 484.48 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 484.48 s
[really-safe-money-gen] then Nothing
- 484.48 s
[really-safe-money-gen]
- 537.87 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:397:14-31:
- 537.90 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
- 537.90 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
- 537.90 s
[really-safe-money-gen] floored :: Natural
- 537.90 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 537.90 s
[really-safe-money-gen] - in if ceiled == floored
- 537.90 s
[really-safe-money-gen] + in if False
- 537.90 s
[really-safe-money-gen] then
- 537.90 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 537.90 s
[really-safe-money-gen] then Nothing
- 537.90 s
[really-safe-money-gen]
- 593.81 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:397:14-31:
- 593.81 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
- 593.84 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
- 593.84 s
[really-safe-money-gen] floored :: Natural
- 593.84 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 593.84 s
[really-safe-money-gen] - in if ceiled == floored
- 593.84 s
[really-safe-money-gen] + in if not (ceiled == floored)
- 593.84 s
[really-safe-money-gen] then
- 593.84 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 593.84 s
[really-safe-money-gen] then Nothing
- 593.84 s
[really-safe-money-gen]
- 596.16 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:399:18-83:
- 596.16 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
- 596.16 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 596.16 s
[really-safe-money-gen] in if ceiled == floored
- 596.16 s
[really-safe-money-gen] then
- 596.16 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 596.16 s
[really-safe-money-gen] + if False
- 596.16 s
[really-safe-money-gen] then Nothing
- 596.16 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 596.16 s
[really-safe-money-gen] else Nothing
- 596.16 s
[really-safe-money-gen]
- 598.64 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:399:18-83:
- 598.64 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
- 598.64 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 598.64 s
[really-safe-money-gen] in if ceiled == floored
- 598.64 s
[really-safe-money-gen] then
- 598.64 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 598.64 s
[really-safe-money-gen] + if False
- 598.64 s
[really-safe-money-gen] then Nothing
- 598.64 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 598.64 s
[really-safe-money-gen] else Nothing
- 598.64 s
[really-safe-money-gen]
- 601.04 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:399:18-83:
- 601.06 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
- 601.06 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 601.06 s
[really-safe-money-gen] in if ceiled == floored
- 601.06 s
[really-safe-money-gen] then
- 601.06 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 601.06 s
[really-safe-money-gen] + if not (ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64))
- 601.06 s
[really-safe-money-gen] then Nothing
- 601.06 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 601.06 s
[really-safe-money-gen] else Nothing
- 601.06 s
[really-safe-money-gen]
- 603.41 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:399:15-57:
- 603.41 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
- 603.41 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 603.41 s
[really-safe-money-gen] in if ceiled == floored
- 603.41 s
[really-safe-money-gen] then
- 603.41 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 603.41 s
[really-safe-money-gen] + if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 603.41 s
[really-safe-money-gen] then Nothing
- 603.41 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 603.41 s
[really-safe-money-gen] else Nothing
- 603.41 s
[really-safe-money-gen]
- 605.34 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:397:11-25:
- 605.34 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
- 605.34 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
- 605.34 s
[really-safe-money-gen] floored :: Natural
- 605.34 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
- 605.34 s
[really-safe-money-gen] - in if ceiled == floored
- 605.34 s
[really-safe-money-gen] + in if ceiled == floored
- 605.34 s
[really-safe-money-gen] then
- 605.34 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 605.34 s
[really-safe-money-gen] then Nothing
- 605.34 s
[really-safe-money-gen]
- 607.54 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:320:9-10:
- 607.55 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
- 607.56 s
[really-safe-money-gen] Double ->
- 607.56 s
[really-safe-money-gen] Maybe Amount
- 607.56 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 607.56 s
[really-safe-money-gen] - | d < 0 = Nothing
- 607.56 s
[really-safe-money-gen] + | d < 1 = Nothing
- 607.56 s
[really-safe-money-gen] | otherwise =
- 607.56 s
[really-safe-money-gen] let resultDouble :: Double
- 607.56 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 607.56 s
[really-safe-money-gen]
- 607.58 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:320:5-10:
- 607.58 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
- 607.58 s
[really-safe-money-gen] Double ->
- 607.58 s
[really-safe-money-gen] Maybe Amount
- 607.58 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 607.58 s
[really-safe-money-gen] - | d < 0 = Nothing
- 607.58 s
[really-safe-money-gen] + | False = Nothing
- 607.58 s
[really-safe-money-gen] | otherwise =
- 607.58 s
[really-safe-money-gen] let resultDouble :: Double
- 607.58 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 607.58 s
[really-safe-money-gen]
- 607.86 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:320:5-10:
- 607.86 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
- 607.86 s
[really-safe-money-gen] Double ->
- 607.86 s
[really-safe-money-gen] Maybe Amount
- 607.86 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 607.86 s
[really-safe-money-gen] - | d < 0 = Nothing
- 607.86 s
[really-safe-money-gen] + | False = Nothing
- 607.86 s
[really-safe-money-gen] | otherwise =
- 607.86 s
[really-safe-money-gen] let resultDouble :: Double
- 607.86 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 607.86 s
[really-safe-money-gen]
- 608.14 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:320:5-10:
- 608.14 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
- 608.14 s
[really-safe-money-gen] Double ->
- 608.14 s
[really-safe-money-gen] Maybe Amount
- 608.14 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 608.14 s
[really-safe-money-gen] - | d < 0 = Nothing
- 608.14 s
[really-safe-money-gen] + | not (d < 0) = Nothing
- 608.14 s
[really-safe-money-gen] | otherwise =
- 608.14 s
[really-safe-money-gen] let resultDouble :: Double
- 608.14 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 608.14 s
[really-safe-money-gen]
- 608.63 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:321:5-14:
- 608.63 s
[really-safe-money-gen] @@ -318,7 +318,7 @@
- 608.63 s
[really-safe-money-gen] Maybe Amount
- 608.63 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 608.63 s
[really-safe-money-gen] | d < 0 = Nothing
- 608.63 s
[really-safe-money-gen] - | otherwise =
- 608.63 s
[really-safe-money-gen] + | False =
- 608.63 s
[really-safe-money-gen] let resultDouble :: Double
- 608.63 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 608.63 s
[really-safe-money-gen] in go resultDouble
- 608.63 s
[really-safe-money-gen]
- 608.67 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:321:5-14:
- 608.67 s
[really-safe-money-gen] @@ -318,7 +318,7 @@
- 608.67 s
[really-safe-money-gen] Maybe Amount
- 608.67 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 608.67 s
[really-safe-money-gen] | d < 0 = Nothing
- 608.67 s
[really-safe-money-gen] - | otherwise =
- 608.67 s
[really-safe-money-gen] + | False =
- 608.67 s
[really-safe-money-gen] let resultDouble :: Double
- 608.67 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 608.67 s
[really-safe-money-gen] in go resultDouble
- 608.67 s
[really-safe-money-gen]
- 608.71 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:321:5-14:
- 608.71 s
[really-safe-money-gen] @@ -318,7 +318,7 @@
- 608.71 s
[really-safe-money-gen] Maybe Amount
- 608.71 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
- 608.71 s
[really-safe-money-gen] | d < 0 = Nothing
- 608.71 s
[really-safe-money-gen] - | otherwise =
- 608.71 s
[really-safe-money-gen] + | not (otherwise) =
- 608.71 s
[really-safe-money-gen] let resultDouble :: Double
- 608.71 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
- 608.71 s
[really-safe-money-gen] in go resultDouble
- 608.71 s
[really-safe-money-gen]
- 608.75 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:327:9-16:
- 608.75 s
[really-safe-money-gen] @@ -324,7 +324,7 @@
- 608.75 s
[really-safe-money-gen] in go resultDouble
- 608.75 s
[really-safe-money-gen] where
- 608.75 s
[really-safe-money-gen] go resultDouble
- 608.75 s
[really-safe-money-gen] - | isNaN d = Nothing
- 608.75 s
[really-safe-money-gen] + | False = Nothing
- 608.75 s
[really-safe-money-gen] | isInfinite d = Nothing
- 608.75 s
[really-safe-money-gen] | otherwise =
- 608.75 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 608.75 s
[really-safe-money-gen]
- 609.07 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:327:9-16:
- 609.07 s
[really-safe-money-gen] @@ -324,7 +324,7 @@
- 609.07 s
[really-safe-money-gen] in go resultDouble
- 609.07 s
[really-safe-money-gen] where
- 609.07 s
[really-safe-money-gen] go resultDouble
- 609.07 s
[really-safe-money-gen] - | isNaN d = Nothing
- 609.07 s
[really-safe-money-gen] + | False = Nothing
- 609.07 s
[really-safe-money-gen] | isInfinite d = Nothing
- 609.07 s
[really-safe-money-gen] | otherwise =
- 609.07 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 609.07 s
[really-safe-money-gen]
- 609.40 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:327:9-16:
- 609.40 s
[really-safe-money-gen] @@ -324,7 +324,7 @@
- 609.40 s
[really-safe-money-gen] in go resultDouble
- 609.40 s
[really-safe-money-gen] where
- 609.40 s
[really-safe-money-gen] go resultDouble
- 609.40 s
[really-safe-money-gen] - | isNaN d = Nothing
- 609.40 s
[really-safe-money-gen] + | not (isNaN d) = Nothing
- 609.40 s
[really-safe-money-gen] | isInfinite d = Nothing
- 609.40 s
[really-safe-money-gen] | otherwise =
- 609.40 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 609.40 s
[really-safe-money-gen]
- 609.93 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:328:9-21:
- 609.93 s
[really-safe-money-gen] @@ -325,7 +325,7 @@
- 609.93 s
[really-safe-money-gen] where
- 609.93 s
[really-safe-money-gen] go resultDouble
- 609.93 s
[really-safe-money-gen] | isNaN d = Nothing
- 609.93 s
[really-safe-money-gen] - | isInfinite d = Nothing
- 609.93 s
[really-safe-money-gen] + | False = Nothing
- 609.93 s
[really-safe-money-gen] | otherwise =
- 609.93 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 609.93 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 609.93 s
[really-safe-money-gen]
- 610.33 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:328:9-21:
- 610.33 s
[really-safe-money-gen] @@ -325,7 +325,7 @@
- 610.33 s
[really-safe-money-gen] where
- 610.33 s
[really-safe-money-gen] go resultDouble
- 610.33 s
[really-safe-money-gen] | isNaN d = Nothing
- 610.33 s
[really-safe-money-gen] - | isInfinite d = Nothing
- 610.33 s
[really-safe-money-gen] + | False = Nothing
- 610.33 s
[really-safe-money-gen] | otherwise =
- 610.33 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 610.34 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 610.34 s
[really-safe-money-gen]
- 610.66 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:328:9-21:
- 610.66 s
[really-safe-money-gen] @@ -325,7 +325,7 @@
- 610.66 s
[really-safe-money-gen] where
- 610.66 s
[really-safe-money-gen] go resultDouble
- 610.66 s
[really-safe-money-gen] | isNaN d = Nothing
- 610.66 s
[really-safe-money-gen] - | isInfinite d = Nothing
- 610.66 s
[really-safe-money-gen] + | not (isInfinite d) = Nothing
- 610.66 s
[really-safe-money-gen] | otherwise =
- 610.66 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 610.66 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 610.66 s
[really-safe-money-gen]
- 611.04 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:329:9-18:
- 611.04 s
[really-safe-money-gen] @@ -326,7 +326,7 @@
- 611.04 s
[really-safe-money-gen] go resultDouble
- 611.04 s
[really-safe-money-gen] | isNaN d = Nothing
- 611.04 s
[really-safe-money-gen] | isInfinite d = Nothing
- 611.04 s
[really-safe-money-gen] - | otherwise =
- 611.04 s
[really-safe-money-gen] + | False =
- 611.04 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.04 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.04 s
[really-safe-money-gen] if exponent resultDouble > 65
- 611.04 s
[really-safe-money-gen]
- 611.08 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:329:9-18:
- 611.08 s
[really-safe-money-gen] @@ -326,7 +326,7 @@
- 611.08 s
[really-safe-money-gen] go resultDouble
- 611.08 s
[really-safe-money-gen] | isNaN d = Nothing
- 611.08 s
[really-safe-money-gen] | isInfinite d = Nothing
- 611.08 s
[really-safe-money-gen] - | otherwise =
- 611.08 s
[really-safe-money-gen] + | False =
- 611.08 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.08 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.08 s
[really-safe-money-gen] if exponent resultDouble > 65
- 611.08 s
[really-safe-money-gen]
- 611.12 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:329:9-18:
- 611.12 s
[really-safe-money-gen] @@ -326,7 +326,7 @@
- 611.12 s
[really-safe-money-gen] go resultDouble
- 611.12 s
[really-safe-money-gen] | isNaN d = Nothing
- 611.12 s
[really-safe-money-gen] | isInfinite d = Nothing
- 611.12 s
[really-safe-money-gen] - | otherwise =
- 611.12 s
[really-safe-money-gen] + | not (otherwise) =
- 611.12 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.12 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.12 s
[really-safe-money-gen] if exponent resultDouble > 65
- 611.12 s
[really-safe-money-gen]
- 611.16 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:332:38-40:
- 611.16 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 611.16 s
[really-safe-money-gen] | otherwise =
- 611.16 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.16 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.16 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 611.16 s
[really-safe-money-gen] + if exponent resultDouble > -65
- 611.16 s
[really-safe-money-gen] then Nothing
- 611.16 s
[really-safe-money-gen] else
- 611.16 s
[really-safe-money-gen] let ceiled :: Natural
- 611.16 s
[really-safe-money-gen]
- 611.19 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:332:38-40:
- 611.19 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 611.19 s
[really-safe-money-gen] | otherwise =
- 611.19 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.19 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.19 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 611.19 s
[really-safe-money-gen] + if exponent resultDouble > -65
- 611.19 s
[really-safe-money-gen] then Nothing
- 611.19 s
[really-safe-money-gen] else
- 611.19 s
[really-safe-money-gen] let ceiled :: Natural
- 611.19 s
[really-safe-money-gen]
- 611.23 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:332:38-40:
- 611.23 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 611.23 s
[really-safe-money-gen] | otherwise =
- 611.23 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.23 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.23 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 611.23 s
[really-safe-money-gen] + if exponent resultDouble > -65
- 611.23 s
[really-safe-money-gen] then Nothing
- 611.23 s
[really-safe-money-gen] else
- 611.23 s
[really-safe-money-gen] let ceiled :: Natural
- 611.23 s
[really-safe-money-gen]
- 611.27 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:332:14-40:
- 611.27 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 611.27 s
[really-safe-money-gen] | otherwise =
- 611.27 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.27 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.27 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 611.27 s
[really-safe-money-gen] + if False
- 611.27 s
[really-safe-money-gen] then Nothing
- 611.27 s
[really-safe-money-gen] else
- 611.27 s
[really-safe-money-gen] let ceiled :: Natural
- 611.27 s
[really-safe-money-gen]
- 611.56 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:332:14-40:
- 611.56 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 611.56 s
[really-safe-money-gen] | otherwise =
- 611.56 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.56 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.56 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 611.56 s
[really-safe-money-gen] + if False
- 611.56 s
[really-safe-money-gen] then Nothing
- 611.56 s
[really-safe-money-gen] else
- 611.56 s
[really-safe-money-gen] let ceiled :: Natural
- 611.56 s
[really-safe-money-gen]
- 611.85 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:332:14-40:
- 611.85 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 611.85 s
[really-safe-money-gen] | otherwise =
- 611.85 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 611.85 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 611.85 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 611.85 s
[really-safe-money-gen] + if not (exponent resultDouble > 65)
- 611.85 s
[really-safe-money-gen] then Nothing
- 611.85 s
[really-safe-money-gen] else
- 611.85 s
[really-safe-money-gen] let ceiled :: Natural
- 611.85 s
[really-safe-money-gen]
- 612.24 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:339:22-39:
- 612.24 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
- 612.24 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
- 612.24 s
[really-safe-money-gen] floored :: Natural
- 612.24 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 612.24 s
[really-safe-money-gen] - in if ceiled == floored
- 612.24 s
[really-safe-money-gen] + in if False
- 612.24 s
[really-safe-money-gen] then
- 612.24 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 612.24 s
[really-safe-money-gen] then Nothing
- 612.24 s
[really-safe-money-gen]
- 612.68 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:339:22-39:
- 612.68 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
- 612.73 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
- 612.73 s
[really-safe-money-gen] floored :: Natural
- 612.73 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 612.73 s
[really-safe-money-gen] - in if ceiled == floored
- 612.73 s
[really-safe-money-gen] + in if False
- 612.74 s
[really-safe-money-gen] then
- 612.74 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 612.74 s
[really-safe-money-gen] then Nothing
- 612.74 s
[really-safe-money-gen]
- 613.03 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:339:22-39:
- 613.03 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
- 613.03 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
- 613.03 s
[really-safe-money-gen] floored :: Natural
- 613.03 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 613.03 s
[really-safe-money-gen] - in if ceiled == floored
- 613.03 s
[really-safe-money-gen] + in if not (ceiled == floored)
- 613.03 s
[really-safe-money-gen] then
- 613.03 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 613.03 s
[really-safe-money-gen] then Nothing
- 613.03 s
[really-safe-money-gen]
- 613.28 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:341:26-91:
- 613.28 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
- 613.28 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 613.28 s
[really-safe-money-gen] in if ceiled == floored
- 613.28 s
[really-safe-money-gen] then
- 613.28 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 613.28 s
[really-safe-money-gen] + if False
- 613.28 s
[really-safe-money-gen] then Nothing
- 613.28 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 613.28 s
[really-safe-money-gen] else Nothing
- 613.28 s
[really-safe-money-gen]
- 613.61 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:341:26-91:
- 613.62 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
- 613.62 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 613.62 s
[really-safe-money-gen] in if ceiled == floored
- 613.62 s
[really-safe-money-gen] then
- 613.62 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 613.62 s
[really-safe-money-gen] + if False
- 613.62 s
[really-safe-money-gen] then Nothing
- 613.62 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 613.62 s
[really-safe-money-gen] else Nothing
- 613.62 s
[really-safe-money-gen]
- 613.94 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:341:26-91:
- 613.94 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
- 613.94 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 613.94 s
[really-safe-money-gen] in if ceiled == floored
- 613.94 s
[really-safe-money-gen] then
- 613.94 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 613.94 s
[really-safe-money-gen] + if not (ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64))
- 613.94 s
[really-safe-money-gen] then Nothing
- 613.94 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 613.94 s
[really-safe-money-gen] else Nothing
- 613.94 s
[really-safe-money-gen]
- 614.08 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:341:23-65:
- 614.08 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
- 614.08 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 614.08 s
[really-safe-money-gen] in if ceiled == floored
- 614.08 s
[really-safe-money-gen] then
- 614.08 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 614.08 s
[really-safe-money-gen] + if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 614.08 s
[really-safe-money-gen] then Nothing
- 614.08 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
- 614.08 s
[really-safe-money-gen] else Nothing
- 614.08 s
[really-safe-money-gen]
- 614.22 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:339:19-33:
- 614.22 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
- 614.22 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
- 614.22 s
[really-safe-money-gen] floored :: Natural
- 614.22 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
- 614.22 s
[really-safe-money-gen] - in if ceiled == floored
- 614.22 s
[really-safe-money-gen] + in if ceiled == floored
- 614.22 s
[really-safe-money-gen] then
- 614.22 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
- 614.22 s
[really-safe-money-gen] then Nothing
- 614.22 s
[really-safe-money-gen]
- 614.47 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:332:11-33:
- 614.47 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
- 614.47 s
[really-safe-money-gen] | otherwise =
- 614.47 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
- 614.47 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
- 614.47 s
[really-safe-money-gen] - if exponent resultDouble > 65
- 614.47 s
[really-safe-money-gen] + if exponent resultDouble > 65
- 614.47 s
[really-safe-money-gen] then Nothing
- 614.47 s
[really-safe-money-gen] else
- 614.47 s
[really-safe-money-gen] let ceiled :: Natural
- 614.47 s
[really-safe-money-gen]
- 614.79 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:290:79-80:
- 614.79 s
[really-safe-money-gen] @@ -287,7 +287,7 @@
- 614.79 s
[really-safe-money-gen] -- >>> toRatio (QuantisationFactor 100) (Amount 1)
- 614.79 s
[really-safe-money-gen] -- 1 % 100
- 614.79 s
[really-safe-money-gen] toRatio :: QuantisationFactor -> Amount -> Ratio Natural
- 614.79 s
[really-safe-money-gen] -toRatio (QuantisationFactor 0) a = fromIntegral (toMinimalQuantisations a) :% 0
- 614.80 s
[really-safe-money-gen] +toRatio (QuantisationFactor 0) a = fromIntegral (toMinimalQuantisations a) :% 1
- 614.80 s
[really-safe-money-gen] toRatio (QuantisationFactor quantisationFactor) a =
- 614.80 s
[really-safe-money-gen] (fromIntegral :: Word64 -> Natural) (toMinimalQuantisations a)
- 614.80 s
[really-safe-money-gen] % (fromIntegral :: Word32 -> Natural) quantisationFactor
- 614.80 s
[really-safe-money-gen]
- 614.80 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:494:96-97:
- 614.80 s
[really-safe-money-gen] @@ -491,7 +491,7 @@
- 614.80 s
[really-safe-money-gen] let maxBoundI :: Integer
- 614.80 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 614.80 s
[really-safe-money-gen] r :: Integer
- 614.80 s
[really-safe-money-gen] - r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
- 614.80 s
[really-safe-money-gen] + r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 1 l
- 614.80 s
[really-safe-money-gen] in if r > maxBoundI
- 614.80 s
[really-safe-money-gen] then Nothing
- 614.80 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 614.80 s
[really-safe-money-gen]
- 614.80 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:495:10-23:
- 614.80 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
- 614.80 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 614.80 s
[really-safe-money-gen] r :: Integer
- 614.80 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
- 614.80 s
[really-safe-money-gen] - in if r > maxBoundI
- 614.80 s
[really-safe-money-gen] + in if False
- 614.80 s
[really-safe-money-gen] then Nothing
- 614.80 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 614.80 s
[really-safe-money-gen]
- 614.80 s
[really-safe-money-gen]
- 614.87 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:495:10-23:
- 614.87 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
- 614.87 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 614.87 s
[really-safe-money-gen] r :: Integer
- 614.87 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
- 614.87 s
[really-safe-money-gen] - in if r > maxBoundI
- 614.87 s
[really-safe-money-gen] + in if False
- 614.87 s
[really-safe-money-gen] then Nothing
- 614.87 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 614.87 s
[really-safe-money-gen]
- 614.87 s
[really-safe-money-gen]
- 614.93 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:495:10-23:
- 614.93 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
- 614.93 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 614.93 s
[really-safe-money-gen] r :: Integer
- 614.94 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
- 614.94 s
[really-safe-money-gen] - in if r > maxBoundI
- 614.94 s
[really-safe-money-gen] + in if not (r > maxBoundI)
- 614.94 s
[really-safe-money-gen] then Nothing
- 614.94 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 614.94 s
[really-safe-money-gen]
- 614.94 s
[really-safe-money-gen]
- 615.16 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:495:7-66:
- 615.16 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
- 615.16 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
- 615.16 s
[really-safe-money-gen] r :: Integer
- 615.16 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
- 615.16 s
[really-safe-money-gen] - in if r > maxBoundI
- 615.16 s
[really-safe-money-gen] + in if r > maxBoundI
- 615.16 s
[really-safe-money-gen] then Nothing
- 615.16 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
- 615.16 s
[really-safe-money-gen]
- 615.16 s
[really-safe-money-gen]
- 615.42 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:250:15-16:
- 615.42 s
[really-safe-money-gen] @@ -247,7 +247,7 @@
- 615.42 s
[really-safe-money-gen] -- >>> zero
- 615.42 s
[really-safe-money-gen] -- Amount 0
- 615.42 s
[really-safe-money-gen] zero :: Amount
- 615.42 s
[really-safe-money-gen] -zero = Amount 0
- 615.42 s
[really-safe-money-gen] +zero = Amount 1
- 615.42 s
[really-safe-money-gen]
- 615.42 s
[really-safe-money-gen] -- | Turn an amount into a number of minimal quantisations.
- 615.42 s
[really-safe-money-gen] --
- 615.42 s
[really-safe-money-gen]
- 615.42 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:661:30-31:
- 615.42 s
[really-safe-money-gen] @@ -658,7 +658,7 @@
- 615.42 s
[really-safe-money-gen] -- | The amount and the real rate that was used, considering the 'Rounding'
- 615.42 s
[really-safe-money-gen] (Maybe Amount, Ratio Natural)
- 615.42 s
[really-safe-money-gen] fraction _ (Amount 0) f = (Just zero, f)
- 615.42 s
[really-safe-money-gen] -fraction _ _ 0 = (Just zero, 0)
- 615.42 s
[really-safe-money-gen] +fraction _ _ 0 = (Just zero, 1)
- 615.42 s
[really-safe-money-gen] fraction r (Amount a) f =
- 615.42 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
- 615.42 s
[really-safe-money-gen] amountAsRatio = (fromIntegral :: Word64 -> Ratio Natural) a
- 615.42 s
[really-safe-money-gen]
- 615.54 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:681:12-37:
- 615.54 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
- 615.54 s
[really-safe-money-gen] maxBoundN :: Natural
- 615.54 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 615.54 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
- 615.54 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
- 615.54 s
[really-safe-money-gen] + in ( if False
- 615.54 s
[really-safe-money-gen] then Nothing
- 615.54 s
[really-safe-money-gen] else Just result,
- 615.54 s
[really-safe-money-gen] actualRate
- 615.54 s
[really-safe-money-gen]
- 617.05 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:681:12-37:
- 617.05 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
- 617.05 s
[really-safe-money-gen] maxBoundN :: Natural
- 617.06 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 617.06 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
- 617.06 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
- 617.06 s
[really-safe-money-gen] + in ( if False
- 617.06 s
[really-safe-money-gen] then Nothing
- 617.06 s
[really-safe-money-gen] else Just result,
- 617.06 s
[really-safe-money-gen] actualRate
- 617.06 s
[really-safe-money-gen]
- 618.53 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:681:12-37:
- 618.58 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
- 618.58 s
[really-safe-money-gen] maxBoundN :: Natural
- 618.58 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 618.58 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
- 618.58 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
- 618.58 s
[really-safe-money-gen] + in ( if not (roundedResult > maxBoundN)
- 618.58 s
[really-safe-money-gen] then Nothing
- 618.58 s
[really-safe-money-gen] else Just result,
- 618.58 s
[really-safe-money-gen] actualRate
- 618.58 s
[really-safe-money-gen]
- 619.85 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/Amount.hs:681:9-27:
- 619.85 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
- 619.85 s
[really-safe-money-gen] maxBoundN :: Natural
- 619.85 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 619.85 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
- 619.85 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
- 619.85 s
[really-safe-money-gen] + in ( if roundedResult > maxBoundN
- 619.85 s
[really-safe-money-gen] then Nothing
- 619.85 s
[really-safe-money-gen] else Just result,
- 619.85 s
[really-safe-money-gen] actualRate
- 619.85 s
[really-safe-money-gen]
- 621.25 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:806:79-92:
- 621.26 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
- 621.26 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
- 621.26 s
[really-safe-money-gen] -validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
- 621.26 s
[really-safe-money-gen] +validateStrictlyPositive amount = declare "The Amount is strictly positive" $ False
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:806:79-92:
- 621.26 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
- 621.26 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
- 621.26 s
[really-safe-money-gen] -validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
- 621.26 s
[really-safe-money-gen] +validateStrictlyPositive amount = declare "The Amount is strictly positive" $ False
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:806:79-92:
- 621.26 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
- 621.26 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
- 621.26 s
[really-safe-money-gen] -validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
- 621.26 s
[really-safe-money-gen] +validateStrictlyPositive amount = declare "The Amount is strictly positive" $ not (amount > zero)
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:607:15-22:
- 621.26 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
- 621.26 s
[really-safe-money-gen] case ad of
- 621.26 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
- 621.26 s
[really-safe-money-gen] declare "The larger chunks are larger" $
- 621.26 s
[really-safe-money-gen] - a1 > a2
- 621.26 s
[really-safe-money-gen] + False
- 621.26 s
[really-safe-money-gen] _ -> valid
- 621.26 s
[really-safe-money-gen] ]
- 621.26 s
[really-safe-money-gen]
- 621.26 s
[really-safe-money-gen]
- 621.39 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:607:15-22:
- 621.39 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
- 621.39 s
[really-safe-money-gen] case ad of
- 621.39 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
- 621.39 s
[really-safe-money-gen] declare "The larger chunks are larger" $
- 621.39 s
[really-safe-money-gen] - a1 > a2
- 621.39 s
[really-safe-money-gen] + False
- 621.39 s
[really-safe-money-gen] _ -> valid
- 621.39 s
[really-safe-money-gen] ]
- 621.39 s
[really-safe-money-gen]
- 621.39 s
[really-safe-money-gen]
- 621.53 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:607:15-22:
- 621.53 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
- 621.53 s
[really-safe-money-gen] case ad of
- 621.53 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
- 621.53 s
[really-safe-money-gen] declare "The larger chunks are larger" $
- 621.53 s
[really-safe-money-gen] - a1 > a2
- 621.53 s
[really-safe-money-gen] + not (a1 > a2)
- 621.53 s
[really-safe-money-gen] _ -> valid
- 621.53 s
[really-safe-money-gen] ]
- 621.53 s
[really-safe-money-gen]
- 621.53 s
[really-safe-money-gen]
- 621.55 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount.hs:603:7-8:
- 621.55 s
[really-safe-money-gen] @@ -600,7 +600,7 @@
- 621.55 s
[really-safe-money-gen] instance (Validity amount, Ord amount) => Validity (Distribution amount) where
- 621.55 s
[really-safe-money-gen] validate ad =
- 621.55 s
[really-safe-money-gen] mconcat
- 621.55 s
[really-safe-money-gen] - [ genericValidate ad,
- 621.55 s
[really-safe-money-gen] + [ genericValidate ad,
- 621.55 s
[really-safe-money-gen] case ad of
- 621.55 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
- 621.55 s
[really-safe-money-gen] declare "The larger chunks are larger" $
- 621.55 s
[really-safe-money-gen]
- 621.63 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount.hs:603:7-8:
- 621.63 s
[really-safe-money-gen] @@ -600,7 +600,7 @@
- 621.63 s
[really-safe-money-gen] instance (Validity amount, Ord amount) => Validity (Distribution amount) where
- 621.63 s
[really-safe-money-gen] validate ad =
- 621.63 s
[really-safe-money-gen] mconcat
- 621.63 s
[really-safe-money-gen] - [ genericValidate ad,
- 621.63 s
[really-safe-money-gen] + [ genericValidate ad,
- 621.63 s
[really-safe-money-gen] case ad of
- 621.63 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
- 621.63 s
[really-safe-money-gen] declare "The larger chunks are larger" $
- 621.63 s
[really-safe-money-gen]
- 621.71 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:168:20-45:
- 621.71 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
- 621.71 s
[really-safe-money-gen] maxBoundN :: Natural
- 621.71 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 621.71 s
[really-safe-money-gen] actualResult =
- 621.71 s
[really-safe-money-gen] - if roundedResult > maxBoundN
- 621.71 s
[really-safe-money-gen] + if False
- 621.71 s
[really-safe-money-gen] then Nothing
- 621.71 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
- 621.71 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
- 621.71 s
[really-safe-money-gen]
- 621.77 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:168:20-45:
- 621.77 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
- 621.77 s
[really-safe-money-gen] maxBoundN :: Natural
- 621.77 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 621.77 s
[really-safe-money-gen] actualResult =
- 621.77 s
[really-safe-money-gen] - if roundedResult > maxBoundN
- 621.77 s
[really-safe-money-gen] + if False
- 621.77 s
[really-safe-money-gen] then Nothing
- 621.77 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
- 621.77 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
- 621.77 s
[really-safe-money-gen]
- 621.83 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:168:20-45:
- 621.83 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
- 621.83 s
[really-safe-money-gen] maxBoundN :: Natural
- 621.83 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 621.83 s
[really-safe-money-gen] actualResult =
- 621.83 s
[really-safe-money-gen] - if roundedResult > maxBoundN
- 621.83 s
[really-safe-money-gen] + if not (roundedResult > maxBoundN)
- 621.83 s
[really-safe-money-gen] then Nothing
- 621.83 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
- 621.83 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
- 621.83 s
[really-safe-money-gen]
- 621.89 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/MultiAmount.hs:168:17-57:
- 621.89 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
- 621.90 s
[really-safe-money-gen] maxBoundN :: Natural
- 621.90 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
- 621.90 s
[really-safe-money-gen] actualResult =
- 621.90 s
[really-safe-money-gen] - if roundedResult > maxBoundN
- 621.90 s
[really-safe-money-gen] + if roundedResult > maxBoundN
- 621.90 s
[really-safe-money-gen] then Nothing
- 621.90 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
- 621.90 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
- 621.90 s
[really-safe-money-gen]
- 621.96 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:119:12-28:
- 621.96 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
- 621.96 s
[really-safe-money-gen] Just a -> do
- 621.96 s
[really-safe-money-gen] r <- Amount.subtract a amount
- 621.96 s
[really-safe-money-gen] Just $
- 621.96 s
[really-safe-money-gen] - if r == Amount.zero
- 621.96 s
[really-safe-money-gen] + if False
- 621.96 s
[really-safe-money-gen] then M.delete currency m
- 621.96 s
[really-safe-money-gen] else M.insert currency r m
- 621.96 s
[really-safe-money-gen]
- 621.96 s
[really-safe-money-gen]
- 621.99 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:119:12-28:
- 621.99 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
- 621.99 s
[really-safe-money-gen] Just a -> do
- 622.00 s
[really-safe-money-gen] r <- Amount.subtract a amount
- 622.00 s
[really-safe-money-gen] Just $
- 622.00 s
[really-safe-money-gen] - if r == Amount.zero
- 622.00 s
[really-safe-money-gen] + if False
- 622.00 s
[really-safe-money-gen] then M.delete currency m
- 622.00 s
[really-safe-money-gen] else M.insert currency r m
- 622.00 s
[really-safe-money-gen]
- 622.00 s
[really-safe-money-gen]
- 622.04 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:119:12-28:
- 622.04 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
- 622.04 s
[really-safe-money-gen] Just a -> do
- 622.04 s
[really-safe-money-gen] r <- Amount.subtract a amount
- 622.04 s
[really-safe-money-gen] Just $
- 622.04 s
[really-safe-money-gen] - if r == Amount.zero
- 622.04 s
[really-safe-money-gen] + if not (r == Amount.zero)
- 622.04 s
[really-safe-money-gen] then M.delete currency m
- 622.04 s
[really-safe-money-gen] else M.insert currency r m
- 622.04 s
[really-safe-money-gen]
- 622.04 s
[really-safe-money-gen]
- 622.08 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/MultiAmount.hs:119:9-37:
- 622.08 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
- 622.08 s
[really-safe-money-gen] Just a -> do
- 622.08 s
[really-safe-money-gen] r <- Amount.subtract a amount
- 622.08 s
[really-safe-money-gen] Just $
- 622.08 s
[really-safe-money-gen] - if r == Amount.zero
- 622.08 s
[really-safe-money-gen] + if r == Amount.zero
- 622.08 s
[really-safe-money-gen] then M.delete currency m
- 622.08 s
[really-safe-money-gen] else M.insert currency r m
- 622.08 s
[really-safe-money-gen]
- 622.08 s
[really-safe-money-gen]
- 622.12 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:106:12-28:
- 622.12 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
- 622.12 s
[really-safe-money-gen] Just a -> do
- 622.12 s
[really-safe-money-gen] r <- Amount.add a amount
- 622.12 s
[really-safe-money-gen] Just $
- 622.12 s
[really-safe-money-gen] - if r == Amount.zero
- 622.12 s
[really-safe-money-gen] + if False
- 622.12 s
[really-safe-money-gen] then M.delete currency m
- 622.12 s
[really-safe-money-gen] else M.insert currency r m
- 622.12 s
[really-safe-money-gen]
- 622.12 s
[really-safe-money-gen]
- 622.70 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:106:12-28:
- 622.70 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
- 622.70 s
[really-safe-money-gen] Just a -> do
- 622.70 s
[really-safe-money-gen] r <- Amount.add a amount
- 622.70 s
[really-safe-money-gen] Just $
- 622.70 s
[really-safe-money-gen] - if r == Amount.zero
- 622.70 s
[really-safe-money-gen] + if False
- 622.70 s
[really-safe-money-gen] then M.delete currency m
- 622.70 s
[really-safe-money-gen] else M.insert currency r m
- 622.70 s
[really-safe-money-gen]
- 622.70 s
[really-safe-money-gen]
- 623.27 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:106:12-28:
- 623.27 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
- 623.27 s
[really-safe-money-gen] Just a -> do
- 623.27 s
[really-safe-money-gen] r <- Amount.add a amount
- 623.27 s
[really-safe-money-gen] Just $
- 623.27 s
[really-safe-money-gen] - if r == Amount.zero
- 623.27 s
[really-safe-money-gen] + if not (r == Amount.zero)
- 623.27 s
[really-safe-money-gen] then M.delete currency m
- 623.27 s
[really-safe-money-gen] else M.insert currency r m
- 623.27 s
[really-safe-money-gen]
- 623.27 s
[really-safe-money-gen]
- 623.82 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/MultiAmount.hs:106:9-37:
- 623.87 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
- 623.87 s
[really-safe-money-gen] Just a -> do
- 623.87 s
[really-safe-money-gen] r <- Amount.add a amount
- 623.87 s
[really-safe-money-gen] Just $
- 623.87 s
[really-safe-money-gen] - if r == Amount.zero
- 623.87 s
[really-safe-money-gen] + if r == Amount.zero
- 623.87 s
[really-safe-money-gen] then M.delete currency m
- 623.87 s
[really-safe-money-gen] else M.insert currency r m
- 623.87 s
[really-safe-money-gen]
- 623.87 s
[really-safe-money-gen]
- 624.49 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:73:6-27:
- 624.49 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
- 624.49 s
[really-safe-money-gen]
- 624.49 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
- 624.49 s
[really-safe-money-gen] fromAmount currency amount =
- 624.49 s
[really-safe-money-gen] - if amount == Amount.zero
- 624.49 s
[really-safe-money-gen] + if False
- 624.49 s
[really-safe-money-gen] then zero
- 624.49 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
- 624.49 s
[really-safe-money-gen]
- 624.49 s
[really-safe-money-gen]
- 624.51 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:73:6-27:
- 624.51 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
- 624.51 s
[really-safe-money-gen]
- 624.51 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
- 624.51 s
[really-safe-money-gen] fromAmount currency amount =
- 624.51 s
[really-safe-money-gen] - if amount == Amount.zero
- 624.51 s
[really-safe-money-gen] + if False
- 624.51 s
[really-safe-money-gen] then zero
- 624.51 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
- 624.51 s
[really-safe-money-gen]
- 624.51 s
[really-safe-money-gen]
- 624.53 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:73:6-27:
- 624.53 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
- 624.53 s
[really-safe-money-gen]
- 624.53 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
- 624.53 s
[really-safe-money-gen] fromAmount currency amount =
- 624.53 s
[really-safe-money-gen] - if amount == Amount.zero
- 624.53 s
[really-safe-money-gen] + if not (amount == Amount.zero)
- 624.53 s
[really-safe-money-gen] then zero
- 624.53 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
- 624.53 s
[really-safe-money-gen]
- 624.53 s
[really-safe-money-gen]
- 624.56 s
[really-safe-money-gen] Testing mutation CondFlip at src/Money/MultiAmount.hs:73:3-51:
- 624.56 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
- 624.56 s
[really-safe-money-gen]
- 624.56 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
- 624.56 s
[really-safe-money-gen] fromAmount currency amount =
- 624.56 s
[really-safe-money-gen] - if amount == Amount.zero
- 624.56 s
[really-safe-money-gen] + if amount == Amount.zero
- 624.56 s
[really-safe-money-gen] then zero
- 624.56 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
- 624.56 s
[really-safe-money-gen]
- 624.56 s
[really-safe-money-gen]
- 624.58 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:66:13-29:
- 624.58 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
- 624.58 s
[really-safe-money-gen] [ genericValidate ma,
- 624.58 s
[really-safe-money-gen] decorateMap m $ \_ a ->
- 624.58 s
[really-safe-money-gen] declare "The amount is not zero" $
- 624.58 s
[really-safe-money-gen] - a /= Amount.zero
- 624.58 s
[really-safe-money-gen] + False
- 624.58 s
[really-safe-money-gen] ]
- 624.58 s
[really-safe-money-gen]
- 624.58 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
- 624.58 s
[really-safe-money-gen]
- 624.85 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:66:13-29:
- 624.85 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
- 624.85 s
[really-safe-money-gen] [ genericValidate ma,
- 624.85 s
[really-safe-money-gen] decorateMap m $ \_ a ->
- 624.85 s
[really-safe-money-gen] declare "The amount is not zero" $
- 624.85 s
[really-safe-money-gen] - a /= Amount.zero
- 624.85 s
[really-safe-money-gen] + False
- 624.85 s
[really-safe-money-gen] ]
- 624.85 s
[really-safe-money-gen]
- 624.85 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
- 624.85 s
[really-safe-money-gen]
- 625.12 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:66:13-29:
- 625.12 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
- 625.12 s
[really-safe-money-gen] [ genericValidate ma,
- 625.12 s
[really-safe-money-gen] decorateMap m $ \_ a ->
- 625.12 s
[really-safe-money-gen] declare "The amount is not zero" $
- 625.12 s
[really-safe-money-gen] - a /= Amount.zero
- 625.12 s
[really-safe-money-gen] + not (a /= Amount.zero)
- 625.12 s
[really-safe-money-gen] ]
- 625.12 s
[really-safe-money-gen]
- 625.12 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
- 625.12 s
[really-safe-money-gen]
- 625.15 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/MultiAmount.hs:63:7-8:
- 625.15 s
[really-safe-money-gen] @@ -60,7 +60,7 @@
- 625.15 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAmount currency) where
- 625.15 s
[really-safe-money-gen] validate ma@(MultiAmount m) =
- 625.15 s
[really-safe-money-gen] mconcat
- 625.15 s
[really-safe-money-gen] - [ genericValidate ma,
- 625.15 s
[really-safe-money-gen] + [ genericValidate ma,
- 625.15 s
[really-safe-money-gen] decorateMap m $ \_ a ->
- 625.15 s
[really-safe-money-gen] declare "The amount is not zero" $
- 625.15 s
[really-safe-money-gen] a /= Amount.zero
- 625.15 s
[really-safe-money-gen]
- 625.27 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/MultiAmount.hs:63:7-8:
- 625.27 s
[really-safe-money-gen] @@ -60,7 +60,7 @@
- 625.27 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAmount currency) where
- 625.27 s
[really-safe-money-gen] validate ma@(MultiAmount m) =
- 625.27 s
[really-safe-money-gen] mconcat
- 625.27 s
[really-safe-money-gen] - [ genericValidate ma,
- 625.27 s
[really-safe-money-gen] + [ genericValidate ma,
- 625.27 s
[really-safe-money-gen] decorateMap m $ \_ a ->
- 625.27 s
[really-safe-money-gen] declare "The amount is not zero" $
- 625.27 s
[really-safe-money-gen] a /= Amount.zero
- 625.27 s
[really-safe-money-gen]
- 625.39 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:396:23-27:
- 625.39 s
[really-safe-money-gen] @@ -393,5 +393,5 @@
- 625.39 s
[really-safe-money-gen] DecimalLiteral mS m e -> DecimalLiteral (go mS) m e
- 625.39 s
[really-safe-money-gen] where
- 625.39 s
[really-safe-money-gen] go = \case
- 625.39 s
[really-safe-money-gen] - Nothing -> Just True
- 625.39 s
[really-safe-money-gen] + Nothing -> Just False
- 625.39 s
[really-safe-money-gen] s -> s
- 625.39 s
[really-safe-money-gen]
- 625.39 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:396:23-27:
- 625.39 s
[really-safe-money-gen] @@ -393,5 +393,5 @@
- 625.39 s
[really-safe-money-gen] DecimalLiteral mS m e -> DecimalLiteral (go mS) m e
- 625.39 s
[really-safe-money-gen] where
- 625.39 s
[really-safe-money-gen] go = \case
- 625.39 s
[really-safe-money-gen] - Nothing -> Just True
- 625.39 s
[really-safe-money-gen] + Nothing -> Just False
- 625.39 s
[really-safe-money-gen] s -> s
- 625.39 s
[really-safe-money-gen]
- 625.39 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:396:23-27:
- 625.39 s
[really-safe-money-gen] @@ -393,5 +393,5 @@
- 625.39 s
[really-safe-money-gen] DecimalLiteral mS m e -> DecimalLiteral (go mS) m e
- 625.39 s
[really-safe-money-gen] where
- 625.39 s
[really-safe-money-gen] go = \case
- 625.39 s
[really-safe-money-gen] - Nothing -> Just True
- 625.39 s
[really-safe-money-gen] + Nothing -> Just not (True)
- 625.39 s
[really-safe-money-gen] s -> s
- 625.39 s
[really-safe-money-gen]
- 625.39 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39:
- 625.39 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
- 625.39 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
- 625.39 s
[really-safe-money-gen] let currentDigits :: Word8
- 625.40 s
[really-safe-money-gen] currentDigits = digits dl
- 625.40 s
[really-safe-money-gen] - in if wantedDigits <= currentDigits
- 625.40 s
[really-safe-money-gen] + in if False
- 625.40 s
[really-safe-money-gen] then dl
- 625.40 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
- 625.40 s
[really-safe-money-gen] where
- 625.40 s
[really-safe-money-gen]
- 686.66 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39:
- 686.66 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
- 686.69 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
- 686.69 s
[really-safe-money-gen] let currentDigits :: Word8
- 686.69 s
[really-safe-money-gen] currentDigits = digits dl
- 686.69 s
[really-safe-money-gen] - in if wantedDigits <= currentDigits
- 686.69 s
[really-safe-money-gen] + in if False
- 686.69 s
[really-safe-money-gen] then dl
- 686.69 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
- 686.69 s
[really-safe-money-gen] where
- 686.69 s
[really-safe-money-gen]
- 746.38 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:368:10-39:
- 746.38 s
[really-safe-money-gen] @@ -365,7 +365,7 @@