;;; Please do not try to understand this code unless you have a VERY ;;; good reason to do so. I gave up trying to figure it out well ;;; enough to explain it, long ago.
This precedes paredit-forward-sexps-to-kill which appears to be code that deals with the problem that commands operating on S-expressions may fail mysteriously if there’s no trailing newline afterwards.
Credits go to contrapunctus.