Emacs Part 54 (412ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
18(7): 2022/12/10(土)23:11 AAS
次のように引数の必要な関数を関数名のシンボルの代わりに指定するときに、
lambda式で書くとエラーになる場合はどうするのがいいんでしょうか？
Wrong type argument: symbolp, #'(lambda nil (dabbrev-expand nil))
(setq smart-tab-completion-functions-alist
'((emacs-lisp-mode . lisp-complete-symbol)
(lisp-interaction-mode . lisp-complete-symbol)
(text-mode . #'(lambda () (dabbrev-expand nil)))))
# この例では実際にはこの設定は不要なんですが、
# いじっているうちに疑問が出てきたので一例として。
20(1): 18 2022/12/11(日)00:30 AAS
まだよく理解できていないので一部だけ補足しますが、
#'(lammda ...は(lambda ...でも一緒なのかと思ったんですが。
https://www.gnu.org/software/emacs/manual/html_node/elisp/Anonymous-Functions.html
で、そもそもこんな風に書いたのは次のような書法を参考にしたんですが、
どうもここではまずいようです。
(add-hook 'text-mode-hook
(lambda ... ))
23(1): 18 2022/12/11(日)01:24 AAS
>>19
>>22
何となく引っかかっていたところがちょっとわかりかけました。
lambda式が評価せずそのまま飲み込んで関数として定義されていないことが、
関数名のシンボルを要求する文脈ではエラーになると。
ではつまり関数として定義してしまうしかないということですかね？
25(1): 2022/12/11(日)09:13 AAS
>>23
文脈と書いたのは>>18の#'(の部分が評価されない文脈だから。なぜなら'(で囲まれてる中だからね。
#'(lambda () ...)は(function (lambda () ...)の略記だから(ここが分かってない？) '(の中ではそのまま一つ目の要素がシンボルfunctionで二つ目の要素が(lambda～のリストになってしまう。そしてそれはfuncall出来ない。例:(funcall '(function (lambda () 123)))
解決策は'(を使わずリストを組み立てることで、>>19や>>24が言うように(listやバッククォートでリストを組み立てること。シンボルだけで無く、(functionで囲まれていない)lambda(やそれを評価すると出来るclosure)も問題なく使える。
まあdefunして良いならそれでもOK。
26: 18 2022/12/11(日)13:45 AAS
>>25
中途半端にあれこれ聞いてお手間を取らせました。
まだろくにわかってないんですが、
疑問は疑問としてとりあえずこうすると動きます。
consだといいの？何だか不思議だなあ。
(setq smart-tab-completion-functions-alist
'((emacs-lisp-mode . lisp-complete-symbol)
(lisp-interaction-mode . lisp-complete-symbol)
(cons 'text-mode (lambda () (dabbrev-expand nil)))))
28(1): 18 2022/12/11(日)14:47 AAS
そうみたいですね。評価したら結果が変でした。
デフォルトでdabbrev-expandが呼ばれる仕様なんだった。
29: 18 2022/12/11(日)17:44 AAS
多分、こういうことだろうと思うんですが、
(setq smart-tab-completion-functions-alist
`((emacs-lisp-mode . lisp-complete-symbol)
(lisp-interaction-mode . lisp-complete-symbol)
(text-mode . ,(lambda () (dabbrev-expand nil)))
))
今回の場合は条件がfboundpでチェックされるので同じエラーになりますが、
cond: Wrong type argument: symbolp, (lambda nil (dabbrev-expand nil))
これがなければfuncall以下はちゃんと動きます。
省3
30: 18 2022/12/11(日)17:51 AAS
むしろその場合はこうするだけでいいんですね。
(setq smart-tab-completion-functions-alist
'((emacs-lisp-mode . lisp-complete-symbol)
(lisp-interaction-mode . lisp-complete-symbol)
(text-mode . (lambda () (dabbrev-expand nil)))))
>>19
> うーん多分それ先頭の#'全く場違いなんじゃね？
そもそも最初に指摘されていたこの点がまずかったと。
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.957s*