[Haskell-cafe] Parsing Haskell in Parsec

I'm trying to write a parser for a small functional language in Parsec, as part of a larger project of porting this<http://www.cs.jhu.edu/%7Escott/pl/book/dist/>from ocaml to Haskell. I was wondering if there was a parser for Haskell written in Parsec that I could use as a reference. -- Alex R