[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 2chのread.cgiへ]
Update time : 03/26 12:58 / Filesize : 286 KB / Number-of Response : 995
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

CommonLisp Scheme Part11



1 名前:デフォルトの名無しさん mailto:sage [04/08/02 23:13]
過去スレ
Part1: piza2.2ch.net/tech/kako/987/987169286.html
Part2: pc.2ch.net/tech/kako/1002/10025/1002584344.html
Part3: pc.2ch.net/tech/kako/1008/10082/1008220265.html
Part4: pc.2ch.net/tech/kako/1016/10162/1016211619.html
Part5: pc3.2ch.net/tech/kako/1023/10230/1023091882.html
Part6: pc3.2ch.net/tech/kako/1031/10315/1031560687.html
Part7: ruku.qp.tc/dat2ch/0311/20/1042167213.html
Part8: pc2.2ch.net/tech/kako/1058/10582/1058263391.html
Part9: pc2.2ch.net/test/read.cgi/tech/1069594582/
Part10: pc5.2ch.net/test/read.cgi/tech/1075630259/

関連リンクは>>2-10あたり


116 名前:デフォルトの名無しさん mailto:sage [04/08/20 14:45]
long一発で初期化できるというヨロコビはあるかも。通常の2倍の速さでコンパクションできるとか。
(コンパクションの必要があるかどうかは知らんけど)

117 名前:95 mailto:sage [04/08/20 15:18]
>>115
>0x12345670 1
>0x12345674 cons 0x12345678
>
>0x12345678 2
>0x1234567c 3
>
>だよ。

あ、なるほど。それで分かりました。
でもそれでは余り8バイト単位で確保する意味が無いですね。
逆にメモリを使いそう・・・

ところで、cdr-coding ってなんですか?


118 名前:デフォルトの名無しさん mailto:sage [04/08/20 15:22]
>>117
>でもそれでは余り8バイト単位で確保する意味が無いですね。

でも高速化の為なら意味があるか。
それだけ為なのかなぁ?


119 名前:デフォルトの名無しさん mailto:sage [04/08/20 15:35]
何バイト単位が最適だと思ってるの?

120 名前:95 mailto:sage [04/08/20 15:41]
>>119
4バイト


121 名前:デフォルトの名無しさん mailto:sage [04/08/20 17:21]
ポインタに4バイト使うなら、consセルは8ビットいるよ。

122 名前:デフォルトの名無しさん mailto:sage [04/08/20 17:22]
8ビットじゃなかった。8バイトだ。

123 名前:デフォルトの名無しさん mailto:sage [04/08/20 17:27]
>>120
…まあ落ち着け。
cons セルはバイナリ・ツリー(二分木)のノード(節)だ。
一つの節から生える枝は必ずcar, cdr の 2本だから、
一つの cons セルは2本分の枝のアドレスを保持する必要があるんだよ。
だから 4バイト × 2 で8バイトが必要になる。

124 名前:デフォルトの名無しさん mailto:sage [04/08/20 17:35]
>>120
あとな、この辺の図も見ておけ。
cons セルがどうしてポインタを2つ持つのか、いやおう無しに分かるから。
www.stdio.h.kyoto-u.ac.jp/~hioki/gairon-enshuu/SchemeNotes/listproc.html




125 名前:デフォルトの名無しさん mailto:sage [04/08/20 17:56]
>>117
それをみんなずっと言ってたんじゃないかあぁぁぁぁ・・ぁぁぁぁ・・・・・・


126 名前:デフォルトの名無しさん mailto:sage [04/08/20 18:05]
単にconsセルを理解してないだけだろ。

127 名前:95 mailto:sage [04/08/20 18:59]
いや、どうも。。。

結局のところ cons セルを "ナイーブに" 実装するだけだったら
ポインタを2つ積めば良いのは分かっているんだけど、
確か世の中には、それをもう少し圧縮する技法が
あったと思ってたので。

