【GNU】Emacs Lisp 【Elisp】

**デフォルトの名無しさん** · 2013/10/20(日) 07:50:56.93

Emacs Lispのスレです。

- GNU Emacs Lisp Reference Manual
http://www.gnu.org/software/emacs/manual/elisp.html
- An Introduction to Programming in Emacs Lisp
http://www.gnu.org/software/emacs/manual/eintr.html
- Emacs Wiki の "EmacsLisp"
http://www.emacswiki.org/cgi-bin/wiki/EmacsLisp
- GNU Emacs
http://www.gnu.org/software/emacs/emacs.html

**デフォルトの名無しさん** · 2021/10/09(土) 19:32:02.55

Bash on windows(Ubuntu)のemacs

Windows 10に
scoop install emacs
した環境

どっちも環境変数homeを見にいくのでciderがどっちかの環境で動いてくれない

**デフォルトの名無しさん** · 2023/01/30(月) 07:49:47.97

ただ今制限を設けております

**デフォルトの名無しさん** · 2023/09/25(月) 16:47:00.13

こっちを再利用してください

**デフォルトの名無しさん** · 2023/10/13(金) 13:14:55.06

emacs lispでC++のコメントを削除(行コメント//だけを行ごと削除)する方法を教えてください

**デフォルトの名無しさん** · 2023/10/13(金) 14:18:48.79

(defun comment-traversal (beg end func)
(save-excursion
(let (spt ept)
(goto-char beg)
(while (and (< (point) end)
(setq spt (comment-search-forward end t)))
(setq ept (progn
(goto-char spt)
(unless (or (comment-forward)
(eobp))
(error "Can't find the comment end"))
(point)))
(funcall func spt ept)))))

**デフォルトの名無しさん** · 2023/10/13(金) 14:19:30.72

(defun not-comment-traversal (beg end func)
(save-excursion
(let (spt
(ept (1- (goto-char beg))))
(while (and (< (point) end)
(setq spt (comment-search-forward end t)))
(funcall func (1+ ept) spt)
(setq ept (progn
(goto-char spt)
(unless (or (comment-forward)
(eobp))
(error "Can't find the comment end"))
(point))))
(funcall func ept (min end (1- (point-max)))))))

**デフォルトの名無しさん** · 2023/10/13(金) 14:20:49.82

最初のはコメントを抜き出すコード
次のはコメント以外を抜き出すコード
バッファー内のコメントを消していくのは難易度が高い
コメント以外を出力してリダイレクトするのが簡単だろう
↓こんな感じ
(not-comment-traversal (point-min) (point-max)
(lambda (beg end)
(print (buffer-substring beg end))))
ちなみにコメントはEmacsが把握してるので、このコードは言語非依存だ

**デフォルトの名無しさん** · 2023/10/13(金) 14:38:43.09

そういうつまらないものはchatgptに作らせればいい

**デフォルトの名無しさん** · 2023/10/13(金) 16:01:32.18

Emacs Lispのコードなんてまともに学習できないよw

**デフォルトの名無しさん** · 2023/10/13(金) 16:08:10.43

うん、だから、ChatGPTはバカだな
こんなものに時間をそそいでいる人類はバカ

**デフォルトの名無しさん** · 2023/10/13(金) 23:03:38.37

そういうのはキーボードマクロが向いている
//をインクリメントサーチして、c-a,c-k,c-k
で名前を付けて登録
登録したマクロを10000000回ぐらい実行すればいい

**デフォルトの名無しさん** · 2023/10/14(土) 12:49:27.28

>>278
ほんそれ

**デフォルトの名無しさん** · 2023/10/15(日) 11:32:10.04

ファイルの先頭に移動して
M-x flush-lines
を起動して
^//
を打ち込んだら消せました

**デフォルトの名無しさん** · 2023/10/15(日) 15:15:27.51

hoge(); // コメント
とか
/*
コメント
*/
は消せないじゃん

**デフォルトの名無しさん** · 2023/11/11(土) 20:06:28.30

だからキーボードマクロを使えって

/*をインクリメントサーチ二文字戻って
マーク、*/をインクリメントサーチで探して
kill-region

これをキーボードマクロにして
何なら名前を付けて init.el に登録することもできる

**デフォルトの名無しさん** · 2023/11/11(土) 20:13:40.67

具体的には

c-x(
esc<
c-s/*
c-@
c-s*/
c-w
c-x)

これでマクロ完成。名前を付けるには

M-x name-last-kbd-macro

で好きな名前を付けるだけ

init.el を開いて

M-x insert-kbd-macro

これで登録できる

**デフォルトの名無しさん** · 2023/11/12(日) 01:44:20.85

>>283
/* */と//の両方消せないじゃん

**デフォルトの名無しさん** · 2023/11/12(日) 16:34:00.64

別々に作って二回走査すればいいだけでは?

**デフォルトの名無しさん** · 2023/11/12(日) 19:43:42.90

/* // */
は、先に // で消してしまうとおかしな事になるな
まぁ、先に/* */を消せばいいがな
それと、>>284のマクロはコメント1個しか消せないじゃん
全部消さないと
取り敢えずこれらを全部対応させたキーボードマクロを出さないと駄目

**デフォルトの名無しさん** · 2023/11/13(月) 23:08:48.29

/* */を排除するマクロを100000回ぐらいやって
次に // を排除するマクロを1000000回ぐらい動かす
気持ち悪いかもしれないが目的は達せられる

**デフォルトの名無しさん** · 2023/11/18(土) 15:57:54.85

インクリメントサーチが失敗するまで
無限ループで回すことはできるけどね

**デフォルトの名無しさん** · 2024/10/02(水) 10:15:18.16

Blenderのpython→bpy
EmacsのLisp→elisp
ExcelのVB→VBAω

**デフォルトの名無しさん** · 2024/10/20(日) 10:23:23.92

むしろemacs以外の現役lispを知らん

**デフォルトの名無しさん** · 2024/10/30(水) 03:02:36.94

>>291
cl書いて食ってるんで異議を申し立てたいのは山々だが…まあうん落ち目すぎるね

rmsに信心示すんならならguileすげーぞ
もちelispもサポートしてる
lispyな言語（scheme, elisp, es）である限り、その全てを（適当な変換の後）共通IL通して共通エンジンで動かせる

gccもIL通してサポート多いじゃん！と思うかもしれんが、あれ全ての言語サポートする勢いで風呂敷拡げすぎてっるし、そもそもエンジンがlispyでないのでlisp系の性能は、まあ察してくれ

**デフォルトの名無しさん** · 2024/10/30(水) 03:25:59.58

そういや5年かそこら前にemacsのelisp処理系を既存のからguile（のelisp）に置き換えるってのやってた記憶あるけど結局ポシャったんかね？
一応おおむね成功はしたとか

まあemacsのelisp処理系も最近コンパイル出来るようになって性能上がったし、置き換える利点も減ったのかな？

とすればgnuで2つelisp処理系作ってる現状の不利は労力の無駄ってくらいか

**デフォルトの名無しさん** · 2025/02/02(日) 07:37:39.53

native-compile有効化してもバイトコンパイルの数倍しか速くならないし、Common Lispの10倍くらい遅いんだよな
最近だとCommon Lispで1から作られたLemというエディタがある

**デフォルトの名無しさん** · 2025/02/02(日) 15:53:20.81

動的型はネイティブコンパイルしても2倍速になるかどうかだな
型推論を実装してからが本番だ

**デフォルトの名無しさん** · 2025/10/12(日) 06:12:52.53

>>294
clは色々実装次第だけどsbclとか速いヤツは、恐ろしいことに稀によくcより速かったりするからな…
もちろん関数、あるいはグローバル(非推奨！)に
(declare (optimize (speed 3) (space 0) (safety 0)))
とか最適化宣言してるときね

そうそしてもちろん型宣言も同じくらい大事ね>>295、clなら(type fixnum numarg1)とかか

elにもcl-libにこの辺cl-declareとかの名で全部あるけど、ちょっとベンチはしてない
まあ果たして現在のelの仕組み的に恩恵あるかは微妙に思います、はい

**デフォルトの名無しさん** · 2025/10/12(日) 06:15:18.22

ああごめん型推論、すなわちよしなに(type fixnum numarg1)とか宣言補ってくれるということね
もちろんそれはあって欲しいね、コードは今まで通り書いていいしユーザーに負担が無いのだから

**デフォルトの名無しさん** · 2025/10/13(月) 07:56:47.78

>>294
へぇー最近もあるのか…

CLの歴史あるエディタの代表といえば1980-のHemlockだね
emacs-likeというかほぼほぼemacsのCL版だけど、なんなら今のスレ民が大体使ってるであろう1984-のGNU emacsより歴史がある
主にCMU CLの配布に同梱されててなかなかいいemacs

**デフォルトの名無しさん** · 2025/10/13(月) 08:05:49.85

ああごめんここemacsスレじゃなくてelispスレだからスレチだったわ

**デフォルトの名無しさん** · 2025/10/16(木) 01:18:12.54

>>296
elispではいまのところ（ほぼ）無意味っぽいね

Most of the Common Lisp declarations are not currently useful in Emacs Lisp. For example, the byte-code system provides little opportunity to benefit from type information. A few declarations are meaningful when byte compiler optimizations are enabled, as they are by default. Otherwise these declarations will effectively be ignored.

https://www.gnu.org/software/emacs/manual/html_node/cl/Declarations.html

まあ型宣言のご利益はなくても、（読みにくくならぬ程度の）適切な型宣言は読み手へのアノテーションにもなるから推奨したい

**デフォルトの名無しさん** · 2025/10/17(金) 01:25:53.83

>>298
HemlockはGNU Emacs/Xemacsより（それまでの）emacsに近いんだよな

多分まだ一番古い資料が残ってるlisp系Emacsはelispの直接祖先であるMacLisp(1966)のエディタだろう
コンピュータ史系のサイト読めるMacLispのマニュアル類にはエディタのキーバインドまで記されている
当然ながらemacs風キーバインドで、この頃には今に繋がるlisp系emacs(非TECO系)確立されてた