Lisp@UNIX版

Lisp@UNIX版 (585ﾚｽ)
上下前次 1-新

108: 名無しさん＠お腹いっぱい。 [sage] 02/10/15 23:35 AAS
trial 版て Composer 使えないんだもん。つまんない。< ACL

109(1): 名無しさん＠お腹いっぱい。 [sage] 02/10/16 00:09 AAS
cmuclでそこそこ幸せなんですけど、
ACLってそんなに(･∀･)ｲｲ!!ですか？

110: 名無しさん＠お腹いっぱい。 [sage] 02/10/16 21:06 AAS
>>109
なんだか動作が速い気がする。

111(1): 名無しさん＠お腹いっぱい。 [sage] 02/10/16 21:41 AAS
cmuclのwindows版は無いんですか？（かなり探したけど見つからなかった）

112: 名無しさん＠お腹いっぱい。 [sage] 02/10/16 22:22 AAS
>>111
ありません。clispで我慢汁。

113: 名無しさん＠お腹いっぱい。 [sage] 02/10/17 02:19 AAS
そうですか。残念。
cmulispとclispの違いって何ですか？

114(1): 名無しさん＠お腹いっぱい。 [sage] 02/10/17 02:20 AAS
ACLの最適化はメチャすごくて、
ほとんどC++で書いたのと変わらない速度になるそうだ。

115: 名無しさん＠お腹いっぱい。 [sage] 02/10/17 21:55 AAS
>>114
この辺の話ですか？
http://www.graco.c.u-tokyo.ac.jp/~kamina/lisp/bench.html

取り上げている問題が、再帰関数と、リスト処理
だから、このページの ACL と C++ との比較は
ちょっと当てにならない気がする。

116(2): 名無しさん＠お腹いっぱい。 [] 02/10/18 20:18 AAS
どっかに物凄い種類の言語のベンチ比較したサイトなかった？

117: 名無しさん＠お腹いっぱい。 [sage] 02/10/18 21:29 AAS
>116
これのことかえ？
http://www.bagley.org/~doug/shootout/craps.shtml

118: 166 [] 02/10/19 22:25 AAS
そうそうこれこれ。ありがとさん。

119: 116 [] 02/10/19 22:26 AAS
s/16/11/

120(1): 名無しさん＠お腹いっぱい。 [sage] 02/10/19 22:48 AAS
Javaやスクリプトなんかは比較にならないくらい速いねえ。

121: 名無しさん＠お腹いっぱい。 [] 02/10/22 21:57 AAS
>>120
何処みてるの？

122: 名無しさん＠お腹いっぱい。 [] 02/10/28 00:31 AAS
age

123: 名無しさん＠お腹いっぱい。 [sage] 02/11/02 15:52 AAS
おいおい、そろそろ保守しないとﾔｳﾞｧｲンじゃない？

124: 名無しさん＠お腹いっぱい。 [] 02/11/05 09:04 AAS
変数に型が無いからな。

125: 名無しさん＠お腹いっぱい。 [sage] 02/11/05 22:17 AAS
(age Lisp@UNIX版)

