The build failed. It prevents 0 other packages from building.
Build log
> /tmp/stackage-build2456$ stack unpack io-choice-0.0.6@sha256:7f9d3bfc8fb7348a01942c5fe932115accd6bf0106ca07f0ae487fd59097cc1a
Unpacked io-choice-0.0.6 to /tmp/stackage-build2456/io-choice-0.0.6/
> /tmp/stackage-build2456/io-choice-0.0.6$ ghc -clear-package-db -global-package-db -package-db=/home/circleci/project/builds/nightly/pkgdb Setup
[1 of 1] Compiling Main ( Setup.hs, Setup.o )
Linking Setup ...
> /tmp/stackage-build2456/io-choice-0.0.6$ ./Setup configure --package-db=clear --package-db=global --package-db=/home/circleci/project/builds/nightly/pkgdb --libdir=/home/circleci/project/builds/nightly/lib --bindir=/home/circleci/project/builds/nightly/bin --datadir=/home/circleci/project/builds/nightly/share --libexecdir=/home/circleci/project/builds/nightly/libexec --sysconfdir=/home/circleci/project/builds/nightly/etc --docdir=/home/circleci/project/builds/nightly/doc/io-choice-0.0.6 --htmldir=/home/circleci/project/builds/nightly/doc/io-choice-0.0.6 --haddockdir=/home/circleci/project/builds/nightly/doc/io-choice-0.0.6
Configuring io-choice-0.0.6...
> /tmp/stackage-build2456/io-choice-0.0.6$ ghc -clear-package-db -global-package-db -package-db=/home/circleci/project/builds/nightly/pkgdb Setup
> /tmp/stackage-build2456/io-choice-0.0.6$ ./Setup build
Preprocessing library for io-choice-0.0.6..
Building library for io-choice-0.0.6..
[1 of 5] Compiling Control.Exception.IOChoice ( Control/Exception/IOChoice.hs, dist/build/Control/Exception/IOChoice.o )
[2 of 5] Compiling Control.Exception.IOChoice.Lifted ( Control/Exception/IOChoice/Lifted.hs, dist/build/Control/Exception/IOChoice/Lifted.o )
[3 of 5] Compiling Control.Exception.IOChoice.THUtil ( Control/Exception/IOChoice/THUtil.hs, dist/build/Control/Exception/IOChoice/THUtil.o )
Control/Exception/IOChoice/THUtil.hs:27:9: error:
• The constructor ‘DataInstD’ should have 7 arguments, but has been given 6
• In the pattern: DataInstD _ name args _ _ _
In a case alternative:
DataInstD _ name args _ _ _
-> foldl1 appT (conT name : map return args)
In a stmt of a 'do' block:
case dec of
DataD _ name [] _ _ _ -> conT name
NewtypeD _ name [] _ _ _ -> conT name
DataInstD _ name args _ _ _
-> foldl1 appT (conT name : map return args)
NewtypeInstD _ name args _ _ _
-> foldl1 appT (conT name : map return args)
TySynD name [] _ -> conT name
TySynInstD name (TySynEqn _ t)
-> foldl1 appT (conT name : [return t])
_ -> error
$ "Exception type must not have any type argument: " ++ show exc
|
27 | DataInstD _ name args _ _ _ -> foldl1 appT (conT name:map return args)
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^