to get a list of all of the symbols do (do-symbols (x (find-package 'lisp)) (print (symbol-name x))) and then sort the list and weed out the garbage. It takes about 1/2 hour to 1 hour. I used the index of Cltl. I should note that the index is not complete so be careful to look up any misses in the body of the text. I've done this for several implementations.