Type deduction panic
> {-# LANGUAGE DeriveFunctor #-}
> module Bug where
> import qualified Data.Set as S
> import Data.Foldable (fold, foldMap, toList)
> import Data.List.Split (splitOn)
> import Data.Monoid -- ((<>), Sum, mempty, mappend)
> import Data.Functor.Foldable
> newtype Component = Component (Int,Int) deriving (Eq, Ord, Show)
> data Day24State v a = Day24State {
> valueToMatch :: Int,
> componentsToUse :: S.Set Component,
> componentMetric :: v,
> nextStates :: [a]
> } deriving (Functor, Show)
> type Day24StateFix v a = Fix (Day24State v)
Now in GHCI type
:t Data.Functor.Foldable.ana f (undefined :: Day24StateFix Component)
Produces
ghc.EXE: panic! (the 'impossible' happened)
(GHC version 8.0.2 for x86_64-unknown-mingw32):
initTc: unsolved constraints WC {wc_insol = [W] f_akbJ :: t_akbI[tau:3] (CHoleCan: f)}
Please report this as a GHC bug: http://www.haskell.org/ghc/reportabug
Trac metadata
| Trac field | Value |
|---|---|
| Version | 8.2.2 |
| Type | Bug |
| TypeOfFailure | OtherFailure |
| Priority | normal |
| Resolution | Unresolved |
| Component | Compiler |
| Test case | |
| Differential revisions | |
| BlockedBy | |
| Related | |
| Blocking | |
| CC | |
| Operating system | |
| Architecture |