[[About:self:AboutPage.txt]] | [[Profile:file/southly/]] | [[まとめ:self:1163859357.txt]] | [[オリジナル:http://ninjinix.x0.com/rn/]] | [[xyzzy:lisp/]] | [[あんてな:listall]] | [[■:lisp]] | [[buzz:files/southly#buzz]]

clispにて大文字がうるさいな〜っていうことで、

(setf (readtable-case *readtable*) :preserve)

としてみた。
全定義は大文字でされているのね。
使えねー

(setf *print-case* :downcase)

とするかな〜(悩)
試しにdo-all-symbolsでシンボルを書き出してみたら、
この設定でも大文字で出力されるときがある。
何が違うんだろ?

エスケープ記法の場合は分かるとして、LINUXパッケージのは…?

• filerの移動・コピー・削除辺りの非同期化
• telnetでclispと対話(sshが欲しいけど)

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

# Mozilla/Fireox The Lisp Dictionary http://lispdoc.com/
# 2006-03-01
#
<search 
   name="lispdoc"
   description="The Lisp Dictionary"
   method="GET"
   action="http://lispdoc.com/"
   queryEncoding="Shift_JIS"
   queryCharset="Shift_JIS"
  sourceTextEncoding = "1"
>
<input name="q" user>
<input name="search" value="Basic search">

<INTERPRET
	browserResultType = "result"
	charset = "Shift_JIS" 
>
</search>

文字コードとかてきとー

必須のurl-encode&url-decodeの方法を探す。
clispの場合、このあたりが使えそう。

• (EXT:CONVERT-STRING-FROM-BYTES vector encoding &KEY :START :END)
• (EXT:CONVERT-STRING-TO-BYTES string encoding &KEY :START :END)

(format nil "~{~A~}"
        (map 'list
             #'(lambda (x)
                 (format nil "%~2,'0x" x))
             (ext:convert-string-to-bytes "あかさたな" charset:utf-8)))
=>"%E3%81%82%E3%81%8B%E3%81%95%E3%81%9F%E3%81%AA"

よしよしっと。
デコードは大変だな。
違う文字コードでエンコードされてやってきたらどうしたらいいんだろ。

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

不思議体験。
夜中、人がドアから入ってきたような気配で目を覚ます。
真っ暗で見えない。けど気配がある?
起き上がれない。胸の辺りを押さえつけられている感じ。
声も出せない。
手足を近くにぶつけて音を立てようとしたけど、できない。
しばらくがんばって、どうやっても無理だったから、あきらめて寝る。

これがいわゆる、脳が起きてて、体が寝ているってやつ!?

髪が伸びてきたので散髪。