【入門】Common Lisp その11【質問よろず】

**デフォルトの名無しさん** · 2014/09/21(日) 22:49:21.73

Lisp Schemeスレでは恥ずかしくて聞けないようなことを質問したり、
Lisp Schemeスレの話題は高度すぎて気後れする人が話しあったり。
それ以外でもCommon Lispについての話題なら歓迎します。

ま、ゆっくりやりましょう。

「いいものの本質は、いかなる時代においても変わらない」byパワーズ

■前スレ
【入門】Common Lisp その10【質問よろず】
http://peace.2ch.net/test/read.cgi/tech/1361341876/

■Wiki
http://wiki.fdiary.net/lisp/ (id:guest pass:cl)
http://cl.cddddr.org/
http://tips.lisp-users.org/common-lisp/

**デフォルトの名無しさん** · 2017/05/19(金) 21:58:39.33

>>482
concatenateの方はエラーがでます
普通に文字列を渡せばうまくいくのですが

**デフォルトの名無しさん** · 2017/05/20(土) 00:30:38.53

>>480
どうしてマクロにしたの？初心者だから？

**デフォルトの名無しさん** · 2017/05/20(土) 01:15:39.37

>>484
関数の中で(eval `(defparameter ,変数 ,シンボル))とすると変数がありませんというエラーがでてきて
普通にdefparameterしようとしても変数定義はされないのでマクロでやるしかないと思いました。
(eval `(defparameter ,変数 ,文字列))だとうまくいきますね

**デフォルトの名無しさん** · 2017/05/20(土) 01:30:33.54

問題が解決できました evalはあまり使っちゃいけない的なことが言われてたと思うので
なんとなく気が引けてマクロを使っちゃった感じです初心者の質問に付き合ってくださりありがとうございました！

**デフォルトの名無しさん** · 2017/05/21(日) 06:36:36.81

OpenCVの超解像計算プログラムは
cpuとgpuで100倍近く速度に差があるよ

**デフォルトの名無しさん** · 2017/05/21(日) 06:50:43.54

typed racketみたいな型推論をcommon lispでする方法ないのでしょうか？

**デフォルトの名無しさん** · 2017/05/21(日) 19:45:11.09

>>488
common lispのコンパイラでも型推論くらいするの知ってるか？
それがどう駄目なのか，どうしたいのかをまず書けよ．

**デフォルトの名無しさん** · 2017/05/22(月) 06:10:33.21

sbclのtheのdescribeに相当する機能がtyped racketだとreplからしか使えないような意地悪されてるのでcommon lispでもそうかと思った

**デフォルトの名無しさん** · 2017/05/22(月) 19:06:44.55

sbclのdescribeで
https://github.com/sbcl/sbcl/blob/master/src/code/describe.lisp
derived-typeの情報だけ取り出して他の変数に格納したいのに
うまくいかない
streamに文字列出力する関数だからstreamの文字を正規表現かなにかで切り分ける方が良いのだろうか

**デフォルトの名無しさん** · 2017/05/25(木) 21:17:35.11

>>490
> sbclのtheのdescribe
が意味するところが分からない．

**デフォルトの名無しさん** · 2017/05/31(水) 17:40:47.18

Common lispでcのプログラムコード読み込んで
関数宣言一覧取り出して、ヘッダーファイル生成するような
パーサージェネレーターのサンプルコードどこかないでしょうか

c言語の解析するサンプルコードなら他のでも良いです

**デフォルトの名無しさん** · 2017/07/09(日) 02:25:04.88

誰か知っていれば教えてほしいのですが
LispWorks 7.0 のmacOS版って日本語表示や日本語入力問題なく
できるようになっていますか？
LispWorks 6.1 Personalを使っているのですが日本語入力すると??に文字が
変わってしまうみたいなので。

**デフォルトの名無しさん** · 2017/11/08(水) 02:39:25.32

TEST

**デフォルトの名無しさん** · 2017/12/06(水) 00:55:26.32

テスト

**デフォルトの名無しさん** · 2018/02/16(金) 05:55:09.54

☆ 日本の、改憲を行いましょう。現在、衆議員と参議院の
両院で、改憲議員が３分の２を超えております。
『憲法改正国民投票法』、でググってみてください。国会の発議は
すでに可能です。平和は勝ち取るものです。お願い致します。☆☆

