module Examples where
import Foreign
f x = return x >>= deRefStablePtr
[qrczak ~/QForeign]$ ghc -c -fglasgow-exts -O -fasm-x86 Examples.hs
panic! (the `impossible' happened):
getRegister(x86,unary primop)
(Prim deRefStablePtrzh Temp(B0StgStablePtr))
Please report it as a compiler bug to [EMAIL PROTECTED]
--
__("< Marcin Kowalczyk * [EMAIL PROTECTED] http://qrczak.ids.net.pl/
\__/ GCS/M d- s+:-- a23 C+++$ UL++>++++$ P+++ L++>++++$ E-
^^ W++ N+++ o? K? w(---) O? M- V? PS-- PE++ Y? PGP+ t
QRCZAK 5? X- R tv-- b+>++ DI D- G+ e>++++ h! r--%>++ y-