例えば >>115 のように、cdr となるセルを
(物理的に)隣のメモリに配置することが出来て、
それを cons 表現の(内部的に)特殊な表現として扱えれば、
本来であれば (car . cdr) を表現するためには
3つのセルを使用しなければならないところを、
たった2つのセルで表現できてしまう。
ていうか、セル1つの表現が4バイトあればほぼ事足りてしまう。
(勿論再帰などの問題があるので、通常のポインタ2つ丸々
使用する例外的な表現も許すようにしておけばよい)
Lisp で使うセルの大半は cons なので、
こういうのは結構お得な発想だと思っていたけど?


128 名前:デフォルトの名無しさん mailto:sage [04/08/20 19:06]
>>127 それをcdr-codingっていうんだよ。
www-2.cs.cmu.edu/Groups/AI/html/faqs/lang/lisp/part2/faq-doc-9.html



129 名前:デフォルトの名無しさん mailto:sage [04/08/20 19:16]
>結局のところ cons セルを "ナイーブに" 実装するだけだったら
>ポインタを2つ積めば良いのは分かっているんだけど、
>確か世の中には、それをもう少し圧縮する技法が
>あったと思ってたので。
そういうことは最初から書いとけよ。
理由付けもなく4バイトとか言われても、理解してないとしか思えないんだよ。

130 名前:デフォルトの名無しさん mailto:sage [04/08/20 19:35]
>>128
へーなるほど。。。

勉強になりました。


131 名前:デフォルトの名無しさん mailto:sage [04/08/20 19:37]
>>127
> 本来であれば (car . cdr) を表現するためには
> 3つのセルを使用しなければならないところを、
> たった2つのセルで表現できてしまう。

普通、「セル」といったら「cons cell」のことで、
(A . B)
のペアを1つのセルと数えると思うんだが

132 名前:デフォルトの名無しさん mailto:sage [04/08/20 20:13]
>>127
>結局のところ cons セルを "ナイーブに" 実装するだけだったら
>ポインタを2つ積めば良いのは分かっているんだけど、

>>117
>あ、なるほど。それで分かりました。

リスト遊びから読み直せ。

133 名前:デフォルトの名無しさん mailto:sage [04/08/20 20:24]
>>131
それだ!
>>127 とか、読んでも意味が分からんかったんだけど、
95氏は 変数(ポインタ)一つのことを1つのセルと呼んでいるんだ。

普通はconsセルといえば、二つのポインタのペアのことだとしか思わないよなあ。

あと、95氏は、彼の読んでいるコードは、何らかの最適化がされているということを
前提に考えているみたいだけど、それって思い込みなのじゃないか?
実際は、普通(ナイーブ)に2つのポインタのペアとしてコーディングされてるんじゃ
ないのか?>>115-117を見てると、そうとしか思えん。

134 名前:デフォルトの名無しさん mailto:sage [04/08/20 20:27]
ポインタ一つをセルと呼んでるとしても、
>本来であれば (car . cdr) を表現するためには
>3つのセルを使用しなければならないところを、
>たった2つのセルで表現できてしまう。
は理解不能。
なんで3つもいるの?



135 名前:95 mailto:sage [04/08/20 20:33]
>133
>95氏は 変数(ポインタ)一つのことを1つのセルと呼んでいるんだ。

Lisp 実行上での言葉と、Lisp 実装上の言葉の違いかなぁ・・・
「メモリセル」とか言わない?

>>133
>実際は、普通(ナイーブ)に2つのポインタのペアとしてコーディングされてるんじゃ
>ないのか?>>115-117を見てると、そうとしか思えん。

そう、「それ」が分かったんです。
単なる思い込みで、そのコードが所謂 "CDR-cording" をしていると
ばっかり思っていたので・・・


136 名前:デフォルトの名無しさん mailto:sage [04/08/20 20:36]
じゃあ95はポインタを二つ使うconsセルについては理解してるんだな?

137 名前:デフォルトの名無しさん mailto:sage [04/08/20 20:55]
>>135
>「メモリセル」とか言わない?
言うけど、Lispスレではすっごく紛らわしいよ。実装寄りの言葉を使いたいのは
分かるけど、なら「メモリセル一つ(cons セルにあらず)」とか書いて欲しいよ。
でなきゃ素直にポインタと書くとか。

