[[About:self:AboutPage.txt]] | [[Profile:http://iddy.jp/profile/southly/]] | [[まとめ:self:1163859357.txt]] | [[オリジナル:http://ninjinix.x0.com/rn/]] | [[xyzzy:http://raido.sakura.ne.jp/southly/xyzzy/site-lisp/]] | [[あんてな:http://i-know.jp/southly/listall]] | [[■:http://raido.sakura.ne.jp/southly/lisp/ni/view.lisp]] | [[buzz:http://www.google.com/profiles/southly#buzz]]

　http://pypi.python.org/pypi/hgsvn/
メモ。
svk の代わりにこれが使えるなら、CodeReposとかも使えるなぁ。

• [[hgrepos:grepos/]] を hgwebdir.cgi に切り替えた。
• hg clone していた人がいたら、しなおした方がよいと思います。
• [[rss.lisp:lisp]]
• [[read.lisp:http://raido.sakura.ne.jp/southly/hgrepos/common-lisp/file/d65727662fa7/ni/read.lisp]]
• HEAD にリンクをはる方法があればなぁと思いつつ。
• ファイルごとに文字コードを指定できたらなぁ。
• hgwebdir.cgi で設定してしまえば repository を増やすのに躊躇する必要がないし、いっぱい作っておいた。

userdirを使えるようにするために毎回調べているのでメモ。

cd /etc/apache2/mods-enabled/
ln -s ../mods-available/userdir.conf .
ln -s ../mods-available/userdir.load .

cgiやら.httacessやらを許可するためにuserdir.confの方を書き換える。
面倒なので両方Allで。

<IfModule mod_userdir.c>
        UserDir public_html
        UserDir disabled root

        <Directory /home/*/public_html>
                AllowOverride All
                Options All
        </Directory>
</IfModule>

参考: http://x68000.q-e-d.net/~68user/webcgi/server-config.html

• ドキュメントを更新。
• http://raido.sakura.ne.jp/southly/lisp/doc/
• ソースの公開は repository を作ってから。
• 修正の必要な部分だけ再定義して出力を変えようとしたけれどうまくいかなかった。
• 関数定義のタイミングでマクロが展開されているということは、マクロを再定義したらそのマクロを使っている関数も再定義が必要ということですな。
• ソースを書き換えてしまった方が手軽だな。
• Common Lisp に慣れすぎて Scheme は書けそうにないなと思った。

• http://cl-www.msi.co.jp/solutions/knowledge/lisp-world/articles/three-dogmas-of-scheme
• 再帰の件については SANO さんの書いている形に解釈されれば問題ないと思いますが、Scheme の仕様上は以下のようになるということなのだと思います。(Schemeはよく知らないので自信はありませんが)

(defun foo (i l)
  (if (>= i 5)
      l
    (foo (1+ i) (cons (lambda () i) l))))
(mapcar #'funcall (foo 0 nil))
=>(4 3 2 1 0)

• 再帰ということは関数呼び出しなわけで、レキシカルスコープの境が生まれる、この点が iteration と決定的に異なるという話だと理解しました。
• というか、黒田さんの話が聞けると知っていたら絶対行ったのに…… 残念だなぁ。

xmls で日本語を出力するには、write-escaped を修正する。
例えば以下のような感じ。

(in-package :xmls)
(defun write-escaped (string stream)
  "Writes string to stream with all character entities escaped."
  (coerce string 'simple-base-string)
  (when (eq stream t) (setf stream *standard-output*))
  (loop for char across string
        for esc = (if (< (char-code char) (length *char-escapes*))
                      (svref *char-escapes* (char-code char))
                      (string char))
        do (write-sequence esc stream)))

ただ、xmls で出力した xml はあんまり見慣れない書き方になるみたいなので使わない気がする。

s-xml の場合は print-string-xml に手を入れればいいと思う。
が、どの範囲をそのまま出力するようにするかが悩ましい。
UTF-8で出力することが前提ならなら ASCII 以上は全部でも良いとは思うけど、文字コード・文字集合辺りはよく分からないなあ。(上のはASCII以上全部になっているし)

• elisp を書く気はさらさらないので (requre 'cl) には拘らないです。
• 具体例として、現在の .emacs はこんな感じです。
• session.el
• tails-history.el
• キーバインドを覚えていないのですが、M-x の履歴で何とかしています。

[[(ReadMore...) index.rb?1205059356.txt]]