Добрый день.Прошу прощения за нубский ворос.
Язык только начал изучать.
По symbol-function выдаёт следующее - #<FUNCTION CAR>
Как исправить, подскажите?

Исправить что? Как вызываете и что ожидаете получить? Что, собственно, не так?

пишу, как в книге - _(defun list1 (x y)
      (cons x (cons y nil)))
_(symbol-function `list1)
(LAMBDA (X Y) (CONS X (CONS Y NIL))), а у меня -->> #<FUNCTION LIST!>

а что не так?

хочу видеть саму функцию, а не её имя

(describe 'list1)

и то не факт, что покажет иcxодный код функции. это зависит от реализации.

ага спасибо, ещё один вопрос,при делении чисел результат выдаётся в виде дроби, как сделать в обычном формате?

по поводу функции, читаю Мир Лиспа т.1 страница 110, там пишут, что по symbol-function показывает исходный код

да вот сами посмотрите - http://i7.fastpic.ru/big/2010/0603/3d/8970cb811cd7b00b3c9363ee80f39a3d.png

> по поводу функции, читаю Мир Лиспа т.1 страница 110, там пишут, что по symbol-function показывает исходный код
там не common lisp

ясно, по поводу дробей подскажите

> при делении чисел результат выдаётся в виде дроби, как сделать в обычном формате?
CL-USER> (/ 1 2)
1/2
CL-USER> (/ 1 2.0)
0.5
man ratio

спасибо за помощь)

(/ 1 2.0)Иногда это неудобно - приписывать нули к целым числам, если сами числитель и знаменатель откуда-нибудь достаются. Более просто:
(float (/ 1 2))