[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

(eq #'f #'f) and :TEMPORARY hash tables

After all the dust has cleared, it seems that you don't need to use
SYMBOL-FUNCTION at all to test function equality in make-hash-table or
similar functions.  So it doesn't matter whether SYMBOL-FUNCTION is a
plain accessor or not.  FUNCTION, however, tends to be NOT a plain accessor.
So the predicate passed to make-hash-table will have already been built by
the caller having issued FUNCTION, and probably the most appropriate way to
code the thing (assuming an Interlisp EQP function or something like it)
would be:
 (if (eqp test '#,#'eq) (blah blah blah ...))