> そう、「それ」が分かったんです。
うー、だったらはっきりそう書いて欲しかった。じゃあもう完全に分かったのね?
cdr-codingとかを除いて。
だけど、>>134とか見ると不安なんだけど。何に3つのポインタが必要なの?

138 名前:デフォルトの名無しさん mailto:sage [04/08/20 21:04]
>>127
> 本来であれば (car . cdr) を表現するためには
> 3つのセルを使用しなければならないところを、
> たった2つのセルで表現できてしまう。

tag + car + cdr で3つのポインタが必要なところを、
tag をアドレスのビットパターンに埋め込んで2つのポインタで表現できる、ということ?
でも、次の行の

> ていうか、セル1つの表現が4バイトあればほぼ事足りてしまう。

と合わせるとわけわからん。
「セル」がポインタ1つのことを指しているのなら「4バイトで "ほぼ" 事足りる」の意味が分からんし、
「セル」がconsセルのことを指しているのなら4バイト=ポインタ1つでは足りないし。

一体、ここでいう「セル」は何を指しているんだ?

139 名前:95 mailto:sage [04/08/20 21:12]
>>137
御心配かけて誠にスミマセン。

>>134 では「3つのポインタが必要」と言っているのではなくて、
「3つのセルが必要」と言っているのです。
pair と car と cdr。計3つ。

これでどうでしょ?


140 名前:デフォルトの名無しさん mailto:sage [04/08/20 21:15]
pairってなんだ・・・??
頼むからもうちょっと説明をしてくれ。

141 名前:95 mailto:sage [04/08/20 21:22]
そんなに「セル」って言葉の使い方、変なのかな・・・
>>128 で紹介されていた葱メロンの FAQ でも、
それっぽい使い方をしているみたいだけど。
pair って単語も、ちゃんと >>128 に出ているし。


142 名前:デフォルトの名無しさん mailto:sage [04/08/20 21:26]
自分用語を使わず、面倒でもまわりくどい言い方で説明してくれyo。
あまりにも言葉足らずで、その単語が本当に本来の意味で使われているのかどうかすら判断できない。

143 名前:128 mailto:sage [04/08/20 21:33]
用語には文脈ってもんがあるんだからさぁ。
Lisp界では、文脈無しで「セル」って言ったら
「consセル」=「pair」=「carポインタとcdrポインタの対」
と思われるだろう。まあ、>>95 がそう思わないとしてもだ、
ここは曖昧さを避けるために区別できるような言葉を使っては
くれまいか。

>>128 で紹介した文書には確かに「CAR cell」「CDR cell」
という言い回しが出てくるが、それはCDR codingの説明の
文脈であるって前提で、しかも最初に「CAR cell」「CDR cell」
と修飾して使ってるから意味が通るんじゃない。
個人的には、「slot」と言った方が混乱が避けられると思うがね。


144 名前:デフォルトの名無しさん mailto:sage [04/08/20 21:49]
>>139
> pair と car と cdr。計3つ。
> これでどうでしょ?

了解。安心しますた。

>>141
> そんなに「セル」って言葉の使い方、変なのかな・・・

いや、変じゃないんだけど、質疑の最初の頃、話がが全然噛み合って
なかったから、私はあなたの知識水準を思い切り低く見積もっちゃって、
これは consセルを指しているのだ、あなたが consセルを誤解してるのだ、
と思ってしまったんですよ。まあ、誤解は私のほうでしたね。申し訳ない。

あなたも、聞きたい答えを得るのに、たくさん説明しなきゃならなくて
大変でしたね。お疲れ様。



145 名前:95 mailto:sage [04/08/20 21:50]
>>142
>自分用語を使わず、面倒でもまわりくどい言い方で説明してくれyo。
む〜。難しいですね。とりあえずやってみます。

>>138
>「セル」がポインタ1つのことを指しているのなら「4バイトで "ほぼ" 事足りる」の意味が分からんし、
ここで「ほぼ事足りる」と書いたのは、
>>128 で言う "CDR-NORMAL" のような存在があるからです。
こいつは4バイトじゃ表すことが出来ませんからね。

