Lisp@UNIX版

**名無しさん＠お腹いっぱい。** · NG

なんだかんだ言って，ホントはみんなLispが好きなんだろ?(藁)
というわけで，語ろうや．

プログラム技術板のLisp Schemeスレ
http://pc.2ch.net/test/read.cgi/tech/1016211619/

**名無しさん＠お腹いっぱい。** · NG

(gc)

**名無しさん＠お腹いっぱい。** · NG

>>137
gcしたらこのスレは消えると思うが。

**名無しさん＠お腹いっぱい。** · NG

>>138
スレじゃなくて、レスが消えたな。

**名無しさん＠お腹いっぱい。** · NG

(sage)

**名無しさん＠お腹いっぱい。** · NG

[1]>(sage)

*** - EVAL: the function SAGE is undefined
1. Break [2]>_

**名無しさん＠お腹いっぱい。** · NG

(defun sage () (sage))

**名無しさん＠お腹いっぱい。** · NG

[1]> (defun sage () (sage))

** - Continuable Error
DEFUN/DEFMACRO(SAGE): #<PACKAGE COMMON-LISP> is locked
If you continue (by typing 'continue'): Ignore the lock and proceed
1. Break [2]>

**名無しさん＠お腹いっぱい。** · NG

寂れてるね。emacsスレがあるからいらないか。

**名無しさん＠お腹いっぱい。** · NG

(寂れてますね)

**名無しさん＠お腹いっぱい。** · NG

cl-httpd を cmucl 18d で動かせた人居ますか？なんか、cmucl 用のパッチを
当ててもコンパイルできないんすけど…。

**名無しさん＠お腹いっぱい。** · NG

age

**名無しさん＠お腹いっぱい。** · NG

CLOSが気に入ってます。
Allegro CLを研究室の予算で買ってもらおうかな…

**名無しさん＠お腹いっぱい。** · NG

>>148 ええのぅ。漏れもホスィけど金無いから cmucl で我慢。
windows では clisp か newlisp かなぁ…。

**名無しさん＠Ｅｍａｃｓ** · NG

clawk 便利 age

**名無しさん＠お腹いっぱい。** · NG

>>150
あなたはなみなみならぬ修行を積んだ強者か単なる変態と
思われます。

**名無しさん＠お腹いっぱい。** · NG

(´-`).｡ｏＯ(そんな事言える 151 も同類では？)

**名無しさん＠お腹いっぱい。** · NG

(´-`).｡ｏＯ(他人を推量できるからには 151 は強者かつ変態である、に一票)

**151** · NG

コードのぱっと見だけでもだいぶ違和感がある。(ないかい?)
http://www.geocities.com/mparker762/clawk.html

ケナしたりクサしたりしてるつもりはなくて、正直な感想です。
強まった lisper & awker ならすんなりイケるんですかね。
ま、も少し遊んでみます。

**150** · NG

…全然修行を積んでないということは，漏れは…で，でも，少なくとも
regex は便利っすよね？
(let ((m (compile-str "[:digit:]+"))) (scan-str m "abc 012 cde"))
のように，compile-str で明示的に正規表現をコンパイルできて (ﾟдﾟ)ｳﾏｰ
しかも GNU regex より速いそーですし．ｳﾏｳﾏ

**名無しさん＠お腹いっぱい。** · NG

おまえら，xml パースには何使ってますか？やっぱ Franz の xmlutils ですか？

**名無しさん＠お腹いっぱい。** · NG

>>150 regex よりほんとに速いのか誰か確かめてくれ．

**名無しさん＠お腹いっぱい。** · NG

>57
regex.tgzの中にテストコード入ってるよ

**名無しさん＠お腹いっぱい。** · NG

試用版Xanalys LispWorks 4.2はここ
http://www.lispworks.com/downloads/lw-personal-edition.html

**名無しさん＠お腹いっぱい。** · NG

>159 結構制限キツイなぁ…．Allegro に比べてどーなんだろう．
使ってる人の感想キボンヌ．でもやっぱ個人で買うにはちと高いなー．

