Lisp - setq和car

Question

我想用GCL lisp做一些类似的事情：

(setq (car '(a 1)) (cdr '(a 1)))

得到…的结果：

(setq a 1)

这是可能的吗，或者像这样的事情？致敬，德克兰

Answer 1

是的，这是可能的。Common Lisp有一个完整的生态系统，你可以在程序运行时编译和做各种事情。

(setq test value)最初只是一个转变为(set 'test value)的宏。set已经被弃用了，但我怀疑它是否会被删除。

(set 'test 'a)
(set test 10)
a ; ==> 10

现在，setq确保您不会忘记小引号，因为99,99%的时间您命名了您想要的变量，并且您不需要半天的调试来查找缺少的引号。