[[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

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

• 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]]

• rss を提供するようにした。
• lisp/ni/ni.rdf
• あとで分かりやすいところにリンクを作る。
• 日本語の扱いがひどくて、ちょっと悲しい。
• xmls と s-xml はあとで何とかする。(何とかできたら)
• emacs like にする xyzzy 用キーバインドサンプルも良いけど、xyzzy 風にする emacs の設定の方が欲しいなぁ。

• cldoc を使ってみた。
• http://raido.sakura.ne.jp/southly/lisp/doc/
• やっぱり html の出来がイマイチなので手を入れた。
• lisp の方で解決するのが今後の課題。
• Common Lisp 用の repository を別に作らないとな。
• (ni-view xyzzy:*packages*) は version が「obsolete」なときはソースへのリンクを張らないよう変更。

• MIYAMUKO さんの xyscope.l にインスパイアされて XTAGS 用を書きました。
• [[builtin-tags.l:http://raido.sakura.ne.jp/southly/hgrepos/?file/16b34b00541c/builtin-tags/site-lisp/builtin-tags.l]] の辺りにあります。テスト甘いです。
• パッケージは変えるかも。
• builtin.l までジャンプしてこないといけないので、それができる XTAGS を作っておく必要があります。
• 自分は ed::lisp-maketags をいじっているのですが、Nakano さんの [[ext-lisp-maketags:http://raido.sakura.ne.jp/southly/lisp/ni/view.lisp?2a4fa7b654c10684f699e0651924cb80]] を使えば OK だと思います。
• builtin-function-p → si:*builtin-function-p

• マクロ展開が起こるのは評価時 or コンパイル時という理解でした。
• xyzzy の動作はまさしくこれですよね。
• sbcl はインタプリタがないので定義と同時にコンパイルされて、納得の結果。
• ecl はよく知らない。
• clisp の結果は自分にとってはちょっと不思議。
• 気になったので CLtL2 を確認してみたら、8章の最初のページにありました。

More generally, an implementation of Common Lisp has great latitude in deciding exactly when to expand macro calls within a program. For example, it is acceptable for the defun special form to expand all macro calls within its body at the time the defun form is executed and record the fully expanded body as the body of the function being defined.

で、例えば defun での関数定義時にマクロを展開することもOKと書いてありました。

とりあえずできた。REPL では動作確認できた。
要 cl-interpol。
SANO さんの情報がなかったらどうにか interpol-reader を使えないか、悩んでいたかも。サンクスです。
[[(ReadMore...) index.rb?1204642645.txt]]