#一応Common Lispが使えるものなんですが、身近にCommon Lisp geekがいらっしゃらなくて困っています。
#できればそういう方にリアルでお会いしたいものですが、何かよい方法はありますかね。
#知恵をお貸しくださればありがたいです。
#Twitter等で親しくなって...というのもありだと思いますが。
#/の挙動が関数呼び出しとapplyで違うみたいです。
#gosh> (/ 1 -0.0)
-inf.0
gosh> (apply / 1 '(-0.0))
+inf.0
#gosh> '(-0.0)
#(0.0)
と評価されているようですね。
#$ gosh -f no-inline
gosh> (/ 1 -0.0)
+inf.0
gosh>
なので、インストラクションと手続きでやってることが違うのかと
#Gaucheは負の無限小をサポートしないのでいかなる場合にも -0.0 は +0.0と同じはずなんですが、 (/ 1 -0.0) の場合は定数畳み込みルーチンを通るのでそこだけ何か違うかな。
#あーでも (define x 1) (/ x -0.0) でも -inf.0 だなあ。リテラル読んだ時点では負の0になってるのかな。
#gosh> (decode-float -0.0)
#(0 -1074 -1)
#ああ、ここでは負の0にしてた。それなら負の0をサポートすることにして計算ルーチンを見直そうかなあ。
#>iyanahaさん、東京ならshibuya.lispなどの集まりがちょくちょくありますし、熊本は実はLispの国だったという噂もちらほら見ますが、そういった場所以外ではLisperは潜伏しているのでなかなかリアルでは会いにくいかもしれません。
#オンラインで知り合いを増やして、あ、実はリアルでも近くですね、ってなって会う、ってパターンがいいんじゃないでしょうか。なんて書くと出会い系みたいだな。
Gauche > Archives > 2013/05/11