ちょっと古いものなんだけど浮動小数点数の加算についてのround to evenをテストしてみたりなんかしたコードが埋もれてたのを発見。せっかくなので置いておくことにした。 よくある四捨五入っていうのは0.5丁度のときに問答無用で切り上げるけれども、round …

あるツールのプラグインはwin32 dll になっているんだけど、僕のやりたい部分だけサポートされていないみたい。しかし実際既存dllはあるわけだから、きっと方法はあるんだろう。自社内でなにやってんだとか、多少腰砕けなんだけど、ツール製作部署に質問かけ…

iTunes Storeの試聴やpodcastとか中心にすっかり使いこなしてるんだよな。末恐ろしい。 次は何を解放しようかな。

んれしい

しばらく追いかけてなかった。ので、久々に追いかけて覚書。 PEP 372: 順序付き辞書 rubyでも1.9からこっちになって、しかしあんまり利点がわかってなかったんだけど、例えばconfigファイルとかでパースして利用して、それを読み込んだ順でそのまま保存でき…

今朝見たら根が伸び始めてる。 なんかうれしい。

昨日はいろいろやろうと思っていたのに、疲れたらしくって爆睡してしまった。もったいない。なんも勉強できていない。 しかし、、、ただでさえメモリが少ない非力なマシン、しかも毎日正午にはウイルススキャンがフルスキャン始めて、昼休み終わっても完了し…

Quartusコンパイル中。会社PCが遅すぎでキレそう。高々H8とIPコアx2程度なのに… 嗚呼、うち帰って作業したい。 しかも、、"multiple constant drivers for >" とな。。。担当者出てこいっ！ ってあの人か。。。 ... ... ... orz

草引き終わった。凄い根が深くって、しかもがんじがらめでちょっとやそっとでは抜けない奴らがいやという程群生していた。軽い気持ちで始めたものの気がついたらこちらは鍬とか鎌とかねじり鎌とか、最後には根切りとか虎の子まで使ってなんとかやっつけた感…

以前は趣味で畑を借りて、芋とかゴーヤとか茄子とか豆とかの色々な野菜を作っていた。趣味ながらもそれなりの収穫で、楽しく健康的に美味しい、という非常に贅沢なお遊びをさせてもらっていた*1。しかし、今住んでいる社宅に引っ越してからというもの、なん…

嵐（２歳）が去ったので、勉強再開。 高レベルなやつ(S式を読む。lexer込み)と低レベルなやつ(単なるIO)がある。 入力 read S式を読む。 read-line, read-char, read-byte 行や文字を読む。 read-*系をgoshの対話環境からやろうとするとコマンド入力バッファ…

少し空いてしまった。前回は文字列のところ。正規表現から。 リテラル は #/regex/ 。覚えやすい。#/../iでcase-insensitive。ひょっとして gとか使える？ と思ったけどダメだった。 正規表現自体は殆どperl5。 マッチング rxmatchを使ってマッチング。けど…