**デフォルトの名無しさん** · 2018/05/23(水) 21:07:30.15

僕の知り合いの知り合いができたパソコン一台でお金持ちになれるやり方
役に立つかもしれません
グーグルで検索するといいかも『ネットで稼ぐ方法　モニアレフヌノ』

HSR58

**sage** · 2018/06/08(金) 07:24:37.45

ところでlabelsって関数の名前の由来って何？
しっくりこない

**デフォルトの名無しさん** · 2018/06/17(日) 11:25:32.22

>>477
そもそもCLはインタプリタだからGPU使っても7倍程度しか速度出ないのは当たり前だろ。

**デフォルトの名無しさん** · 2018/06/19(火) 02:22:17.89

>>500
clはコンパイラ言語だよ．仕様上インタプリタ実装も許容されているだけ

**デフォルトの名無しさん** · 2018/07/04(水) 22:29:25.87

V3Z

**デフォルトの名無しさん** · 2018/07/05(木) 16:53:25.50

V3Z

**デフォルトの名無しさん** · 2018/07/13(金) 17:19:54.02

こないだ迄Windows10の64bit版ではDEPの絡みで動かないと思ってた、SBCL版のMaximaが、
今試してみたらあっさり動いてしまいました。
sf.netに置いてあったインストーラでインストールした直後はCLISP版しか駄目だった
筈なんですが…。

うちではWindows10 Homeを使ってますが、皆様の処ではどうでしょうか？

**504** · 2018/07/13(金) 17:28:05.78

SBCL自体を別途インストールしたのが効いてるのかも知れないなぁ…。

**デフォルトの名無しさん** · 2018/09/11(火) 03:59:06.82

Lispってwebフレームワークありますか？
一通りの機能のあるブログを作ったり出来るような

**デフォルトの名無しさん** · 2018/10/03(水) 18:50:06.50

質問です。

Lispで書かれたLisp処理系はありますか？

**デフォルトの名無しさん** · 2018/11/03(土) 15:30:34.57

中学卒業までにコモンリスプ極める！

**デフォルトの名無しさん** · 2018/11/14(水) 08:37:19.93

roswellについての質問なんですが

ros init ファイル名

としたときできるファイルの中身の

(progn ;;init forms
(ros:ensure-asdf)
;;#+quicklisp (ql:quickload '() :silent t)
)

って何ですか？
(ros:ensure-asdf)特にこれ

**デフォルトの名無しさん** · 2018/11/17(土) 00:21:41.91

>>509
そんな事俺に聞かれても知るわけないやろ頭おかしいんか？

**デフォルトの名無しさん** · 2018/12/02(日) 12:23:45.12

お前だれよ

**デフォルトの名無しさん** · 2019/01/08(火) 13:36:34.22

Common LispからC言語のモジュールを呼ぶ方法は簡単に見つかるのですが
C言語からCommon Lispプログラムを実行する方法が見つかりません。
GaucheならC言語からインタープリタを起動できるみたいなのですがCommonLispにはないのでしょうか？

**デフォルトの名無しさん** · 2019/01/08(火) 18:04:16.67

>>512

ただ別プロセスで処理系を起こして、そこの repl で評価できればいい・・というだけなら、 fork と exec で済むかも。

CからLisp関数を直接呼んだり、C関数でLispオブジェクトを直接扱うとかするのは、がっつり処理系依存だけど出来ることは出来る。
たぶんこの目的なら ECL が一番簡単だと思う。それっぽい例もあるし:
https://gitlab.com/embeddable-common-lisp/ecl/tree/develop/examples/embed

SBCL や Allegro CL でも出来るみたいだけど、かなり大変。
というのも、C関数が動いてる間にLisp処理系のGCが走ると死ぬ・・とか諸々あるので。一応リンクだけ:
http://www.sbcl.org/manual/#Calling-Lisp-From-C
https://franz.com/support/documentation/10.1/doc/foreign-functions.htm#lisp-from-c-1

**デフォルトの名無しさん** · 2019/01/13(日) 15:30:06.78

Lispでグラフィカルにステップ実行できる方法ってEmacsでSLIMEやるしかないですか？
LispのためだけにEmacs覚えるのは勘弁してほしいので
VimでSlimv入れてやってみましたがGDBのようなステップ実行しか出来ませんでした。

