つづき(d:id:Nobuhisa:20080120:1200761083) 5.2 直交性 CL-USER 1 > (defvar *!equivs* (make-hash-table)) *!EQUIVS* CL-USER 2 > (defun ! (fn) (or (gethash fn *!equivs*) fn) ) ! CL-USER 3 > (defun def! (fn fn!) (setf (gethash fn *!equivs*) fn!)…

Python2.5でfunctoolsというモジュールが加わったらしい。全体は眺めてないけど，関数の部分適用とかできるみたい。 >>> from functools import * >>> def foo( x, y, z ) : ... return x + y + z ... >>> add5 = partial( foo, 5 ) >>> add5( 2, 3 ) 10 >>>…

自分用メモのつづき。(d:id:Nobuhisa:20080114:1200338245) ようやく4章のコードひと通り復習でけたー。（掲載するのは一部） 4.5 マッピング （ま！ピングー！） CL-USER 1 > (defun map-> (fn start test-fn succ-fn) (do ((i start (funcall succ-fn i)) …

関数一覧ダイアログを表示するM-x list-function

今月7日から申し込みが始まりましたが，もう収容可能人数の1/2以上の申し込み（スタッフ抜き）があるみたいです。懇親会の参加者も何気に多いみたいでうれしいでございます。 当日はナオキさんのモノマネ7連発が見れますので，ぜひ来て下さい。 ローンチ2008…

しまった。まだ書いてない・・・。

結局いつ閉鎖になるんだろう・・・。 v2になってからサイトの状況が悪化してなんか急激に枯れちゃいましたよね。。 振り返れば色々と思い出が。なんかさびしいなぁ。

4章に大量に載ってるユーティリティ関数を早く復習しちゃわないと。。 例のごとく書籍とは完全一致してません。 4.3 のつづき(d:id:Nobuhisa:20071128:1196180768) CL-USER 1 > ;; 簡易版 (defun flatten1 (x) (mapcan #'(lambda (x) (if (atom x) (list x) …

http://d.hatena.ne.jp/uskz/20080108/p1 演算子の話題が出ていて、ふとC#の??演算子を思い出しました。 C#2.0でnull許容型が追加された際にあわせて加わったものですが、使われてるところあまり見ないような気もしますね。 とか言ってる自分も、いざコード…

去年は沢山お世話になりました。 今年もどうぞよろしくお願いします。 抱負は後ほど考えます。 現実味をおびたものにしよう。。。