_Guest_____Не должно быть ошибки выполнения. Должно нормально обработаться, а не упасть.

Да ну? А как оно должно обработаться? Так?

А ты не путаешь
c
?

k0rvin Так?

FIXED

МифрилА как это работает?

Что именно?

МифрилА я только начал изучать лисп и ещё не все понимаю, поэтому хочется понять, как не попасть в подобную ситуацию.
Код с eval и багой read я понимаю. Мне интересен сам алгоритм, как вы закрыли эту багу в read. Что тут вообще происходит. Объясните, как сможите, пожалуйста. Считайте меня коммунистом императивным быдлом.

Во-первых это не баг. read делает ровно то, что и должна делать, так как должна делать. Суть в том, что она читает поток символов (character) и преобразует его в S-выражения. Однако с комбинацией символов #. связана функция, которая не просто читает выражение, но и выполняет его (прямо во время чтения программы из файла или другого потока). Эта связь #. и функции хранится в *readtable*, соответственно я просто создал копию этой таблицы и переопределил в ней (копии) эту связь, т.е. в *my-readtable* #. связана уже с другой функцией, которая не выполняет код, а просто возвращает его в виде процитированного (quote) S-выражения. Подмена таблиц осуществляется с помощью динамических переменных (об этом в гугле почитаешь).

Фишка в том, что никто не станет использовать функции eval, compile, read напрямую для обработки текста, введенного пользователем (если только это специально не нужно), поэтому претензии Гостя непонятны.