CommonLispの*みたいなかんじのを考えた。健全じゃないから使えないけど。 (let$ (assoc 'Hanako '((Taro . 28) (Saburo . 19) (Hanako . 20))) (if $_ (cdr $_) "Not Found") (print "Hanako's age : " $_)) を (let (($_0 (assoc 'Hanako '((Taro . 28) (S…

c-wrapper - A Generic Wrapper for C Libraries すごい！

全部概観をつかむため、斜め読み。 vm.cとgauche/vm.h 昨日gauche.hを読んでgaucheのオブジェクトのシステムをあやふやだけど理解したので、一番興味のあるVM関連のソースを読む。細かいところまで読むと、時間がかかり過ぎるのでかなり斜め読み。 compile.s…

全く他の人の書いたソースを読んだことがないので練習として。 http://hira.main.jp/wiki/pukiwiki.php?2005_6_23%A5%AB%A1%BC%A5%CD%A5%EB%BA%C2%C3%CC%B2%F1%AD%A1 この、ひらメソッド、というのを念頭において読むつもり。 まず、gauche.h http://wiki.mo…