Emacsには、Lisp：ローカルスコープで（例えば関数スコープ）

Question

私のコードは次のようであるが引用符を使用してリストを作成します。私は結果が

(A B) 
(A B) 

私の場合であることを期待するので

(defun test() "Test." 
    (setq lista '(A)) 
    (push 'B lista) 
    (nreverse lista)) 

(message "%s" (test)) ; Output is (A B) 
(message "%s" (test)) ; Output is (B A B) 

それは奇妙に思えます(setq lista '(A))を(setq lista (list 'A))に置き換えると、結果が期待されます。リストを作成する方法によって違いが生じると思いますが、詳細はわかりません。

私のEmacsのバージョンは、GNU Emacsの24.5.1

Answer 1

であるあなたは、このやっている：

(defvar t1 '(A)) 
(defun test() 
    "Test." 
    (setq lista t1) 
    (push 'B lista) 
    (nreverse lista)) 

をあなたは、コードの一部ですコンスセルを変更します。最初の呼び出しの後、t1は'(A B)になります。

は(list)代わりの(quote)を使用して、それを避ける：

(defun test() 
    "Test." 
    (setq lista (list 'A)) 
    (push 'B lista) 
    (nreverse lista))