新千葉 ガーベージ・コレクション

FPGA マガジンやインターフェースで書けなかったこと等をちょぼちょぼ書いてます。@ryos36

2011-02-01から1ヶ月間の記事一覧

copy-list

あやうく copy-list をマクロで作りかけた、、、 [1]> (setf a "a") "a" [2]> (setf ab '(a b)) (A B) [3]> (setf (car ab) a) "a" [4]> (setf ax '(a b)) (A B) [5]> (setf (car ax) a) "a" [6]> ab ("a" B) [7]> ax ("a" B) [8]> (eq (car ab) (car ax)) T…

cl-who をつかう

なぜか HTML を生成するのに ASP.NET を使っているのだが、、、ASP.NET 自体は悪くなく、むしろ、素晴らしい技術だと思うが、使っている人が(契約している開発者)があまり素晴らしくなく、結果としてものすごくネストしたHTMLソースがちらばっている。なん…

asdf2

「2010年現在、asdf2ができていて、旧asdfと仕様が変わっている。 asdf2では、ライブラリのロードは以下の様になる。」のだそうだ #-:asdf (load "/usr/local/lib/common-lisp/asdf/clispfasl/asdf.fasl") (pushnew "/usr/local/lib/common-lisp/system-regi…

Windows のプログラム

よくここでひっかかる。 http://wisdom.sakura.ne.jp/system/winapi/win32/win35.html BOOL InvalidateRect(HWND hWnd , CONST RECT *lpRect , BOOL bErase);という関数をいっつも忘れる、、、あと、ここのサイトの説明がわかりやすかった。 http://www13.pl…

Paul Graham が言っていたこと

On Lisp で Paul Graham が car や cdr の美しさと setf の有益さを語っていたが(たぶん)、いまいちピンとこなかった。さっきプログラムしていて (list (list 'status (some-fuction))) とするとなんだかわからんが、、、、 (let ((rv '((status nil))) (s…