Template Haskell + -fdicts-strict fails
module Foo where
import Language.Haskell.TH
foo :: Q Name
foo = do
VarE x <- [| (>>=) |]
return x
When compiled with -fdicts-strict -XTemplateHaskell, the resulting Core contains
Foo.foo3 :: forall (m_aPo :: * -> *). Functor m_aPo
GblId
Foo.foo3 =
\ (@ m_aPo::* -> *) ->
Control.Exception.Base.runtimeError
@ Functor m_aPo
"Oops! Entered absent arg ww_sQJ{v} [lid] <pred>base:Functor{tc 2a} m{tv aPo} [tv]"
Trac metadata
Trac field | Value |
---|---|
Version | 6.12.3 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | Compiler |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | |
Operating system | Unknown/Multiple |
Architecture | Unknown/Multiple |