Tock (translator from occam to C from Kent) is Adam's Haskell-based occam-to-C translator, previously known as FCO. It compiles -- currently -- occam 2.1 into C99, using the CCSP runtime via CIF. It's written in Haskell, making use of the Parsec parser combinator library.
(More information to follow once it's in more of a state for regular users to use.)
The source code is available using Darcs (or any web browser) from here: