[xyzzy:02493] Re: Common の質問

[masahito henmi <henmi@xxxxxxxxxxxxx>]

cake-smd@xxxxxxxxxxxxx さん、こんにちは。masahito です。

|λ式の中で再帰(自分自身を呼ぶ)する方法が分からないことに気づきました。
|だって呼ぼうにも名前がないんですよね。
|
|そういうことは可能なのでしょうか？

局所関数を定義するとか

(defun my-sum (&rest arg)
  (labels ((my-sum0 (L)
    (if (consp L)
        (if (null (cdr L))
  	    (car L)
	  (+ (car L) (my-sum0 (cdr L))))
      nil)))
    (my-sum0 arg)))

あまり使ったことないんで、これで合ってるかな？
一応xyzzyでは動きましたが。

------------------------------------------------------------
逸見雅人    Masahito Henmi  henmi@xxxxxxxxxxxxx