(defun (setf x) ()) stopped returning (SETF X)
commit4138cfbbbc55e57b525d289ef545e681c9f2bbff
authorStas Boukarev <stassats@gmail.com>
Mon, 18 Jan 2016 14:42:42 +0000 (18 17:42 +0300)
committerStas Boukarev <stassats@gmail.com>
Mon, 18 Jan 2016 14:42:42 +0000 (18 17:42 +0300)
treed3e89a21fdaeaa0a9a850707b3bc2d576df809f4
parentc964ac42e474ed1ec232c471d278fe72e9a2e5fe
(defun (setf x) ()) stopped returning (SETF X)

A recent regression.
src/code/defboot.lisp
tests/compiler.impure.lisp