126: 名無しさん＠お腹いっぱい。 [sage] 02/11/05 22:52 AAS
(defun age (thread)
(case thread
((2chｽﾚ:tech 'age)
((2chｽﾚ:unix 'sage)
((2chｽﾚ:prog 'hage)))

127(1): 名無しさん＠お腹いっぱい。 [sage] 02/11/05 23:17 AAS
cmuclのgcについて質問してもいいですか？

128(1): 名無しさん＠お腹いっぱい。 [sage] 02/11/05 23:31 AAS
>>127
だめって行ったらどうすんのさ、
そんなこと聞かずに、普通に質問したら？

129(2): 名無しさん＠お腹いっぱい。 [sage] 02/11/05 23:57 AAS
>>128
えっと、Debian GNU/Linuxのwoodyのcmuclとsbcl(Steel Bank CommonLisp)を
使っています。
cmuclのドキュメント（cmu-user.ps）を見ると、
*bytes-consed-between-gcs*という大域変数で、どこまでコンスが作られたら、
GCが行われるか決定されるか設定できるみたいに書いてあります。
デフォルトでは2000000になっているそうです。
一方、sbclでのデフォルトは20Mになっているそうです。
例えば古典的な8queensなんかを（コンパイルして）実行すると、
cmuclではしょっちゅうGCをはじめるのでsbclの10倍以上時間がかかります。
cmuclで(defparameter *bytes-consed-between-gcs* 20000000)とかってしても、
GCが行われる頻度は変わりません。
どうやったらcmuclでもGCでマメに止まらないようにできるのでしょうか。
厨房でスマソ。

130: 名無しさん＠お腹いっぱい。 [sage] 02/11/06 00:40 AAS
>>129
cmuclは使ったことないです、お手上げ。
2chｽﾚ:techとか
2chｽﾚ:prog
で聞いてみてちょ、力になれなくてｽﾏｿ。

131: 名無しさん＠お腹いっぱい。 [sage] 02/11/06 00:51 AAS
8queenでガベコレいるか？

132: 名無しさん＠お腹いっぱい。 [] 02/11/06 01:03 AAS
>>129
(setf (bytes-consed-between-gcs) 20000000)
かな。

133: 名無しさん＠お腹いっぱい。 [] 02/11/06 01:05 AAS
-- Variable: *bytes-consed-between-gcs*
CMU Common Lisp automatically GC's whenever the amount of memory
allocated to dynamic objects exceeds the value of an internal
variable. After each GC, the system sets this internal variable to
the amount of dynamic space in use at that point plus the value of
the variable `ext:*bytes-consed-between-gcs*'. The default value
is 2000000.

英語よくわからんのであれだが
ＧＣしはじめる数値を処理系がこの変数にセットするだけでないかい。
この変数を変えるとＧＣしなくなるんじゃなく。

134: 名無しさん＠ＸＥｍａｃｓ [sage] 02/11/06 07:45 AAS
CMU Common Lisp は動的オブジェクトに確保されたメモリの量が内部変数の値を超える
たびに自動的に GC する。各 GC の後、その時点で使用されている動的スペースの量に
変数 `ext:*bytes-consed-between-gcs*' の値を加えたものを内部変数にセットする。
初期値は 200000である。

135(1): 名無しさん＠お腹いっぱい。 [] 02/11/06 08:27 AAS
.cmucl-initに
(setf (bytes-consed-between-gcs) 20000000)
してみました。
* (time (queens 10))
すると、
[GC threshold exceeded with 21,062,632 bytes in use. Commencing GC.]
[GC completed with 1,119,416 bytes retained and 19,943,216 bytes freed.]
[GC will next occur when at least 21,119,416 bytes are in use.]
ですのでコンスが20Mを越えたときにGCが始まるようになりますた。
ちなみに(queens 10)だと24回GCして37secかかります。
sbclですと一度もGCしないで0.85secで(queens 10)できますた。
なんでこんなに違うんだろう……

136: 135 [sage] 02/11/06 12:37 AAS
勘違いしてましたスマソ。
cmuclでは
* (load "8queens.lsp")
* (compile-file "8queens.lsp")
しても、
* (load "8queens.x86f")
するまでは8queensの関数はコンパイルされていないものが用いられる
ことに気づいていませんでした。
sbclではトップレベルの関数は即コンパイルしているんで違うのあたり前田った。
恥ずかしい……

137(1): 名無しさん＠お腹いっぱい。 [] 02/11/10 03:10 AAS
(gc)

138(1): 名無しさん＠お腹いっぱい。 [sage] 02/11/17 05:22 AAS
>>137
gcしたらこのスレは消えると思うが。

139: 名無しさん＠お腹いっぱい。 [sage] 02/11/28 17:07 AAS
>>138
スレじゃなくて、レスが消えたな。

140: 名無しさん＠お腹いっぱい。 [sage] 02/11/28 21:41 AAS
(sage)

141: 名無しさん＠お腹いっぱい。 [sage] 02/11/29 00:54 AAS
[1]>(sage)

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

142: 名無しさん＠お腹いっぱい。 [sage] 02/11/29 01:21 AAS
(defun sage () (sage))

143: 名無しさん＠お腹いっぱい。 [sage] 02/11/30 04:17 AAS
[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]>

144: 名無しさん＠お腹いっぱい。 [sage] 02/12/07 20:38 AAS
寂れてるね。emacsスレがあるからいらないか。

145: 名無しさん＠お腹いっぱい。 [sage] 02/12/08 12:07 AAS
(寂れてますね)

146: 名無しさん＠お腹いっぱい。 [] 02/12/11 14:50 AAS
cl-httpd を cmucl 18d で動かせた人居ますか？なんか、cmucl 用のパッチを
当ててもコンパイルできないんすけど…。

147: 名無しさん＠お腹いっぱい。 [] 02/12/15 03:59 AAS
age

148(1): 名無しさん＠お腹いっぱい。 [] 02/12/15 11:45 AAS
CLOSが気に入ってます。
Allegro CLを研究室の予算で買ってもらおうかな…

149: 名無しさん＠お腹いっぱい。 [sage] 02/12/15 13:36 AAS
>>148 ええのぅ。漏れもホスィけど金無いから cmucl で我慢。
windows では clisp か newlisp かなぁ…。

150(3): 名無しさん＠Ｅｍａｃｓ [] 02/12/17 12:35 AAS
clawk 便利 age

151(1): 名無しさん＠お腹いっぱい。 [sage] 02/12/17 16:22 AAS
>>150
あなたはなみなみならぬ修行を積んだ強者か単なる変態と
思われます。

152: 名無しさん＠お腹いっぱい。 [sage] 02/12/17 17:03 AAS
(´-`).｡ｏＯ(そんな事言える 151 も同類では？)

153: 名無しさん＠お腹いっぱい。 [sage] 02/12/17 17:22 AAS
(´-`).｡ｏＯ(他人を推量できるからには 151 は強者かつ変態である、に一票)

154: 151 [sage] 02/12/17 17:40 AAS
コードのぱっと見だけでもだいぶ違和感がある。(ないかい?)
http://www.geocities.com/mparker762/clawk.html

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

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

156: 名無しさん＠お腹いっぱい。 [] 02/12/19 12:57 AAS
おまえら，xml パースには何使ってますか？やっぱ Franz の xmlutils ですか？

157: 名無しさん＠お腹いっぱい。 [] 02/12/20 19:28 AAS
>>150 regex よりほんとに速いのか誰か確かめてくれ．

158: 名無しさん＠お腹いっぱい。 [] 02/12/21 12:36 AAS
>57
regex.tgzの中にテストコード入ってるよ

159(2): 名無しさん＠お腹いっぱい。 [] 02/12/21 12:51 AAS
試用版Xanalys LispWorks 4.2はここ
http://www.lispworks.com/downloads/lw-personal-edition.html

160: 名無しさん＠お腹いっぱい。 [sage] 02/12/21 13:18 AAS
>159 結構制限キツイなぁ…．Allegro に比べてどーなんだろう．
使ってる人の感想キボンヌ．でもやっぱ個人で買うにはちと高いなー．

161: 名無しさん＠お腹いっぱい。 [] 02/12/21 14:13 AAS
で，早速試してみますた．
"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 倍くらい速かったですが．
これで安心して使えます．ﾅｶﾅｶ(･∀･)ｲｲ!!

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

163: 名無しさん＠お腹いっぱい。 [sage] 02/12/23 05:52 AAS
>>162
コーマンなんてネタかと思った。スマソ。
Corman の読み方は'コーマン'でいいの？

164: 名無しさん＠お腹いっぱい。 [sage] 02/12/23 13:22 AAS
ロジャーコーマン(Roger Corman)と同じ綴りなので
カタカナで表記するとコーマンだろうな。

165: 名無しさん＠お腹いっぱい。 [sage] 02/12/23 13:35 AAS
$200 か。これくらいの手頃な値段で開発環境が普及していれば、Lisp も
もっとメジャーになれたかもしれないな。しかも旧バージョンは非商用なら
無料で使えるという太っ腹ぶり。しかし Windows 専用。

166(3): 名無しさん＠お腹いっぱい。 [sage] 02/12/23 15:50 AAS
日本語使えまつか?

167: 名無しさん＠お腹いっぱい。 [sage] 02/12/23 16:05 AAS
$200 なのは 12/31 までだね。
その後でも $249 だからさして高くない。

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

168: 名無しさん＠お腹いっぱい。 [sage] 02/12/23 16:15 AAS
なんだか Windows が欲しくなってきた sage
>>166 試せる環境があるなら是非試してみてください．

169: 166 [sage] 02/12/23 18:28 AAS
使ってみた。
どうも日本語のことは考えてないっぽい。

170: 名無しさん＠お腹いっぱい。 [sage] 02/12/23 20:03 AAS
二バイト目がアレな文字の後には \ が要ったりするんですかね？
今んとこちゃんと多言語対応してるのは Allegro だけなのかな？

171: 名無しさん＠お腹いっぱい。 [sage] 02/12/25 13:02 AAS
Strong typing is for weak minds!!

172(1): 名無しさん＠お腹いっぱい。 [] 02/12/27 13:25 AAS
誰も cl-httpd は使ってないのか… PortableAllegroServe を試したけど
遅かったので Apache + mod_lisp + cmucl でがんばる事にしました．
で，html の元データとして S 式を使うわけですが，SXML みたいな何か標準
のフォーマットみたいなのはあるんでしょうか？ AllegroServe の htmlgen
に合わせとけばいい？

173: 名無しさん＠お腹いっぱい。 [sage] 02/12/28 15:18 AAS
>>172
>SXML みたいな何か標準のフォーマットみたいなの

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

174: 名無しさん＠お腹いっぱい。 [sage] 02/12/28 22:05 AAS
DSSSL って SGML 文書間の変換用のスタイルシートみたいなもんだから
172 の求めているのとは違うよーな気もする。172 の「S 式からの変換」
ではそんな大層な仕掛けは不要だと思われ。つーか DSSSL 使ってる香具師
居る？

175(1): 名無しさん＠お腹いっぱい。 [sage] 02/12/28 22:20 AAS
Common Lisper な人々にお聞きしたいのですが、シンボルが大文字なのは
どうですか？(setf (readtable-case *readtable*) :invert) とかしてる
んですか？

176: 名無しさん＠お腹いっぱい。 [] 02/12/30 00:51 AAS
>175 これやったら ilisp-mode で欝になりますた。

177: 名無しさん＠お腹いっぱい。 [] 02/12/30 10:08 AAS
大文字だと見づらい
大文字だと怒られてる様な気もする

178: 名無しさん＠お腹いっぱい。 [] 02/12/30 10:54 AAS
(setf (readtable-case *readtable*) :preserve)
だろ？と思ったら標準の関数って全部大文字なのか…

179: 名無しさん＠お腹いっぱい。 [] 03/01/06 14:07 AAS
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)))))

180: 山崎渉 [（＾＾）sage] 03/01/15 13:01 AAS
（＾＾）

181(1): 名無しさん＠お腹いっぱい。 [sage] 03/01/22 14:04 AAS
'(リストの中の人も大変だな)

182: 名無しさん [sage] 03/01/22 17:57 AAS
>>181
nilの人などいない！

183: 名無しさん＠お腹いっぱい。 [sage] 03/01/23 03:59 AAS
nilのcdrなどない！

184: 名無しさん＠お腹いっぱい。 [sage] 03/01/23 22:09 AAS
それじゃそのまんまだろ

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

186(1): 名無しさん [sage] 03/01/24 03:26 AAS
ところでGCCの中間コードってリスプなんだな。知らなかったよ。

187: 名無しさん＠お腹いっぱい。 [sage] 03/01/24 20:26 AAS
>>185 そ、そうなんですか？ Lisp コンパイラというと AllegroCL, LispWorks
CMUCL くらいしか知らないんですが、CMUCL のドキュメント
http://cvs2.cons.org/ftp-area/cmucl/doc/CMUCL-design.pdf
の compiler overview を見たら考慮してそーだし、商用のコンパイラなら
当然考慮してそうですけど…。

188: 名無しさん＠お腹いっぱい。 [sage] 03/01/31 01:07 AAS
SICP に載ってる scheme チップのコード効率は
どうなんだろ
実物触ったことないからわからないや

189(1): 名無しさん＠お腹いっぱい。 [sage] 03/02/08 16:32 AAS
(defun 2chｽﾚ:unix ()
(2chｽﾚ:tech

190(1): 名無しさん＠お腹いっぱい。 [] 03/02/08 22:36 AAS
>>189
Stack over flow

191: 名無しさん＠お腹いっぱい。 [sage] 03/02/08 23:30 AAS
>>190
末尾再帰最適化される処理系では回り続ける。

192(3): 名無しさん＠お腹いっぱい。 [] 03/02/18 22:36 AAS
LISPの括弧ってさ、便利だけど、
そのまま制限だよな。
いちいち一時変数使うためにletの括弧でネストしたり。
構文もそれ自体に括弧のペアが必要だし。

193: 名無しさん＠お腹いっぱい。 [sage] 03/02/18 23:51 AAS
>192
それのどこが「制限」なのか問詰めたい

194: 名無しさん＠お腹いっぱい。 [sage] 03/02/18 23:54 AAS
つまり「両刃の剣」と言いたいんだろう

195: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 09:39 AAS
しかしプログラムがS式ってのがlispの力の源泉だからな。

196: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 11:47 AAS
なんでも括弧でくるめばいいからラクだけどなー

197: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 12:18 AAS
>>192
a[i] 配列の添え字
a[2] = {1,2} 配列の要素
int(2.3) 関数呼び出し
という3種類の括弧を使うプログラミング言語もあるけど、
()だけですむLispってどうよ？よくない？

198(2): 192 [] 03/02/19 15:55 AAS
いや、いいんだけどさ、
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)とかは書けるけど、これ実行時ディスパッチなんだよね。
そこまで大袈裟にしたくないし。わざわざ効率悪い方法使うのもなー。
この辺、「慣れ」だけでどうにかなる問題とは思えないよ。

199: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 16:00 AAS
>>186
また釣りですか？

200: 釣られてみよう [sage] 03/02/19 16:04 AAS
>>198
何に疲れるんだろう。
括弧の対応がわからなくなる、ってこと?

201: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 16:18 AAS
単に慣れの問題

202: あぼーん [あぼーん] AAS
あぼーん

203: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 18:36 AAS
http://www.advogato.org/proj/Sugar/
既出だったような気もするが、括弧嫌いならこれでもどーだ？
あるいは、エディタ上で色を薄くするとか…。
特別な記法はリーダーマクロでなんとかならんかなぁ。でも S 式が
嬉しいわけで、しょうがない気もするな。

204: 名無しさん＠お腹いっぱい。 [] 03/02/19 20:58 AAS
カッコは別に気にならんとおもうが。

205: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 21:05 AAS
カッコが気になる奴はプログラムの読み方がおかしいのだと思う。
それ以外の言語の時にしても。

206(1): 名無しさん＠お腹いっぱい。 [sage] 03/02/19 21:39 AAS
話をサクっと変えちゃいますけど、
今 lisp を勉強したいという人には
どういう本を薦めますか？

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

207: 名無しさん＠お腹いっぱい。 [sage] 03/02/19 21:44 AAS
>>206
要求レベルにもよるけど
「リスト遊び」はどうよ。

上下前次 1-新書関写板覧索設栞歴

あと 378 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.029s