Lisp@UNIX版 (585ﾚｽ)
上下前次1-新
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 も良いと聞きます。聞いただけですが。
外部ﾘﾝｸ[html]:www.cormanlisp.com
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)))
(#/^<!-- Body !-->/ (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
それじゃそのまんまだろ
上下前次1-新書関写板覧索設栞歴
あと 401 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.018s