とりあえず明日の仕事というか宿題が終わったので、schemeに戻れる。 まずどっちからやろうかな、と考えて、より大変そうなcutからやってみる。早速 srfi-26を覗いてみる。 と、こんな感じの入り口マクロに (define-syntax cut (syntax-rules () ((cut . slo…

昨日はホタルを探しに近くの農村近くの川まで行ってきた。最初は大した数いないように思えたんだけれど、ケータイのライトを点滅させてたら呼応してどんどん増えてきた！ 実は８時頃がピークなんだそうだけど、お時間になる前に凄い数のホタルの響宴となって…

また出張だよー。

いろんなのを見ようという事で、大阪まで出ていって遊んでこようかと。ついでにスウェーデンハウスに行って、詳細打ち合わせ始めるのだ。 関係ないけど大阪のドライバー怖いよう（という偏見）。

新居立てる用地にまた行ってみようと言う事になったので、ついでなのでちゃんとした（子供用）サッカーボールを途中で買って行く事にした。ところが、クルマの中でタイミング悪くお子様は沈没。寝ちゃった。残念なんだけど、とりあえず周りのおいしい空気を…

朝っぱらからパン食べ過ぎ。昼飯の準備もできたし、腹ごなしに目覚めのscheme（？）。というか真横で塊魂を嗜む息子（２歳）。うーん、変な家庭 ・ω・ 文字 #\ かなるほど（そんだけかよ）。 #\spaceとかもつかえるらしい。他に何があるのかな、、とread.cを…

今日は奥様が職場の歓迎会、ということで久しぶりに夜子供と二人きり。 ご飯の用意がちょっと楽しいのであった。早く寝かせてたくさん遊ぼうかなー、とか鬼な事考えている。 しかしまあ、起きてる限り次から次へとトラブル起こすなこいつは。本質的でない部…

デモ用のLCDパネルの出力映像を動画にして販売促進用に使うって言うような話で、はて、フォーマットは？とか言う話になって困った。 僕の周りにいるような人たちのPCには大抵最低限でも MPEG1/2/4くらいは当たり前。でCinepackやらDivXやらH264やらVC-1やら…

http://d.hatena.ne.jp/tkuro/20090604/1244149299#c なるほど。。。 shiro 2009/06/05 12:26 「整数」と「整数型」を混同されてませんか? 3も3.0も「整数」です。3.0は「整数型」では表現されませんが。はい、、完全に混同してました。教えてもらったリンク…

p.155の ・整数（例： 100、3.0)となってるのの3.0って3の間違い？ gosh> (class-of 3) #<class <integer>> gosh> (class-of 3.0) #<class <real>> 二進数とか。 gosh> #b101010101010 2730 バイナリアンにはありがたい。 ほかに #o octal #d decimal #x hexdecimal #e exact number #i in</class></class>…

SICPを思い出した。 抽象度の高いモデルで計算を考える。 置き換えモデル 順次プリミティブになるまで、オペランドを置き換えていって、最終的にすべてのオペランドがプリミティブになったところで計算終了。 副作用とかassignとか、基本的に時間概念が入る…

予定通りgauche.testで遊んでみようかと (test* "hoge" expected test-code &opt cmp-fn) 思ったんだけどまあ当たり前のように当たり前。 メインは例外処理か。 (guard (e ((cond1) v1) ((cond2) v2) ( else default-case)) (body)) 最初 ZERO DIVIDEひっか…

なんというかそのまんまな名前だけど。。。 http://gizmodo.com/5276347/sony-playstation-motion-controller-video-how-it-works これは凄い（かも）。PSP Go!よりは楽しそうなネタ。 Motion Eye買ったときにも感じたけど、これは上手く使えばものすごく楽…

どうでもいいことかもだけど、 クロージャーがサポートされている言語でこれが出来るのはそれほど驚かない。が、Cでも出来てしまう。久しぶりにCodePadのお世話に。 これは間違い。単に *point = NULL; がコード領域なので書き込み違反になっているだけ。実…

member gosh> (define (my-member elm lst . options) (let-optionals* options ((pred equal?)) (cond ((null? lst) #f) ((pred elm (car lst)) lst) (else (my-member elm (cdr lst) pred))))) my-member gosh> (my-member 'ration '(cookie dagger ration…

gosh> (define (ccar lst) (if (pair? lst) (car lst) #f)) ccar gosh> (and-let* ((a '(("reach!"))) (b (ccar a)) (c (ccar b)) (d (ccar c))) d) #f gosh> (and-let* ((a '((("reach!")))) (b (ccar a)) (c (ccar b)) (d (ccar c))) d) "reach!" モナドっ…

gosh> (if (if (= 1 0) #t) "true" "false") "true" そか、やっぱりundefって#fじゃあ無いのか。

gosh> (define (my-any-pred . preds) (lambda (x) (any (lambda (p) (p x)) preds))) my-any-pred gosh> (define sym-or-string? (my-any-pred symbol? string?)) sym-or-string? gosh> (sym-or-string? "hoge") #t gosh> (sym-or-string? 10) #f gosh> (sy…