**デフォルトの名無しさん** · 2019/01/15(火) 05:34:30.77

>>514

「グラフィカルにステップ実行」が何をさすのかよく分からんが。
slime でも sldb で restart 選ぶ感じにはなっちゃうと思う。

https://lispcookbook.github.io/cl-cookbook/debugging.html#step
https://lisphub.jp/common-lisp/cookbook/index.cgi?SLIME%3ASLDB

**514** · 2019/01/15(火) 10:41:56.87

すみません、勘違いでした。
edebugのように現在実行している行がわかるステッパ？が利用したいのですが
edebug以外にないでしょうか？

**デフォルトの名無しさん** · 2019/01/16(水) 01:39:36.94

>>514

「グラフィカルにステップ実行」と言ったらVisualStudioみたいな感じかと思うけど。
LispじゃなくてSchemeでもいいならRacketはどう？（ダメだよね ;_;）
かなり昔にDrSchemeって名前だった頃にちょっと遊んでみただけだけど。

https://docs.racket-lang.org/drracket/debugger.html

**デフォルトの名無しさん** · 2019/01/17(木) 06:22:05.82

Lispでドルマークって特別な意味ありますかね？正規表現とかナシで

**デフォルトの名無しさん** · 2019/01/17(木) 15:24:46.14

Land of Lisp、文字が小さくて読めない…(´；ω；｀)

**デフォルトの名無しさん** · 2019/01/17(木) 19:09:16.06

>>519
⊃ハズキルーペ

**デフォルトの名無しさん** · 2019/01/18(金) 15:25:03.51

>>518

standard-syntax なら $ は普通の文字。
standard-syntax での各文字の意味はここにある：
http://www.lispworks.com/documentation/HyperSpec/Body/02_ad.htm#charsyntaxtypesinstdsyntax

readtable いじってたら分からない

**デフォルトの名無しさん** · 2019/01/19(土) 14:06:18.02

だれかChocorateyにRoswell追加してクレメンス

**デフォルトの名無しさん** · 2019/01/19(土) 23:31:04.73

Windows版Roswellでinstallコマンド出来ている方はいますか？
sbcl-binのような末尾にbinがついて、ビルドが不要なものはインストールできるのですが
それ以外だと、msys2の有無にかかわらず~/.roswell以下にmsys2がインストールされて
それが全くまともに動作せず何もインストールできません。

**デフォルトの名無しさん** · 2019/01/20(日) 15:17:16.36

最近Lispを勉強し始めた超初心者です。
関数型言語も初めてです。

末尾再帰の最適化をするとコンパイラがループにしてくれるので効率がいい、の説明が腑に落ちません。
再帰は読むのも書くのもループより高コストだと思いますが、
その結果がループ並みに早くなる、では何のために再帰にするのかわかりません。

なにか他にメリットが有るのでしょうか。

**デフォルトの名無しさん** · 2019/01/20(日) 15:44:22.07

Common LispじゃなくてSchemeだけど、こんな説明はどうでしょう
http://practical-scheme.net/docs/tailcall-j.html

**はちみつ餃子** ◆8X2XSCHEME · 2019/01/20(日) 21:45:08.14

>>524
関数呼出しっていうのは、一般的なコンピュータの中でどのような
動作をするかというとその実態はジャンプとスタック操作でしかない。
再帰であろうとループであろうと中ではただジャンプしてるだけだよ。
(実際にはリソースの管理とかが一体化してるのでそう単純でもないんだけど。)

再帰というのがスタック操作をするループであると捉えるか、
ループというのがスタック操作を省略できる再帰であると捉えるのかは
別の側面から見ているというだけで同じことを言ってる。

どっちを軸するかという説明の仕方の違いってだけ。

**デフォルトの名無しさん** · 2019/01/20(日) 23:30:23.13

>>524 が聞きたいのは、それを再帰として書くことの利点だと思う。

読み書きのコストは慣れの問題で、分野によっては再帰で書くほうが慣れてるんだよ。
関数型言語の界隈は数学寄りの人が多いんだけど、数学は再帰で書くことが多いんだ。

関数呼んでるだけだから、ループ用の特別な構文がいらないってのもある。
これはどっちかっていうと言語の規格とかそっち側の都合だけど。

