[Template-haskell] a couple of examples that cause Panic

Greetings. Abe Egnor and I ran into a couple of panics in ghc-6.2 with TH in Debian: (ghci)

runQ (reifyDecl show) >>= print

Actually, I think that breaks for any function in place of "show". Similarly:

module BugReport where

data ObservedSound = ObservedSound

foo = [d|instance Show ObservedSound where show _ = "" |]

Ian L. has mentioned that this may be fixed in CVS, but I figured I'd send it out to you before I forget. peace, isaac