MonadCont instance for FT