**はちみつ餃子** ◆8X2XSCHEME · 2019/01/21(月) 00:09:20.61

あ～、そっか。
Common Lisp 的にはそこまで積極的に何もかも (明示的に) 再帰で書くスタイルを推奨しているわけではないし、
ループ的に書く方が読みやすければそう書いてもいいんだが、
他の言語に比べれば再帰を理解している必要は有るので、
チュートリアルの類では過剰に再帰を推してる感じがするかも。

**デフォルトの名無しさん** · 2019/01/21(月) 08:36:01.54

ループはiの様なループ変数が必要だけど、これは変数への破壊的代入または再代入になる
関数型プログラミングはそれを嫌う
末尾呼び出しの最適化を前提に書けば破壊的代入無しにループが書ける

**デフォルトの名無しさん** · 2019/01/22(火) 03:37:24.22

526 にも書いてるけど、変数の破壊的代入と再帰と末尾呼び出しの最適化はそれぞれ別々のものだと思うけどね

(let ((i 10)
(closures nil))
(labels ((iter ()
(if (zerop i)
nil
(progn
(push (lambda () i) closures)
(decf i)
(iter)))))
(iter)
(mapcar #'funcall closures)))
⇒ (0 0 0 0 0 0 0 0 0 0)

(let ((i 10)
(closures nil))
(dotimes (i i)
(let ((i i))
(push (lambda () i) closures)))
(mapcar #'funcall closures))
⇒ (9 8 7 6 5 4 3 2 1 0)

**デフォルトの名無しさん** · 2019/01/22(火) 18:44:06.81

>>530
上と下が随分違うコードで比較して何が言いたいのかよく分からん…
上のコードは
(let ((i 10))
(labels ((iter (n closures)
(if (zerop n)
closures
(iter (1- n) (cons (lambda () i) closures)))))
(mapcar #'funcall (iter i nil))))
⇒ (10 10 10 10 10 10 10 10 10 10)
と書けば破壊的代入を避けてループが書ける
closuresも破壊的代入してたけど、Common Lispだと簡単にそういうコードを書いてしまう
結局破壊的代入無しにループ書くには再起呼び出しが必須と言うだけだ
再起呼び出しは簡単にスタックオーバーフローするから末尾呼び出しの最適化は前提でしょ

**デフォルトの名無しさん** · 2019/01/23(水) 01:49:56.83

すげぇ歴史がある言語のわりに全然ドキュメントもライブラリもないっすね…

**デフォルトの名無しさん** · 2019/01/23(水) 15:13:20.89

Forthをdisるのはやめれ

**デフォルトの名無しさん** · 2019/01/23(水) 16:46:55.68

ドキュメントがまだないのはまだ始ってないから。

もう少し待て。いつか必ずブームがくるから。

**デフォルトの名無しさん** · 2019/01/23(水) 18:13:57.77

lisp勉強中だが他言語しばらく触った後lispに戻ってくるとコード見るだけで笑えてくる

**デフォルトの名無しさん** · 2019/01/23(水) 20:17:08.92

かっこかっこかっこかっこかっこばかり

**デフォルトの名無しさん** · 2019/01/23(水) 21:36:19.03

カッコいいね

**デフォルトの名無しさん** · 2019/01/24(木) 10:47:39.00

Juliaってかっこいいですか？

**デフォルトの名無しさん** · 2019/01/24(木) 11:43:43.15

カッコはともだちこわくないよ

**デフォルトの名無しさん** · 2019/01/25(金) 14:34:14.18

Juliaって何かと思ったら新しい言語か
JuliaもそうだけどASTのレベルを構築出来るマクロをLisp-like macroって言うのは違うだろうと思う
Lispのマクロはコードの見た目を変更するという至極単純で唯一無二のものだからな

**デフォルトの名無しさん** · 2019/01/26(土) 01:26:25.34

> Lispのマクロはコードの見た目を変更するという至極単純で唯一無二のものだからな
って言うのは違うだろうと思う

**はちみつ餃子** ◆8X2XSCHEME · 2019/01/26(土) 03:08:15.37

LISP 的なマクロというのは
「プログラムはリストであり、リスト操作によってプログラムを変形する」
と私は捉えているので、前提となる「プログラムはリスト」の部分がないと
やっぱりちょっと LISP 的とは言えないかな～とは思う。

ただ、各言語の構文木の表現がリストと言えるかどうかはかなり微妙だし、
Scheme のように明らかに LISP 系の言語でもそのマクロ機構 (syntax-rules) がリスト操作
と呼べる範疇なのかどうかは人によって感覚が違うかもしれないというのもわかるので、
ふんわりと捉えてあげてもいいんじゃないかと。

**デフォルトの名無しさん** · 2019/01/26(土) 11:11:15.46

TclはLisp的か

**デフォルトの名無しさん** · 2019/01/26(土) 13:04:05.95

nil

**デフォルトの名無しさん** · 2019/01/29(火) 02:23:30.16

Lispってカッコだらけで視認性悪いのに何で最後に)))))って閉じるコーディングスタイルがスタンダードっぽいの？
(some
　　(some
　　)
)
こうやってネストと閉じカッコを対応させておけば閉じ忘れしにくくて視認性も良いと思うのだが

**デフォルトの名無しさん** · 2019/01/29(火) 02:59:58.51

>>545
じゃあお前が広めれば?

**デフォルトの名無しさん** · 2019/01/29(火) 13:01:27.96

Lisperはカッコを見ずにインデントを見る
カッコだけの行が有るとかえって分かりにくくなる
EmacsならRainbowDelemitter使うとカッコの輝度が下がって目障りでもなくなる

**デフォルトの名無しさん** · 2019/01/29(火) 15:54:32.57

slime の C-c C-] とか一気に全部かっこを閉じるコマンドを使うから、閉じ忘れとか気にしないなあ

**デフォルトの名無しさん** · 2019/01/29(火) 16:25:08.69

XMLのタグみたいなもんだな。XMLがそれを理由に廃れたことも含めて。

**デフォルトの名無しさん** · 2019/01/29(火) 21:07:40.48

>>547
> カッコだけの行が有るとかえって分かりにくくなる
完全にカッコ見とるやんw
カッコつけんなエアプw

**デフォルトの名無しさん** · 2019/01/30(水) 12:44:23.33

>>550
カッコだけの行が有るとインデントが分かりにくくなるという意味だが、わざわざ書かないと分からんか？

**デフォルトの名無しさん** · 2019/01/30(水) 12:52:38.76

エアプさん必死やねw

**デフォルトの名無しさん** · 2019/01/30(水) 13:13:38.82

(a))))
の部分のaだけ頻繁にコメントする時は不便に感じる
↓
(a)
)))
にしていいよね？

