[no subject]

[GJC at MIT-MC (George J. Carrette)]

(DEFUN (FOO BAR) (X) X) in compiled code causes FOO to get a BAR
property of |FOO BAR| and |FOO BAR| to get a SUBR property.
How can I get FOO to have a BAR property which is the SUBR property
in question without the generation of the symbol |FOO BAR|
which is useless for my purpose.