ヨタの日々

プログラマな本

賞与を貰ったら買おうと思ってる本。メモ。

• 計算機プログラムの構造と解釈 第二版
  
  
• リファクタリング プログラミング体質改善テクニック
  
  
• The Art of Computer Programming
  これの和訳って無かったっけ。つか、つい最近 errata があるじゃんか。
  
  
• 「超」整理法
  良いらしい。
  
  
• 不正アクセス調査ガイド
  
  

_ トロ

せっかくなのでトロをキーワードに反応させてみました。

まずは先日書いたプログラムを適当な名前に mv して path が通ったディレクトリに置きます。ここではプログラムの名前を toro にしました。

次に以下の 1 行 patch。

*** irchat-handle.el.src	Wed Jun 19 18:45:40 2002
--- irchat-handle.el	Wed Jun 19 18:46:59 2002
***************
*** 252,257 ****
--- 252,258 ----
  		   (save-match-data
  		     (cond ((string-match (car re) temp)
  			    (funcall irchat-pj-sound-words-function prefix)
+ 			    (run-hooks 'rin-irchat-pj-sound-words-hook)
  			    (setq re nil))
  			   (t (setq re (cdr re)))))))))
  	;; end

.emacs 等に以下の関数を定義。

;; キーワードに反応してトロが踊る
(defun rin-irchat-pj-sound()
  (call-process "toro" nil nil nil "/dev/ugen0" "5" "100" "0"))
  (add-hook 'rin-irchat-pj-sound-words-hook (function rin-irchat-pj-sound))

これだけ。やってることはたいしたことないです。

ただ、トロハブが存在しないときとかのエラー処理なんか何もやってないので、これはトロハブを接続したシステムに適用しないと意味が無いっす。

やってて気づいたんだけど、トロの右手が動かなくなってます。うぐぅ。壊れたかな。