**デフォルトの名無しさん** · 2019/01/30(水) 13:46:07.35

わかる。

(hoge
(fuga
(piyo))) ; ここにコメント書くと、式全体を閉じるということに書いてる気がする

(hoge
(fuga
(piyo) ; こう書くと、 (piyo) 式にだけコメント書いてる気がする
))

**デフォルトの名無しさん** · 2019/01/30(水) 13:59:53.27

>>553
Emacsだと(a)))で(a)だけ選択してM-;すると自動でカッコがよけて
(a)
))
になるから、そういう状況にはしょっちゅうなる

**デフォルトの名無しさん** · 2019/01/30(水) 21:17:23.83

C系の言語から来ると最初は閉じ括弧の行がないのが気になるかもしれないが
すぐ慣れてむしろ邪魔になるゾ
というか今どきのスクリプト言語みんなそうじゃないか

**デフォルトの名無しさん** · 2019/01/31(木) 12:29:13.76

かっこの話題になるとわらわら湧いてくる陸リスパーさん達w

**デフォルトの名無しさん** · 2019/01/31(木) 15:46:41.09

うby最強

**デフォルトの名無しさん** · 2019/02/01(金) 01:45:52.05

海でLispするのが本物ってこと？

**デフォルトの名無しさん** · 2019/02/01(金) 07:48:11.81

>>559
なんや急に本物て？偽物の自覚でもあったんかおまえw

**デフォルトの名無しさん** · 2019/02/01(金) 20:04:50.60

何んか湧いてますね

**デフォルトの名無しさん** · 2019/02/02(土) 01:05:09.97

にわか認定したい奴が沸いてんのかね
Lisperなんてカッコに嫌悪感がなければそんなに労せずなれると思うけどね

