QuickLispデビュー

Clozure CL を 1.7 にアップグレードしたら・・・ASDFが使えなくなってしまった。
1.6 の頃とtoolsディレクトリの構成が異なる。何かインストール方法異なっているのかと調べていたが、
ASDF本家のサイトにこんな文字が・・・

ASDF-install is OBSOLETE. DO NOT USE ASDF-INSTALL, EVER. DO NOT ASK AROUND ABOUT HOW TO GET IT RUNNING. IT IS O-B-S-O-L-E-T-E. Not working.

Oh, My God! ということで、同サイトで案内されていた quicklisp をインストールしてみる。
手順は、http://www.quicklisp.org/beta/にある。

1.curl -O http://beta.quicklisp.org/quicklisp.lisp
2.ccl64 -l quicklisp.lisp
3.(quicklisp-quickstart:install)
4.(ql:add-to-init-file)

自分の環境では、~/ccl-init.lispに初期設定を書いているが、4の処理は~/.ccl-init.lispに追記したようだ。
なので、.ccl-init.lispに追記された内容を~/ccl-init.lispにコピーしておく。

試しに、XML のライブラリを追加してみる。

1.(ql:system-apropos "xml")
2.(ql:quickload $LibraryName)
3.ccl-init.lispに(ql:quickload :$LibraryName)を追記

1 は、指定した文字を含むライブラリを検索してくれるコマンドのようだ。2では、1の結果から欲しいライブラリを指定する。
以下は実行例。

? (ql:system-apropos "xml")
#<SYSTEM bknr.xml / bknr-datastore-20120703-git / quicklisp 2012-07-03>
#<SYSTEM cl-libxml2 / cl-libxml2-20120407-git / quicklisp 2012-07-03>
#<SYSTEM cl-libxml2-test / cl-libxml2-20120407-git / quicklisp 2012-07-03>
#<SYSTEM cl-rdfxml / cl-rdfxml-20110418-svn / quicklisp 2012-07-03>
#<SYSTEM cl-xmlspam / cl-xmlspam-20101006-http / quicklisp 2012-07-03>
#<SYSTEM cxml / cxml-20110619-git / quicklisp 2012-07-03>
#<SYSTEM cxml-dom / cxml-20110619-git / quicklisp 2012-07-03>
#<SYSTEM cxml-klacks / cxml-20110619-git / quicklisp 2012-07-03>
#<SYSTEM cxml-rng / cxml-rng-2008-11-30 / quicklisp 2012-07-03>
#<SYSTEM cxml-rpc / cxml-rpc-20110522-git / quicklisp 2012-07-03>
#<SYSTEM cxml-stp / cxml-stp-20120520-git / quicklisp 2012-07-03>
#<SYSTEM cxml-stp-test / cxml-stp-20120520-git / quicklisp 2012-07-03>
#<SYSTEM cxml-test / cxml-20110619-git / quicklisp 2012-07-03>
#<SYSTEM cxml-xml / cxml-20110619-git / quicklisp 2012-07-03>
#<SYSTEM hu.dwim.perec+hu.dwim.quasi-quote.xml / hu.dwim.perec-20120520-darcs / quicklisp 2012-07-03>
#<SYSTEM hu.dwim.quasi-quote.xml / hu.dwim.quasi-quote-20111001-darcs / quicklisp 2012-07-03>
#<SYSTEM hu.dwim.quasi-quote.xml+cxml / hu.dwim.quasi-quote-20111001-darcs / quicklisp 2012-07-03>
#<SYSTEM hu.dwim.quasi-quote.xml+hu.dwim.quasi-quote.js / hu.dwim.quasi-quote-20111001-darcs / quicklisp 2012-07-03>
#<SYSTEM hu.dwim.util.flexml / hu.dwim.util-20120520-darcs / quicklisp 2012-07-03>
#<SYSTEM pithy-xml / pithy-xml-20101006-git / quicklisp 2012-07-03>
#<SYSTEM s-xml / s-xml-20120520-cvs / quicklisp 2012-07-03>
#<SYSTEM s-xml-rpc / s-xml-rpc-20101006-http / quicklisp 2012-07-03>
#<SYSTEM s-xml.examples / s-xml-20120520-cvs / quicklisp 2012-07-03>
#<SYSTEM s-xml.test / s-xml-20120520-cvs / quicklisp 2012-07-03>
#<SYSTEM sexml / sexml-20120520-git / quicklisp 2012-07-03>
#<SYSTEM xfactory / cl-libxml2-20120407-git / quicklisp 2012-07-03>
#<SYSTEM xfactory-test / cl-libxml2-20120407-git / quicklisp 2012-07-03>
#<SYSTEM xml-emitter / xml-emitter-1.0.2 / quicklisp 2012-07-03>
#<SYSTEM xml-mop / xml-mop-20110418-git / quicklisp 2012-07-03>
#<SYSTEM xml-render / cl-typesetting-20120407-svn / quicklisp 2012-07-03>
#<SYSTEM xmls / xmls-1.4 / quicklisp 2012-07-03>
#<SYSTEM xmls-tools / xmls-tools-20110320-http / quicklisp 2012-07-03>
#<SYSTEM xoverlay / cl-libxml2-20120407-git / quicklisp 2012-07-03>
NIL
? (ql:quickload "xmls")
To load "xmls":
  Install 1 Quicklisp release:
    xmls
; Fetching #<URL "http://beta.quicklisp.org/archive/xmls/2011-01-10/xmls-1.4.tgz">
; 59.85KB
==================================================
61,286 bytes in 0.06 seconds (1031.73KB/sec)
; Loading "xmls"
[package xmls]...........
("xmls")
? (quit)
$ ccl64
To load "xmls":
  Load 1 ASDF system:
    xmls
; Loading "xmls"

Welcome to Clozure Common Lisp Version 1.7  (DarwinX8664)!
?