Bug Description

This is SBCL 1.0.47.7, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
* (defun foo (bar) (+ bar 2))

Needless to say, the source form printed by DESCRIBE bears little resemblance to the original definition, and this gets worse when macros are involved. Surely the source form should be recorded pre-macroexpansion?