[Haskell-cafe] Foldable for BNFC generated tree