**デフォルトの名無しさん** · 2019/02/02(土) 07:45:51.33

>>562
そのセリフはせめてリスパーになってから言ったらどおや？陸リスパーさんw

**デフォルトの名無しさん** · 2019/02/02(土) 08:23:24.85

陸リスパーの定義を述べよ。
リスパーの定義を述べよ。

**デフォルトの名無しさん** · 2019/02/02(土) 09:51:20.74

トランクに入れるとか

**デフォルトの名無しさん** · 2019/02/02(土) 12:43:40.25

り…陸リスパー

**デフォルトの名無しさん** · 2019/02/02(土) 19:18:03.31

おだろうね

**はちみつ餃子** ◆8X2XSCHEME · 2019/02/02(土) 19:22:38.57

陸には「くが」という読みも有ります。

**デフォルトの名無しさん** · 2019/02/02(土) 22:26:20.61

>>563
陸リスパーはリスパーじゃないらしいが、意味が分からんw
取り敢えず知能指数が75程度かね

**デフォルトの名無しさん** · 2019/02/03(日) 11:47:11.28

陸リスパーさん、案の定バカやったwww

**デフォルトの名無しさん** · 2019/02/03(日) 11:59:09.21

ツマンネ

**デフォルトの名無しさん** · 2019/03/20(水) 17:01:33.89

も～すぐ春ですね。

**デフォルトの名無しさん** · 2019/06/15(土) 16:34:52.25

defmacroだとdestructuring bind?が使えて
(defmacro test ((a b &optional c) d)
(print (list a b c d))
nil)
(test (1 2) 4) => (1 2 NIL 4)
みたいに書けるけど、&optionalや&keyの後に書こうとしてもSBCLだとdefmacroを評価した時点でエラーになる
&restの後ろには一応書けるっぽい
必須引数と&restの所には書けるけど、&optionalと&keyの所には書けないという認識で良いのか？
もし&optionalの所に書けるなら書き方を教えてくれ

**デフォルトの名無しさん** · 2019/06/23(日) 06:22:35.07

>>573
#:g1: ラムダリストでの複雑なパタンマッチ
https://g000001.cddddr.org/3770218746

**デフォルトの名無しさん** · 2019/06/23(日) 17:17:52.99

>>574
この記事見たらちゃんと書けることが分かった
自分が前に試した時は何か書き方を間違っていたようだ
取り敢えずモヤモヤが晴れたんで助かりました

**デフォルトの名無しさん** · 2019/06/26(水) 20:14:20.90

コードを C や perl や Lisp や python に書き換えて速度比べていたんですが
perl に速度負けしたのは、ちゃんと Lisp 書けるようになれば逆転できますかね？
処理系は CCL Version 1.11.5/v1.11.5 (WindowsX8632)

perl に負けるのは悔しいんですよ

**デフォルトの名無しさん** · 2019/06/26(水) 20:21:44.11

>>576
sbcl使えば?

**デフォルトの名無しさん** · 2019/06/26(水) 20:46:18.82

早い
まだリファクタリングしてないのにこの速さ
ありがとうございます。ここまで scbl が速いとは

0.331 C
0.616 scbl
0.749 perl
0.943 CCL
2.912 python

**デフォルトの名無しさん** · 2019/06/27(木) 01:23:25.87

CとPerlが2倍程度しか違わないとかどんなコードか気になる
普通二桁違ってもおかしくない

**デフォルトの名無しさん** · 2019/06/27(木) 02:17:45.54

C malloc とか使えばもっと早くなりそう
https://paste.fedoraproject.org/paste/28GrwCXGgyRCKRMZYoZKWA

perl5 これは色々時間測って速度でるようにしてる
https://paste.fedoraproject.org/paste/ZcWy7fa2ca4BAO5INcSscw

**デフォルトの名無しさん** · 2019/06/27(木) 14:46:57.17

最適化コンパイルしているか疑問
もっと早くなる気がする

**デフォルトの名無しさん** · 2019/06/27(木) 17:18:17.57

gcc でも gcc -Ofast -march=native でも
このコードは早さ変らなかった

Cをもっと早く走らせる書きかたはあると思う
しかしながら当面の目標は、Lispなどで
早く走るコードに仕上げることだ