Add a simple TODO.
Replaces the writer by mapAccumL, profiles.