I agree, except the reader macros must be older, because Common Lisp: the Language came out in 1984.
Maybe I'll try to find the place in the Hyperspec tomorrow morning.
Here is a minor compilable abomination:
(funcall (defun #1=#:f (n) "Write once, run once." (if (zerop n) 1 (* n (#1# (1- n))))) 5)
=> 120