>「セル」がconsセルのことを指しているのなら4バイト=ポインタ1つでは足りないし。
それを無理やり足りさせてしまう技法を "CDR-cording" と呼ぶそうです。


146 名前:デフォルトの名無しさん mailto:sage [04/08/20 21:51]
>>143
>個人的には、「slot」と言った方が混乱が避けられると思うがね。
なるほど、でも slot というとまた別のイメージが・・・
この手のものをあらわす正式な用語ってないんですか?

>>144
いえいえ、どういたしまして。


147 名前:デフォルトの名無しさん mailto:sage [04/08/20 22:43]
で、結局 >>127 の中で用いてる「セル」は「consセル」なの?「メモリセル」なの?どっちなのよ

148 名前:デフォルトの名無しさん mailto:sage [04/08/20 23:20]
もういいだろ

149 名前:デフォルトの名無しさん mailto:sage [04/08/20 23:25]
(gc)

150 名前:デフォルトの名無しさん mailto:sage [04/08/20 23:27]
(exit)


151 名前:デフォルトの名無しさん mailto:sage [04/08/20 23:29]
なんだ
うやむやにして終わりか

152 名前:デフォルトの名無しさん mailto:sage [04/08/20 23:39]
>>147
これはメモリセルと断言できると思うよ。実装の話をしてるわけだし。

153 名前:デフォルトの名無しさん mailto:sage [04/08/20 23:50]
(1 . 2) を表現するために必要なメモリセルは二つだと思うんだけどなんか間違ってる?

154 名前:デフォルトの名無しさん mailto:sage [04/08/21 00:08]
>>153
実装次第。




155 名前:デフォルトの名無しさん mailto:sage [04/08/21 00:27]
>>154
や、CDR-cording とやらを使わない普通の実装でもよ。
普通の実装の場合でもアトムならポインタ使わないでしょ。リストの時だけ使う。
常にポインタ使う実装もあるのかもしれないけどさ。

156 名前:デフォルトの名無しさん mailto:sage [04/08/21 00:38]
(1 . 2) をあらわす即値を用意すればいいのでは。

157 名前:デフォルトの名無しさん mailto:sage [04/08/21 00:42]
>>156
それには何バイトいるの?

158 名前:デフォルトの名無しさん mailto:sage [04/08/21 00:44]
>>157
実装次第。

159 名前:デフォルトの名無しさん mailto:sage [04/08/21 00:51]
>>158
156のテクニックは必要な領域を減らすことができるの?

160 名前:デフォルトの名無しさん mailto:sage [04/08/21 01:19]
もういいだろ!

161 名前:デフォルトの名無しさん mailto:sage [04/08/21 01:26]
(gc!)

162 名前:デフォルトの名無しさん mailto:sage [04/08/21 01:35]
釣られすぎー


163 名前:デフォルトの名無しさん [04/08/21 03:09]
xyzzy とかで lisp-interaction-mode だと
自動的にLispのインデントをしてくれますよね?
でも、*.l を開いた後、自動インデントにならないのです
*.l のときは、Lisp用のインデントをしてくれるように
設定したいのですが、方法をご存知の方いませんか?
ググって調べたいのですが、何で調べたらよいのかも
よくわからないのです。

164 名前:デフォルトの名無しさん mailto:sage [04/08/21 03:15]
describe *auto-mode-alist*



165 名前:デフォルトの名無しさん mailto:sage [04/08/21 03:16]
妙に書き込みがあると思ったら…

95は>>63を彷彿とさせるなぁ…

166 名前:デフォルトの名無しさん mailto:sage [04/08/21 04:02]
>>165
そうか?95 はちゃんとした人だと思うが。
当初の勘違いのせいもあって、コミュニケーションがうまく
行かなかっただけじゃないのか?

167 名前:デフォルトの名無しさん mailto:sage [04/08/21 04:06]
ところで、Lisp スレも現在 Part11 に至っているわけだが、
その間、スレの参加者は増えたのだろうか?
URLのパラメータがUNIX時間なので、その差分を取ってみた。

