ネットで拾ったYコンビネータ2つ。 type rcs<'a, 'b> = Rec of (rcs<'a, 'b> -> ('a -> 'b)) let y maker = (fun (Rec f) x -> maker (f (Rec f)) x) (Rec (fun (Rec f) x -> maker (f (Rec f)) x)) // テスト let fact = y (fun f x -> if x = 0 then 1 els…

月曜にMSDN Subscribers向けに公開されていましたが、今日一般向けの公開も始まりました。http://tinyurl.com/vsbeta2downloadなので早速インストールしてみました。

ためのメモ。まずWindows Timeサービスを起動する。 net start w32time 次にw32tmコマンドを使って、同期先のNTPサーバを指定する。 w32tm /config /manualpeerlist:ntp.jst.mfeed.ad.jp /syncfromflags:manual 複数のNTPサーバを使う場合は/manualpeerlist…

Thunderbirdを使ってIMAPでExchange Server 2007へ接続している時に、 日本語検索がなんとか機能しないものかといろいろ試していたら、 いつの間にかメールにwinmail.datが添付されて見えるようになってしまいました。特に害があるわけでもないんですが不要…

世の中便利になったもので、Windows APIを呼ぶにも Windows API Code Packなるものを使えば C#からあんなことやそんなこともできてしまうそうですよ。というわけでWindows 7も近いことですし、C#のWinFormアプリでJumpListなど使ってみようという話です。ち…

JScriptで再帰的にフォルダを作る： function CreateFolderEx(n) { var wsh = new ActiveXObject("WScript.Shell"); var fso = new ActiveXObject("Scripting.FileSystemObject"); var re = /^.:\\/; var paths = n.split("\\"); var target = ""; if (!n.ma…