「裸のように見える服は良くて、裸はだめ」ってのはナンセンスだよなあ。追記: どちらかといえば、裸はいいと思いますよ！

今年もよろしくお願いします

今日の一行(お題)2進符号列 への解答 (use srfi-1) (define (gray n) (map (lambda (x) (logxor x (ash x -1))) (iota (expt 2 n)))) (define (main args) (map (cut format (current-output-port) "~4,'0',B\n" <>) (gray 4)) (load "./bitdiff.scm") (prin…

今日の一行(お題)flips への解答組み合わせの数え上げは util.combinations にあると教えて頂きました。自然数のリストを並べ替えて、それをもとに引数を並び替える、というのがダサい。生成された関数では、すでに並び替えが終わっている、と言う風に出来な…

ネロと犬ってどっちがパトラッシュだっけ？

SXML みたいな、STeX を定義すればいいんじゃ？と思ったけど、地の文をいちいち"で囲む必要があって激しく面倒そう。あ、そんなこと無いか。……閉じカッコが邪魔かも。

揮発性。C で、volatile という語は、const のように、変数を修飾するために使います。volatile な変数は、コンパイラによる最適化が抑えられます。 #define DOTIMES 500 void func() { int i, cond = 0 for (i = 0; i < DOTIMES; i++) { if (cond) do_somet…

出たようです。cwcompile スゲー！サンプルムービーの真似をして、(c-load "Cocoa/Cocoa.h" ...)をやってみたら、メチャクチャスワップしまくって時間がかかったので、メモリ欲しいなあと思いました。(c-load "SDL/SDL.h" ...) しても、案の定エラーが出て動…

今日の一行(お題)ビット変化列 への解答。こんな単純な話なのだろうか？題意を読み間違えてる？ビット数を固定すると良いことがあるんだろうか。 (define (bitdiffs seq) (define (logdiff i j) (logcount (logxor i j))) (define (bitdiffs_ i s) (if (null…

でも taglib を使ったら読めた。とりあえず taglib に乗り換えよう。どっちのライブラリでも v2.4 にすると読読めない。 (use gauche.uvector) (use gauche.charconv) (use c-wrapper) (c-load-library "libtag") (c-load-library "libtag_c") (c-include "t…

かえる三十郎 - Rubyでmp3のタグをいじるには3の内容を Gauche に移植してみました。 (use gauche.uvector) (use c-wrapper) (define (main args) (c-load-library "libid3") (c-include "id3.h") (let* ((tag (ID3Tag_New)) (#f (ID3Tag_Link tag "test.mp3…

今日の一行 (お題) flips (↑ぐお！はてな記法だとリンクに[]が使えない！) をみて、なんか出来そうだなーと思ったけど、無理だった。はじめ、組み合わせを数え上げればいいのだと思って、 (use srfi-1) (define (reverse-append s1 s2) (if (null? s1) s2 (r…

いいなあ。かわいい国

をはてなダイアリーでやろうと思ったら、シンタックスハイライトが言語毎にCSSでカスタマイズできないっぽいので、はてなアイデアで提案してみた。http://i.hatena.ne.jp/idea/13505今のうちに株を買っとくといいと思います(？)。

http://itpro.nikkeibp.co.jp/a/it/index/interview_ind.shtml

のをどうするか？と言う問題にぶち当たった……具体的に言うと、id3libの、ID3_Frame クラスなんですが、これは基本的には ID3_Tag 内部でメモリの生存が管理されているので、 ID3_Tag のメソッドで ID3_Frame を取り出した後に、その ID3_Frame を ID3_Tag か…

#b0110 ;; => 6 (integer->char #b1100001) ;; => #\a

じゃあもう c-wrapper でいいんでは？

まず、なんだかよくわからなかったこれ /* Register this DSO to Gauche */ SCM_INIT_EXTENSION(id3lib); は、拡張モジュールを読み込んだ、と言う情報を登録する手続きだろう。多分。新しい型を定義する必要がある奴はとりあえずコメントとして関数名を並べ…

差し当たって、新しいクラスを定義しない範囲で、メソッドを Scheme 側に定義していこうと思います。出発点 ;;; ;;; id3liblib.stub ;;; " #include \"id3lib_glue.h\" " ;; これは多分、stub中でオートボクシングのために使われる定義 ;; 実際の定義は、id3…

今年はカンガルー年ということらしい。去年はクマ年だったかな？

なんかいろいろ間違ってたので修正しました。とりあえず、 (use media.id3lib) が成功した。おめー！でも何も出来ない。何故だろう…… === Makefile.in ================================================================== --- Makefile.in (revision 1214)…

MP3 を管理しようと思い立ったので、まずid3libなるものの Gauche バインディングを作ることを試みようと思います。id3lib は ID3 タグを扱う C++ ライブラリです。使ったこと無いですが。この企画がいつまで続くかも分からないですが。さて、 Gauche 本体に…

簡単な言葉で喋ってくれるから、相手が喋ってる内容はほとんど理解できるんだけど、たまに発音が早かったり、知らない単語とかのせいで分かんなくて、"え？"って聞くと、相手は"こいつは今までの話も全部理解できてんのか？"って感じにさせてしまうので、"う…

いかにもチーズって言うイメージな塊のやつ。切ったのをいただきました。日本ではあんま売ってないよね。少なくともみたこと無い。普通にチーズの味でした。美味しかった。

via ビッグコミックオリジナル

すかっとする。削除されませんように……。また見よう。それにしても、一般の人々はこんな内容の映像を最後まできっちり見るだろうか？という問題はあるよね。せめてスライドは欲しいなあ。こういうことをちゃんと言う人がいるということは重要だ。今後も頑張…

すいません課題さぼっててすいません。担当の先生のページ](I write a link to this page because I'm wasting time, but I need English capability.)素晴らしいっ！素晴らしすぎて涙がKnuth 先生と Linux さんと、 RMS の写真を並べるセンスが最高すぎます…

インデントで読む(とshiroさんがどこかで仰っていた)し、カッコの色をうすくすれば(0xcc.net)気にならないから、読みやすさには関係しないんじゃないかなあ。むしろ、閉じカッコ連続)))))を書かなくて良い、というのがメリットではないかと。と言う話を書こ…

こんなことはshinhさんがとっくにやっていらっしゃると思いますが…… SDL の main を使うために、GDC の libgphobos.a から main を抜いてみました。とりあえずそれで Hello world が動くことは確認しましたが、SDL が動くかはまだ確認してません。追記: ぱセ…