Date: Sat, 19 Apr 86 18:19 EST
From: David A. Moon <Moon@SCRC-STONY-BROOK.ARPA>
...
(DEFSETF BAR (#:G1890) (#:G1891) `(SET-BAR ,#:G1890 ,#:G1891)),
where the symbols that look the same are EQ ...
Tangential point: the above can be rendered in Common Lisp without
a tag line in English as follows:
(DEFSETF BAR (#1=#:G1890) (#2=#:G1891) `(SET-BAR ,#1# ,#2#)),
--Guy