(define (make-table same-key?) (let ((local-table (list '*table*))) (define (assoc key records) (cond ((null? records) #f) ((same-key? key (caar records)) (car records)) (else (assoc key (cdr records))))) (define (lookup key-1 key-2) (let …

ふと気づいたが、ここ半年でWindowsを立ち上げる回数がグッと減った気がする。 実際オフィスとかはOOoで事足りるし（大学のコンピューターにもインストールされているのは、下宿先にプリンターが無い私にはありがたい話です。）、ゲームも結構動く。 まぁこ…

なんか場違いなタイトルな気もするがメモ。2chのスレ見てたら分かったけど、最近のwineはすごいっすな・・・ エロゲがムービーまで動いたがな・・・ちなみにwinetricks (http://www.kegel.com/wine/winetricks) を適当に落としてきて directx9 と wmp9(もし…

実際できるだろうと分かっても、書いて動かすと何か楽しかった。

(define (print-queue queue) (front-ptr queue)) とりあえずこんだけ。 まぁ空になってもrear-ptrにゴミが残るのは注釈参照ですな。

やっと解けた・・・。もっと精進せねば。

以前SICPの解答をちまちま載せていこうと決心するものの、試験とかでダルくなって消してしまった。 夏休みになったので、もう一回チャレンジ ちなみに現状は3.23まできてる。 過去の奴はHDD漁って少しずつ載せていければいいなぁ

調子いい感じ。（・・・問題はこの次な気もするが） 以下解答。