GENSYM бывает, приходится использовать, INTERN тоже недалеко от него. Например тебе нужно обогатить язык чем-то вроде определения структуры (defstruct) - задаешь базовое имя (mystruct), а макрос придумывает новые символы на его основе (make-mystruct, mystruct-myslot ...), присваивает им значения, еще mystruct-slotcount, mystruct-slotlist можно придумать например и т.п., все автоматически.

Нашел у себя в коде INTERN.
Я создаю структуру данных с идентификаторами элементов - ключевыми словами. Некоторые элементы потом добавляются автоматически, при занесении новых данных. Им, при помощи INTERN, даются автоматические идентификаторы.

Нет, так не надо пользоваться INTERN.

Я использовал так

                    (make-gd-file 

                      :id (intern (format nil "FILE~D" k) 'keyword)

                      :place (rect x y (+ x 200) (+ y 100))

                      :visopt 4)))

В результате создавался gd-file с идентификатором, например, 'FILE123. Но так может тоже не нужно делать, т.к. это лишняя нагрузка на таблицу символов, а таблица не для этого создана.

Я не понял, что ты хочешь сделать. Вместо intern можно писать |a|, |b| но в чем смысл? И тебе правда нужен двумерный массив с одним измерением единичной длины?

string-upcase

Функций, принимающих символ или строку не так много, не обращай на них внимания.
Символы при чтении программы преобразуются в ссылки, эквивалентные указателям и потом (при выполнении программы) сравниваются не строки, а эти указатели, что гораздо эффективнее.