(define x '(1091456033
       1075630259
       1069594582
       1058263391
       1042167213
       1031560687
       1023091882
       1016211619
       1008220265
       1002584344
       987169286))

(let loop ((x x))
 (if (null? (cdr x))
   '()
   (cons (/ (- (car x) (cadr x)) 86400.0)
      (loop (cdr x)))))

結論:全く傾向なし。いや、増減なしと見るべきか?
Lisp 人口は生きた化石のごとく変わらないのであろうか?

168 名前:デフォルトの名無しさん mailto:sage [04/08/21 04:33]
>>146
ワード?


169 名前:デフォルトの名無しさん mailto:sage [04/08/21 05:01]
レベルは下がり続けているな。

170 名前:デフォルトの名無しさん mailto:sage [04/08/21 05:54]
未踏の lego 用 XS lisp って本当にいじってみた人いる?
Google で「面白そう」って意見は結構見るんだけど
おれは Lisp 入門者だけど実装側の勉強にもなるかな?


171 名前:80 mailto:sage [04/08/21 10:35]
>>83 >>85
情報サンクス。
λ計算の理論から導出される公式として覚えておけば良いものみたいですね。
情報数学知らなかったので助かりました。


172 名前:デフォルトの名無しさん [04/08/21 19:06]
>>164
サンクス

173 名前:デフォルトの名無しさん mailto:sage [04/08/21 22:33]
気付いたら>>95のヴォケのおかげで無駄レスが・・

174 名前:デフォルトの名無しさん mailto:sage [04/08/23 02:51]
陸上の末続選手はちょっと Shiro さんに似てると思った



175 名前:デフォルトの名無しさん mailto:sage [04/08/23 14:55]
>>174
ぜ、全然似てない…!!!
images.google.co.jp/images?hl=ja&lr=&ie=UTF-8&c2coff=1&q=%E6%9C%AB%E7%B6%9A

176 名前:デフォルトの名無しさん mailto:sage [04/08/23 23:02]
>>174 馬鹿だな、親戚だから似てて当たり前


177 名前:デフォルトの名無しさん mailto:sage [04/08/24 13:01]
>>71
マクロを使ったプログラムの互換性を保障したいためでしょ。
デファクトなんだし、仕様に取り込んでもいいと思うのだが。
Schemeマクロを実装するよりも、ずっと手軽に実装できるしな。

178 名前:デフォルトの名無しさん mailto:sage [04/08/24 19:39]
>>177
legacyマクロでプログラムの互換性を保障するのは難しいよ。
バッチコンパイルする処理系だと、マクロから呼んでる関数が
マクロ展開時にはまだ無いってことがあり得る。
え、eval-whenですか? それはちょっと…


179 名前:デフォルトの名無しさん mailto:sage [04/08/24 21:11]
eval-whenは必須でしょ

180 名前:デフォルトの名無しさん mailto:sage [04/08/24 21:38]
そんなマクロはうちの子じゃありません

181 名前:デフォルトの名無しさん mailto:sage [04/08/24 22:28]
eval-whenてなに?

182 名前:デフォルトの名無しさん mailto:sage [04/08/25 00:53]
>>181
黒魔術。

183 名前:デフォルトの名無しさん mailto:sage [04/08/26 00:50]
(expt float integer)

としたとき,ちゃんと (* float float float ...) と等価になりますか?
HyperSpac では (expt rational integer) のときしか書いてないような.

普段は (expt float1 float2) == (exp (* float2 (log float1))) だと書いてありますが,
2 乗や 3 乗のときは,これでは困りますよね.

不安なら整数用の expt を作る必要がありますか?

184 名前:デフォルトの名無しさん mailto:sage [04/08/26 01:32]
>>183
>2 乗や 3 乗のときは,これでは困りますよね.
なにが困るのか判らない。



185 名前:183 mailto:sage [04/08/26 23:37]
>>184
2 回か 3 回の掛け算で済むことに,log や exp の計算
(級数などを使うのでしょうか?) をしてしまうのは不経済では,と思ったのです.

