４．MAP関数とプログラム 4.1 関数は１級のクラスCommon Lisp ではScheme と異なって，シンボルはシンボルの値のほかに関数を持つことができます．シンボルから関数を取り出すには関数 symbol-function が用いられます． eval> (symbol-function 'cons) #<Function cons> eval> #'cons #<Function cons>ここで #' はsymbol-functionのシンタックスシュガーです．そして，その取り出した関数を関数引数として与えることもできます．このようにLispでは関数そのものもLispにおけるオブジェクトですので，これを昔は first class citizen と言いましたが，今は「政治的に正しい」(politically correct，PC)言い方として第一級のオブジェクト(first
mapcan は第一引数の戻り値をリストだと期待して、そのリストに第一引数の関数を mapcar した結果を nconc でつなげていく関数です。 (defun my-null (x) (if (null x) (list t) (list nil))) (mapcan #'my-null '(nil 1 2 nil)) ;;=> (T NIL NIL T) ;(mapcar 'null '(nil 1 2 nil)) でいいのは承知の上 (mapcar #'my-null '(nil 1 2 nil)) ;;=> ((T) (NIL) (NIL) (T)) (apply #'nconc '((t) (nil) (nil) (t))) ;;=> (T NIL NIL T) nconc を append に置きかえた mapcaappend を定義してみます。 (defun mapcaapp
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