**名無しさん＠お腹いっぱい。** · NG

で，早速試してみますた．
"A*BD" Lisp : 4 secs, 272480/sec, C : 47 secs, 21276/sec
"(A|A)*BD" Lisp : 4 secs, 253807/sec, C : 167 secs, 5988/sec
"(A|B)*BD" Lisp : 4 secs, 233100/sec, C : 163 secs, 6134/sec
"(B|A)*BD" Lisp : 4 secs, 231481/sec, C : 183 secs, 5464/sec
"((A*B)|(AC))D" Lisp : 4 secs, 237530/sec, C : 95 secs, 10526/sec
"((A*B)|(A*C))D" Lisp : 4 secs, 242131/sec, C : 101 secs, 9900/sec
"[Aa]*[Bb][Dd]" Lisp: 5 secs, 216450/sec, C : 49 secs, 20408/sec
さすがに文字列の比較（string= と strcmp）は C のが 2 倍くらい速かったですが．
これで安心して使えます．ﾅｶﾅｶ(･∀･)ｲｲ!!

**Lisper 心得見習い** · NG

>159 Windows 用なら Corman Lisp も良いと聞きます。聞いただけですが。
http://www.cormanlisp.com/index.html
cmucl の 12/19 日版のバイナリが公開されてますが試した人居ます？
早速入れてみましたが clocc のビルドにこけて 18d に戻しちゃいました。

**名無しさん＠お腹いっぱい。** · NG

>>162
コーマンなんてネタかと思った。スマソ。
Corman の読み方は'コーマン'でいいの？

**名無しさん＠お腹いっぱい。** · NG

ロジャーコーマン(Roger Corman)と同じ綴りなので
カタカナで表記するとコーマンだろうな。

**名無しさん＠お腹いっぱい。** · NG

$200 か。これくらいの手頃な値段で開発環境が普及していれば、Lisp も
もっとメジャーになれたかもしれないな。しかも旧バージョンは非商用なら
無料で使えるという太っ腹ぶり。しかし Windows 専用。

**名無しさん＠お腹いっぱい。** · NG

日本語使えまつか?

**名無しさん＠お腹いっぱい。** · NG

$200 なのは 12/31 までだね。
その後でも $249 だからさして高くない。

非商用ならコンパイラとランタイムはフリーみたいだよ。
旧バージョンじゃなくても。

**名無しさん＠お腹いっぱい。** · NG

なんだか Windows が欲しくなってきた sage
>>166 試せる環境があるなら是非試してみてください．

**166** · NG

使ってみた。
どうも日本語のことは考えてないっぽい。

**名無しさん＠お腹いっぱい。** · NG

二バイト目がアレな文字の後には \ が要ったりするんですかね？
今んとこちゃんと多言語対応してるのは Allegro だけなのかな？

**名無しさん＠お腹いっぱい。** · NG

Strong typing is for weak minds!!

**名無しさん＠お腹いっぱい。** · NG

誰も cl-httpd は使ってないのか… PortableAllegroServe を試したけど
遅かったので Apache + mod_lisp + cmucl でがんばる事にしました．
で，html の元データとして S 式を使うわけですが，SXML みたいな何か標準
のフォーマットみたいなのはあるんでしょうか？ AllegroServe の htmlgen
に合わせとけばいい？

**名無しさん＠お腹いっぱい。** · NG

>>172
>SXML みたいな何か標準のフォーマットみたいなの

便乗質問なんだけど、DSSSLってのは、それのことなの?

**名無しさん＠お腹いっぱい。** · NG

DSSSL って SGML 文書間の変換用のスタイルシートみたいなもんだから
172 の求めているのとは違うよーな気もする。172 の「S 式からの変換」
ではそんな大層な仕掛けは不要だと思われ。つーか DSSSL 使ってる香具師
居る？

**名無しさん＠お腹いっぱい。** · NG

