Невозможно вывести (show)из этого выражения

Этот код не работает

data Expression = Atom String
  | Sequence [Expression]
  deriving (show)

Я получаю эту ошибку:

$ runghc bug.hs
ghc: panic! (the 'impossible' happened)
  (GHC version 7.4.1 for x86_64-apple-darwin):
    nameModule show{tv a9J}

Please report this as a GHC bug:  http://www.haskell.org/ghc/reportabug

Я делаю что-то не так, или это действительно ошибка? ошибка?