186 名前:デフォルトの名無しさん mailto:sage [04/08/27 00:02]
それは「困る」とは違うよね

187 名前:デフォルトの名無しさん mailto:sage [04/08/27 06:26]
>>183
処理系任せだろうね。真面目な処理系なら最適化してるんじゃない。
心配ならプロファイリングしてみれば。
というか、そんな細かいところを気にする前にベンチ取ってボトルネック
見つける方がいいと思うよ。

188 名前:183 mailto:sage [04/08/28 14:02]
>>186-187
みなさんのお陰で考え方が分かりました.ありがというございました.

(expt rational integer) の場合が記されているのは,
速度ではなく型の問題なんですね.

> 心配ならプロファイリングしてみれば。
> というか、そんな細かいところを気にする前にベンチ取ってボトルネック
> 見つける方がいいと思うよ。

そうですね.言われるまでこういうことには気づきませんでした.

189 名前:デフォルトの名無しさん [04/08/29 17:38]
LISPって遅そうでめちゃんこ速いね

190 名前:44 mailto:sage [04/08/29 18:43]
数値 (float) が書かれたテキストを読んで,
それとソース内のリテラルとで算術演算する場合は,
リテラルの表記を *read-default-float-format* に合わせておくべき,
というより合わせなくてはならないのでしょうか.

もう頭が痛いです.ソース内のリテラルも *read-...-format* で読むと
不都合でもあるのでしょうか...

clisp で long-float する人たちは,
リテラル全ての箇所で coerce するなんて,そんな話はありませんよね?

191 名前:デフォルトの名無しさん mailto:sage [04/08/29 18:59]
必要なら全ソースを*read-default-float-format*で検索すれば
そのうちわかるんでは?
clispも企業に対して動作保障をしているわけではないし、
どの言語処理系も数値周りは手抜き工事していたり、
バグの温床だったりする可能性が高いので。

192 名前:デフォルトの名無しさん mailto:sage [04/08/29 19:27]
>>190
最終的な目的がなんなのかによるだろ

193 名前:デフォルトの名無しさん mailto:sage [04/08/29 20:45]
defineの挙動なんですが、top levelとそうでないときとで
動作が異なるってやつの実装がマンドクセえんですが

実際はどうやってんでしょう
フラグ?

194 名前:44 mailto:sage [04/08/29 22:54]
むむ,compile しないで実行すると warning が出ない.
compile の過程で勝手に single-float にされているのかな?

>>191
探してみましたが,.lisp と .d がソースの全てでいいんですか?
grep の結果が思ったより少ないんですが...
ところで .d って何なんでしょう?
ソース/emacs/d-mode.el まであるのに何かは不明なんです.

>>192
ちょっとファイルから読んで計算するだけです.
single-float では桁が寂しい感じがしたので,せっかくだからと
long にしただけなのに怒られた,というわけなんです.



195 名前:デフォルトの名無しさん mailto:sage [04/08/29 23:07]
>>194
>ところで .d って何なんでしょう?

>Most of the C code of CLISP is stored in files with extension '.d'. It _is_
>C code, but the file will be preprocessed a bit.

cvs.sourceforge.net/viewcvs.py/clisp/clisp/src/CodingStyle?rev=1.10

ECL とかでも使われてたと思う。何のメリットがあるかは知らない。

196 名前:44 mailto:sage [04/08/30 01:30]
今まで eval-when を使ったことが無かったのですが,
もしかしてと思い,

