Return the foreground thread of SESSION defaulting to the current session.
(&optional sb-thread::session)