Common Lisper な人々にお聞きしたいのですが、シンボルが大文字なのは
どうですか？(setf (readtable-case *readtable*) :invert) とかしてる
んですか？

**名無しさん＠お腹いっぱい。** · NG

>175 これやったら ilisp-mode で欝になりますた。

**名無しさん＠お腹いっぱい。** · NG

大文字だと見づらい
大文字だと怒られてる様な気もする

**名無しさん＠お腹いっぱい。** · NG

(setf (readtable-case *readtable*) :preserve)
だろ？と思ったら標準の関数って全部大文字なのか…

**名無しさん＠お腹いっぱい。** · NG

clawk を使ってみた．awk よりかなーり遅いんだが，漏れ何かおかしな事してる
かな？（500 個のテキストファイルを処理して awk: 2 秒弱 clawk: 35 秒）

(defmacro $gsub! (pattern replacement &optional (source '$0))
`(setf ,source ($gsub ,pattern ,replacement ,source)))

(defun html2txt ()
($gsub! "<[^>]*>" "")
($gsub! ">" ">")
($gsub! "<" "<")
($gsub! """ "\"")
($gsub! " " " ")
($print $0))

(defvar flag nil)
(defawk egroup->txt ()
(BEGIN (setf flag nil))
(#/^<\/pre>/ (setf flag nil))
(t (if flag (html2txt)))
(#/^/ (setf flag t)))

(defun convert ()
(with-open-file (f "./output.txt" :direction :output)
(let ((*standard-output* f))
(dolist (p (directory "home:doc/ML/emacs21/"))
(egroup->txt p)))))

**山崎渉** · NG

（＾＾）

**名無しさん＠お腹いっぱい。** · NG

'(リストの中の人も大変だな)

**名無しさん** · NG

>>181
nilの人などいない！

**名無しさん＠お腹いっぱい。** · NG

nilのcdrなどない！

**名無しさん＠お腹いっぱい。** · NG

それじゃそのまんまだろ

**名無しさん＠お腹いっぱい。** · NG

通常Lispは、メモリの階層構造性も、パイプライン化されたハードウェアの
特性も、無視した能天気で天真爛漫なインプリメントされていることが
普通なので、現代の最新CPUの性能をドブに捨てるような使い方になる。
これに関しての最近の改善努力について何か知っていたら、教えて欲しい。

**名無しさん** · NG

ところでGCCの中間コードってリスプなんだな。知らなかったよ。

**名無しさん＠お腹いっぱい。** · NG

>>185 そ、そうなんですか？ Lisp コンパイラというと AllegroCL, LispWorks
CMUCL くらいしか知らないんですが、CMUCL のドキュメント
ttp://cvs2.cons.org/ftp-area/cmucl/doc/CMUCL-design.pdf
の compiler overview を見たら考慮してそーだし、商用のコンパイラなら
当然考慮してそうですけど…。

**名無しさん＠お腹いっぱい。** · NG

SICP に載ってる scheme チップのコード効率は
どうなんだろ
実物触ったことないからわからないや

**名無しさん＠お腹いっぱい。** · NG

(defun http://pc.2ch.net/test/read.cgi/unix/1019926525/189 ()
(http://pc2.2ch.net/test/read.cgi/tech/1042167213/59))

**名無しさん＠お腹いっぱい。** · NG

>>189
Stack over flow

**名無しさん＠お腹いっぱい。** · NG

>>190
末尾再帰最適化される処理系では回り続ける。

**名無しさん＠お腹いっぱい。** · NG

LISPの括弧ってさ、便利だけど、
そのまま制限だよな。
いちいち一時変数使うためにletの括弧でネストしたり。
構文もそれ自体に括弧のペアが必要だし。

**名無しさん＠お腹いっぱい。** · NG

>192
それのどこが「制限」なのか問詰めたい

**名無しさん＠お腹いっぱい。** · NG

つまり「両刃の剣」と言いたいんだろう

**名無しさん＠お腹いっぱい。** · NG

しかしプログラムがS式ってのがlispの力の源泉だからな。

**名無しさん＠お腹いっぱい。** · NG

なんでも括弧でくるめばいいからラクだけどなー

**名無しさん＠お腹いっぱい。** · NG

>>192
a[i] 配列の添え字
a[2] = {1,2} 配列の要素
int(2.3) 関数呼び出し
という3種類の括弧を使うプログラミング言語もあるけど、
()だけですむLispってどうよ？よくない？

**192** · NG

いや、いいんだけどさ、
1)条件式書くときとか、いちいち括弧付けてかいてかなきゃならんのがなあ。
(if (not(procedure? (...)))...)
複雑なやつになると、ものすげー気になる。
述語とかは、もうちょっと簡潔に書けないものかと。
andとかorとか。おれは疲れました。

2)単純なマクロにも括弧が必要だとか。
C言語での引数なし#defineみたいな、単純な置き換えをしたい時
でさえ括弧がいる。
(defmacro (HOGE) (if (not(procedure? (...)))...))
(if HOGE ...) ;と書けない
=>Error Unbound symbol 'HOGE'もしくは#<macro>
(if (HOGE) ...) ;こういう風に括弧付けないとexpandされない
=>(if (if (not(procedure? (...)))...) ...)
まあこれは結構どうでもいい。

3)特別な記法がないので構造体とかの要素を取り出すときなどで、
簡潔な記述ができない。
a->xみたいなのを書くのに、いちいち(get-x a)とか書くの、疲れました。
schemeの教科書とかに載ってる擬似オブジェクト指向みたいに、
(a 'x)とかは書けるけど、これ実行時ディスパッチなんだよね。
そこまで大袈裟にしたくないし。わざわざ効率悪い方法使うのもなー。
この辺、「慣れ」だけでどうにかなる問題とは思えないよ。

**名無しさん＠お腹いっぱい。** · NG

>>186
また釣りですか？

**釣られてみよう** · NG

>>198
何に疲れるんだろう。
括弧の対応がわからなくなる、ってこと?

**名無しさん＠お腹いっぱい。** · NG

単に慣れの問題

**あぼーん** · NG

あぼーん

**名無しさん＠お腹いっぱい。** · NG

http://www.advogato.org/proj/Sugar/
既出だったような気もするが、括弧嫌いならこれでもどーだ？
あるいは、エディタ上で色を薄くするとか…。
特別な記法はリーダーマクロでなんとかならんかなぁ。でも S 式が
嬉しいわけで、しょうがない気もするな。

**名無しさん＠お腹いっぱい。** · NG

カッコは別に気にならんとおもうが。

**名無しさん＠お腹いっぱい。** · NG

カッコが気になる奴はプログラムの読み方がおかしいのだと思う。
それ以外の言語の時にしても。

**名無しさん＠お腹いっぱい。** · NG

話をサクっと変えちゃいますけど、
今 lisp を勉強したいという人には
どういう本を薦めますか？

# 実は私が聞かれてるんだけど...。

**名無しさん＠お腹いっぱい。** · NG

>>206
要求レベルにもよるけど
「リスト遊び」はどうよ。

**名無しさん＠お腹いっぱい。** · NG

ANSI Common Lisp
個人的には良いと思いました

**名無しさん＠お腹いっぱい。** · NG

ついでに On Lisp を読ませる。リファレンスに HyperSpec も与えておくべし。
Scheme 派なら SICP のオンライン版とか。

**名無しさん＠お腹いっぱい。** · NG

cmucl の info はもう保守されてないのかな。
online でコード書きながら読むのに便利なのに。

**名無しさん＠お腹いっぱい。** · NG

>>198
解釈系いじくればなんとかなりそうだけどね。

**名無しさん＠お腹いっぱい。** · NG

HyperSpecとilispは便利だよお。
pkgsrcにあるよ。なぜかportsにはないけど。

**名無しさん＠お腹いっぱい。** · NG

ずっと前に SICP の邦訳本を買ったけど、内容が難しくて数ページ
読んだっきりです。2ch にはアホっぽい厨がたくさくいるというの
に、このスレにはこんなとっつきにくい本を読みこなす人がいるん
ですね。

**名無しさん＠お腹いっぱい。** · NG

>>213
2chへの書き込みのこつを知ってますね。

**名無しさん＠お腹いっぱい。** · NG

漏れは大学のプログラミングの講義でいきなりR5RS渡されて「教科書」とか言われ、泣きたくなった経験が…
あれは初心者向けじゃないと思った。

**名無しさん＠お腹いっぱい。** · NG

>邦訳本
だからいけないのでは?

**名無しさん＠お腹いっぱい。** · NG

ちょっと前の本だけど、「Common Lisp入門」湯浅太一・萩谷昌己(岩波書店)
はどうですか？値段が高めだけど(3800円)。
Ansi Common Lispでは省かれているような、かなり基本的なことが書いてある。
Lispを全く知らない人がこれから勉強を始めるにはちょうどいい感じ。

**名無しさん＠お腹いっぱい。** · NG

>>217のは読んだことないけど、
lispを全く知らない人、は、elispで遊んでみるのが
適当じゃないかなあ。UNIX板だし。

**名無しさん＠お腹いっぱい。** · NG

Scheme そのものだったら SICP よりこっちと思われ。
http://www.ccs.neu.edu/home/dorai/t-y-scheme/t-y-scheme.html
elisp もいいけど、やっぱレキシカルスコープな Scheme や
Common Lisp の方がいいのでは？そんな漏れのおすすめは DrScheme.

**名無しさん＠お腹いっぱい。** · NG

lisp は言語仕様も面白いけど、
それとはまた別に、
top-level という環境そのものが
結構ユニークですよね。
emacs を使っているとよく思う。

昔 OS 的な使われ方をしていたのと関係あるのかな。

**名無しさん＠お腹いっぱい。** · NG

>top-level という環境そのものが
>結構ユニークですよね。
そうか？

**名無しさん＠お腹いっぱい。** · NG

top-level つーか、emacs の環境はユニークだと思う…という事では？
ところで Lisp Machine や Lisp な OS って復活しませんかね。死ぬまでに
一度使ってみたいんですが。

**名無しさん＠お腹いっぱい。** · NG

LispなOSっていまいち具体的なイメージが湧かないんだけど・・・

shellとしてemacs、shellscriptとしてemacs-lispをつかう環境が
現状ではLispOSに一番近いんだろうか？？？？

**名無しさん＠お腹いっぱい。** · NG

Yahoo Shop ってどんな実行環境なの？

**名無しさん＠お腹いっぱい。** · NG

>224
とりあえずAllegroCommonLispだよね？

**名無しさん＠お腹いっぱい。** · NG

http://www.franz.com/success/all_customer_apps.lhtml
うーん Yahoo Store って無いような…。

**名無しさん＠お腹いっぱい。** · NG

Lisp な OS って Lispマシンの OS がそうだったんじゃないの？
今なら↓こんな感じとか。
ttp://brix-os.sourceforge.net/?p0=news

**名無しさん＠お腹いっぱい。** · NG

>224,225
CLISPだとム板の過去スレで読んだ気がする。

**名無しさん＠お腹いっぱい。** · NG

cl-pdf, mod_lisp 更新あげ

**あぼーん** · NG

あぼーん

**名無しさん＠お腹いっぱい。** · NG

LispOSもやっぱり単一仮想空間なの？

**名無しさん＠お腹いっぱい。** · NG

lispマシンって何に使うの？

**名無しさん＠お腹いっぱい。** · NG

高速万能評価機として

**名無しさん＠お腹いっぱい。** · NG

>232 プログラミング、文書作成とか好きに使う。いいなぁ。
どっか作ってないのかー

**名無しさん＠お腹いっぱい。** · NG

昔の引っ張り出してきても今のPCより高速なわけないよね？

**名無しさん＠お腹いっぱい。** · NG

今の PC で動かすんでないの?