[Didencool]

Здравствуйте уважаемые
недавно начал изучать автолисп и столкнулся с проблемой
хочу создать список который будет содержать вложенный список в виде переменной
помогите пожалуйста разобраться с этой проблемой, если тема обсуждалась дайте плс ссылку.
я попробовал решить данную проблему вот так.

Код:

[Выделить все]

(defun c:test(/ varlist finlist)
  (setq varlist
    (list(0 0))
  (setq finlist
    (cons '(0) 'varlist)
)

но переменная varlist воспринимается как элемент списка а не как переменная.
Заранее спасибо

[Игорь Костюкович]

Убери функцию quote (') перед varlist...

[Didencool]

спасибо огромное, сейчас попробую.

[Do$]

Сообщение от Didencool Здравствуйте уважаемые недавно начал изучать автолисп и столкнулся с проблемой хочу создать список который будет содержать вложенный список в виде переменной помогите пожалуйста разобраться с этой проблемой, если тема обсуждалась дайте плс ссылку. я попробовал решить данную проблему вот так. Код: [Выделить все] (defun c:test(/ varlist finlist) (setq varlist (list(0 0)) (setq finlist (cons '(0) 'varlist) ) но переменная varlist воспринимается как элемент списка а не как переменная. Заранее спасибо

Если я правильно понял, то в список должно входить имя переменной, то есть результат должен быть такого вида:
(VARLIST 0 1 2 3)
Тогда код будет выглядеть примено так:

Код:

[Выделить все]

(defun c:test (/ varlist)
  (setq varlist (list 0 0))
  (cons 'varlist (list 0 1 2 3))
) ;_ end of defun

Только в этом случае после завершения работы функции C:test переменная varlist будет иметь значение nil.
И смысла в оперции присваивания

Код:

[Выделить все]

(setq varlist (list 0 0))

никакого.

[Didencool]

Сообщение от Do$ Только в этом случае после завершения работы функции C:test переменная varlist будет иметь значение nil. И смысла в оперции присваивания Код: [Выделить все] (setq varlist (list 0 0)) никакого.

смысл теоретический, а не практический.
суть в упрощенном виде, указание точки вставки, и после запроса данных длины линии, должно вывести линию от точки вставки заданной длины например по оси Х
для контроля списка конечно добавлено (print finlist)
за доп.информацию конечно спасибо пис

[Кулик Алексей aka kpblc]

Не очень улавливаю нить рассуждений... Про это, что ли, разговор?

Код:

[Выделить все]

  (setq varlst '(0 0)
        finlst (cons 0 varlst)
        ) ;_ end of setq

[Didencool]

Не очень улавливаю нить рассуждений... Про это, что ли, разговор?

похоже на то
я совсем запутался с пониманием функции quote(')

[Кулик Алексей aka kpblc]

В данном контексте (если я не прав - пусть мне дадут по башке и скажут как верно ) функцию quote (') можно принимать как аналог list.

[Игорь Костюкович]

Кулик Алексей aka kpblc, даю по башке

В данном контексте, я просто в скобках, которые не имеют никакого отношения к Lisp'у, указал вариант вызова функции (quote). Прошу прощения, что ввёл уважаемую публику в заблуждение...