[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 thishttp://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