SA
для 0
Size: a a a
2020 October 26
BB
Я думал нечто вроде copy-list исправляет это проблему присваивания.
SA
ничего не устраняет
SA
аргументы передаются по
SA
типа
SA
копии ссылки
a
Тук-тук. Это опять я.
Ваша функция:
>? (defmacro super-quote (arg) `(quote ,arg))
А это примерно то что мне нужно:
>? (defun set-new (new-arg val) (setq (super-quote new-arg) val))
Но:
>? (set-new НАШЛОСЬ 1)
> ...выдаёт ошибку о том что НАШЛОСЬ не имеет значения
Хотя в new-arg "НАШЛОСЬ" уже подставлено, и я ожидал что можно будет:
>? НАШЛОСЬ
> 1
Я написал через setq потому что setf не заработал, выдало ошибку вроде "...error (setf quote)... . Раньше тоже помню что setf не работал в этом случае. Но зато кажется обычный set работал. Причём вроде начиналось как-то так:
(set '(super-quote ...
Ещё вроде был eval, кажется два, вот так как-то:
(eval (quote (eval...
Между ними был наверное quote. Странно было что при одном eval-е оно не работало, а с повтором заработало, хотя
(eval (quote...
кажется можно долго повторять.
Ваша функция:
>? (defmacro super-quote (arg) `(quote ,arg))
А это примерно то что мне нужно:
>? (defun set-new (new-arg val) (setq (super-quote new-arg) val))
Но:
>? (set-new НАШЛОСЬ 1)
> ...выдаёт ошибку о том что НАШЛОСЬ не имеет значения
Хотя в new-arg "НАШЛОСЬ" уже подставлено, и я ожидал что можно будет:
>? НАШЛОСЬ
> 1
Я написал через setq потому что setf не заработал, выдало ошибку вроде "...error (setf quote)... . Раньше тоже помню что setf не работал в этом случае. Но зато кажется обычный set работал. Причём вроде начиналось как-то так:
(set '(super-quote ...
Ещё вроде был eval, кажется два, вот так как-то:
(eval (quote (eval...
Между ними был наверное quote. Странно было что при одном eval-е оно не работало, а с повтором заработало, хотя
(eval (quote...
кажется можно долго повторять.
(setq (super-quote new-arg) val) это ошибочно. setq действует на символах.BB
Ну так может что-то можно натворить с keyword-ами, хотя я уже забыл как ими пользоваться. Вроде кейворд доступен отовсюду. Я ещё пробовал как-то через (make-symbol, но оно возвращало #:название-символа, и я не понял как дальше работать. Вроде как-то uninterned.. но я не разобрался.
SA
символы доступны отовсюду
SA
это вообще ни при чем
BB
Ну там оно всё равно же как-то на лямбды раскладывается изнутри. И всё это просто атом в списках. неужели нелья как-то перетасовать атомы, и подставить один под аргумент как мне надо.
BB
"атомы", не "атом"
VM
Тук-тук. Это опять я.
Ваша функция:
>? (defmacro super-quote (arg) `(quote ,arg))
А это примерно то что мне нужно:
>? (defun set-new (new-arg val) (setq (super-quote new-arg) val))
Но:
>? (set-new НАШЛОСЬ 1)
> ...выдаёт ошибку о том что НАШЛОСЬ не имеет значения
Хотя в new-arg "НАШЛОСЬ" уже подставлено, и я ожидал что можно будет:
>? НАШЛОСЬ
> 1
Я написал через setq потому что setf не заработал, выдало ошибку вроде "...error (setf quote)... . Раньше тоже помню что setf не работал в этом случае. Но зато кажется обычный set работал. Причём вроде начиналось как-то так:
(set '(super-quote ...
Ещё вроде был eval, кажется два, вот так как-то:
(eval (quote (eval...
Между ними был наверное quote. Странно было что при одном eval-е оно не работало, а с повтором заработало, хотя
(eval (quote...
кажется можно долго повторять.
Ваша функция:
>? (defmacro super-quote (arg) `(quote ,arg))
А это примерно то что мне нужно:
>? (defun set-new (new-arg val) (setq (super-quote new-arg) val))
Но:
>? (set-new НАШЛОСЬ 1)
> ...выдаёт ошибку о том что НАШЛОСЬ не имеет значения
Хотя в new-arg "НАШЛОСЬ" уже подставлено, и я ожидал что можно будет:
>? НАШЛОСЬ
> 1
Я написал через setq потому что setf не заработал, выдало ошибку вроде "...error (setf quote)... . Раньше тоже помню что setf не работал в этом случае. Но зато кажется обычный set работал. Причём вроде начиналось как-то так:
(set '(super-quote ...
Ещё вроде был eval, кажется два, вот так как-то:
(eval (quote (eval...
Между ними был наверное quote. Странно было что при одном eval-е оно не работало, а с повтором заработало, хотя
(eval (quote...
кажется можно долго повторять.
(defmacro set-new (new-arg val) `(setf ,new-arg ,val)) Но в этом мало смысла.
SA
ни на какие лямбды оно не
SA
раскладывается
SA
ну иногда мб
SA
чето такое происходит
BB
Вроде даже сам eval не МакКартни придумал, и тоже был удивляён что это мини-интерпертатор.
SA
ладно стоп на самом деле
SA
ой зря я это прочитал ща