第1回 Scheme コードバトン
第1回 Scheme コードバトンのお知らせ - ひげぽん OSとか作っちゃうかMona- に参加しました。
- higepon さん http://gist.github.com/273431 http://d.hatena.ne.jp/higepon/20100110/1263121990
- g000001 さん http://gist.github.com/273441 http://cadr.g.hatena.ne.jp/g000001/20100111/1263204766
- aka さん http://gist.github.com/273567 http://aka-cs-blog.blogspot.com/2010/01/scheme.html
- 私(quek) http://gist.github.com/274187
ときて次は snmsts さんにお願いしました。
higepon さんのとろでは Scheme でのコマンドラインツールでした。 g000001 さんのところで Common Lisp での repl 上のツール(関数)になっています。 aka さんのところで単語登録ができるようになりました。
私の変更は次のとおりです。
- "~" を解釈しない Common Lisp なので (merge-pathnames ".hige/words.txt" (user-homedir-pathname)
- (probe-file dict-file) で辞書ファイルの存在をチェックして
- 辞書ファイルがない場合は (ensure-directories-exist dict-file) でディレクトリだけは作成しておく
この遊びは面白いですね。変更量も変更内容も人それぞれで、コードを読むのが楽しいです。
0 件のコメント:
コメントを投稿