(eval-when (compile load)
  (setf *read-default-float-format* 'double-float))

としたら,問題無くなりました.コンパイル時にも,その後の実行の時も
double-float で読む,ということなんですね.
今までこんな便利なものも知らなくて問題を長期化させました.すみませんでした.

197 名前:デフォルトの名無しさん mailto:sage [04/08/30 19:45]
>>193
環境を見ればトップレベルかどうかはわかるよね。

internal defineはマクロとの絡みがややこしい。
実装者泣かせかな。


198 名前:デフォルトの名無しさん mailto:sage [04/08/30 21:49]
内部defineはふつー実行前にletrecに変換するでしょ
まともな処理系なら

199 名前:デフォルトの名無しさん mailto:sage [04/08/31 18:59]
Dr.Schemeで「独習Scheme三週間」で紹介されてるすべての構文を使用するには
どうすればいいの?
ドットリストで構文エラー出るよ・・・

200 名前:デフォルトの名無しさん mailto:sage [04/08/31 21:42]
>>199
ドットリストで構文エラー出るなんてありえねー
そのコードさらしてみ

201 名前:デフォルトの名無しさん mailto:sage [04/08/31 22:00]
>>199
Language → choose Language で Full Scheme

202 名前:デフォルトの名無しさん mailto:sage [04/09/01 01:57]
9月の言語はSchemeと決まっています.

203 名前:デフォルトの名無しさん mailto:sage [04/09/01 18:52]
8月の言語は何だったの?

204 名前:デフォルトの名無しさん mailto:sage [04/09/01 20:14]
Augustだ。
略してAda。



205 名前:デフォルトの名無しさん mailto:sage [04/09/02 14:12]
cl の loop が,*短ければ* 読みやすさも書きやすさも両立してて,
すごくいいことを知りました.
lisp らしくないからと拒んでいた自分が悲しいです.
; グレアム氏の入門書が偏っているせいかと w

ところで,ファイルを丸々 string にする方法を探していたところ,
make-string したところに read-sequence を
使って書き込んでいくやつを見つけました.
でも,これしか無いんですか?

get-output-string-stream の input-stream 版が無いのは残念ですね.

206 名前:デフォルトの名無しさん mailto:sage [04/09/02 20:22]
そうこうしてるうちにOnLisp邦訳も更新されてたね。乙
後2章か、がんがれ

207 名前:デフォルトの名無しさん mailto:sage [04/09/02 21:38]
www.itmedia.co.jp/mobile/articles/0409/02/news048.html

208 名前:デフォルトの名無しさん mailto:sage [04/09/02 22:44]
>>207
なんだかなぁ... すべてが痛々しい

209 名前:デフォルトの名無しさん mailto:sage [04/09/02 23:53]
>>205
骨格だけ。
with-outpt-to-string (out)
(loop for line = (read-line stream) do (write-line line out)
とか。eofをどうするか(whileにするかエラー捕まえるか)は好きにすれ。
loopはcollect intoとかfor acrossとかfinallyとか使い出すと妙に可読性が
上がるので結構多用してるカモ。Lispらしからぬ見た目になるけどね。

210 名前:デフォルトの名無しさん mailto:sage [04/09/03 00:04]
3年前はロン毛だったと記憶してるんだけど・・・これヅラだよね?普通に考えて。

211 名前:デフォルトの名無しさん mailto:sage [04/09/03 01:07]
>>209
read-line は改行を消してしまうね.
「行の区切り」を指定できるスペシャル変数があればいいのに.
; awk みたいだ...

212 名前:デフォルトの名無しさん mailto:sage [04/09/03 01:30]
学生時代に授業でSchemeをちょこっとやったんですが、
最近CommonLispをいじってます。
で、CLのlambdaなんですが

(lambda (x) (* x 2)) => error
#'(lambda (x) (* x 2)) => anonymous closure

これにすごい違和感があります。この「#'」はナニモノで
何故必要なんでしょう。

213 名前:デフォルトの名無しさん mailto:sage [04/09/03 02:00]
>>212
このページが大変参考になる。
www.ice.nuie.nagoya-u.ac.jp/~h003149b/lang/comparison.html

214 名前:デフォルトの名無しさん mailto:sage [04/09/03 02:28]
LISP-1か2の違い。



215 名前:デフォルトの名無しさん mailto:sage [04/09/03 04:24]
数ヵ月前に見た時もロン毛だったよ>ドクターT。



216 名前:デフォルトの名無しさん mailto:sage [04/09/03 13:12]
cmuclで関数の実行時間をはかりたいのですが、何を使うのが適当でしょうか?
変数にとりたいのですが、timeマクロは出力してしまうから使えず、
get-internal-run-timeは秒単位らしくて粗すぎて使えず、です。








[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<286KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef