Установка значений переменных

Обычный способ изменения значения переменной — с помощью специальной формы setq. Если вам нужно вычислить выбор переменной во время выполнения, используйте функцию set.

Специальная форма: setq [символ форма]…

Эта специальная форма — наиболее распространённый метод изменения значения переменной. Каждому символу присваивается новое значение, которое является результатом вычисления соответствующей формы. Текущая привязка символа изменяется.

setq не вычисляет символ; он устанавливает символ, который вы пишете. Мы говорим, что этот аргумент автоматически цитируется. Буква ‘q’ в setq обозначает “цитированное”.

Значение setq формы — значение последней формы.

(setq x (1+ 2))
     ⇒ 3

x                   ; x now has a global value.
     ⇒ 3

(let ((x 5))
  (setq x 6)        ; The local binding of x is set.
  x)
     ⇒ 6

x                   ; The global value is unchanged.
     ⇒ 3

Обратите внимание, что сначала вычисляется первая форма, затем устанавливается первый символ, затем вычисляется вторая форма, затем устанавливается второй символ и так далее:

(setq x 10          ; Notice that x is set before
      y (1+ x))     ;   the value of y is computed.
     ⇒ 11

Функция: set символ значение

Эта функция помещает значение в ячейку значения символа. Поскольку это функция, а не специальная форма, выражение, написанное для символа, вычисляется для получения символа для установки. Возвращаемое значение — значение.

Когда активна динамическая привязка переменных (по умолчанию), set имеет тот же эффект, что и setq, за исключением того, что set вычисляет свой аргумент символ, а setq — нет. Но когда переменная лексически связана, set влияет на её динамическое значение, а setq влияет на её текущее (лексическое) значение. См. Ограничение области действия переменных.

(set one 1)
error→ Symbol's value as variable is void: one

(set 'one 1)
     ⇒ 1

(set 'two 'one)
     ⇒ one

(set two 2)         ; two evaluates to symbol one.
     ⇒ 2

one                 ; So it is one that was set.
     ⇒ 2
(let ((one 1))      ; This binding of one is set,
  (set 'one 3)      ;   not the global value.
  one)
     ⇒ 3

one
     ⇒ 2

Если символ на самом деле не является символом, генерируется ошибка wrong-type-argument.

(set '(x y) 'z)
error→ Wrong type argument: symbolp, (x y)