MonadIO instance for FT