私的良スレ書庫

不明な単語は2ch用語を / 要望・削除依頼は掲示板へ。不適切な画像報告もこちらへどうぞ。 / 管理情報はtwitterで
ログインするとレス評価できます。登録ユーザには一部の画像が表示されますので、問題のある画像や記述を含むレスに「禁」ボタンを押してください。

【叩かれて】Emacs Lisp道場【強くなれ】

emacs スレッド一覧へ / emacs とは? / 携帯版 / dat(gz)で取得 / トップメニュー

みんなの評価 : ○
レスフィルター : (試験中)

前へ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 次へ

/ 要望・削除依頼は掲示板へ / 管理情報はtwitterで

851 : 名無しさん＠お腹 - 2007/01/17(水) 23:10:28 (+57,+24,-21)

emacsで文字のフォントの大きさを変えるにはどうしたらよいですか?

852 : 名無しさん＠お腹 - 2007/01/17(水) 23:41:26 (-1,-29,-17)

もしemacs lispがstatic scopeだったら果たしてどうだったろうか

853 : 名無しさん＠お腹 - 2007/01/21(日) 00:40:22 (+7,-22,+2)

>>851
fontset

854 : 名無しさん＠お腹 - 2007/03/28(水) 18:57:13 (+0,-29,+0)

(ﾟДﾟ≡ﾟдﾟ)

855 : 名無しさん＠お腹 - 2007/03/29(木) 01:39:37 (+2,-30,-121)

>>854
うちの .Xdefault には, 未だに
> Emacs.Font: fontset-12 bold
> Emacs.Fontset-0: -shinonome-gothic-bold-r-*-*-12-*-*-*-*-*-fontset-12 bold
> Emacs.Fontset-2: -shinonome-gothic-bold-r-*-*-14-*-*-*-*-*-fontset-14 bold
...
> Emacs.Fontset-11: -shinonome-gothic-medium-r-*-*-24-*-*-*-*-*-fontset-24 medium
てなものが残ってて機能しているが...

856 : 名無しさん＠お腹 - 2007/04/12(木) 10:48:03 (+31,-29,-6)

emacs ilspでwebプログラミング可能？

857 : 名無しさん＠お腹 - 2007/04/12(木) 11:29:20 (+62,+29,-8)

>>856
「webプログラミング」っていうとどの辺の話?

858 : 名無しさん＠お腹 - 2007/04/12(木) 11:45:50 (-1,-29,-1)

http://www1.odn.ne.jp/ymtz/tips.html#wwwsvr

こういうことだったりして

859 : 名無しさん＠お腹 - 2007/04/12(木) 11:57:35 (+34,-29,-24)

AllegroServe とかそういう話かなぁ。
elisp じゃないけど。

860 : 名無しさん＠お腹 - 2007/04/12(木) 13:32:42 (+57,+29,-14)

elservなんてのがあったなー。
もっとまともなのも多分あるだろうけど興味無いので知らない。

861 : 名無しさん＠お腹 - 2007/04/12(木) 15:16:27 (+122,-7,-42)

emacsがwebサーバーになるのですね。もはやなんでもありですね。
elispはphpで作成するのと同様のwebプログラミングは可能でしょうか？
掲示板とか、アンケートなど。

862 : 名無しさん＠お腹 - 2007/04/12(木) 15:18:15 (+65,+29,-13)

>>861
アクセスのたびに Emacs 呼ぶってこと?
まぁ不可能じゃないんじゃね。
やる気は起きないけど。

>>859 じゃだめなん?

863 : 名無しさん＠お腹 - 2007/04/13(金) 04:31:21 (+69,+29,-23)

単純にphpスクリプトを書けるか？と聞けば
遊ばれずに済んだであろう>>861

864 : 名無しさん＠お腹 - 2007/04/13(金) 09:45:15 (+52,+29,-12)

そういう質問じゃないっしょ。

865 : 名無しさん＠お腹 - 2007/04/13(金) 15:06:43 (+74,+29,-3)

>>861
もちろん同様のことは可能。もちろん同様にはできないけどな。

866 : 名無しさん＠お腹 - 2007/05/13(日) 16:17:55 (+7,-28,-26)

定期的に M-x hoge を実行するにはどうしたら良いのですか？
答えが駄目なら、誰かヒントだけでも教えてくれないでしょうか。

867 : 名無しさん＠お腹 - 2007/05/13(日) 17:55:49 (-10,-28,+0)

timer

868 : 名無しさん＠お腹 - 2007/05/15(火) 01:21:02 (+56,-30,-36)

23
という数値を16進数数値として扱い、
"35"にする方法はどんなのがあるでしょうか？

(let ((n 23))
(format "%d" (string-to-number (number-to-string n) 16)))

これは思いつきましたが、もちょっと簡単にならんかな、と。

869 : 名無しさん＠お腹 - 2007/05/15(火) 06:39:30 (+52,+29,-1)

じゅうぶんかんたんだとおもう

870 : 名無しさん＠お腹 - 2007/05/15(火) 10:48:34 (-2,-29,+0)

>>868
#x23

871 : 名無しさん＠お腹 - 2007/05/15(火) 11:08:26 (+40,+8,-8)

>>868
なんで元が数値なんだろ。
3a とかの入力は考えなくていいの？

872 : 名無しさん＠お腹 - 2007/05/15(火) 20:18:46 (-2,-29,-17)

>>870
(read (concat "#x" n))
か。なんかびみょーに感じる。この表記がいけるのってemacs21以降あたり?

873 : 名無しさん＠お腹 - 2007/05/16(水) 00:01:09 (-5,-28,-17)

数値を concat できたのか…

874 : 名無しさん＠お腹 - 2007/05/16(水) 00:22:21 (+46,+18,+0)

ごめん。emacs21からはムリなはず。

875 : 866 - 2007/05/20(日) 00:46:22 (+3,-30,-109)

駄目だ分からない。
run-at-time 使おうにも hoge をどう指定したら良いのか不明……lisp は難しい orz
例えば、.emacs にどう書けば、自動で M-x hoge できますか？ ; emacs の引数から起動するのではなくて。
あとは、start-process と while と sleep-for 辺りを組み合わせれば可能な気はするんだけど……さっぱり orz
週末に数時間しか PC に触れられないのは、現代社会をは思えない環境 orz

876 : 名無しさん＠お腹 - 2007/05/20(日) 00:52:00 (-1,-29,-20)

run-with-timer 使うんじゃないの？
何がわからないのかがよくわからない

877 : 名無しさん＠お腹 - 2007/05/20(日) 00:53:00 (+0,-27,-7)

もしかして M-x から指定してるものが関数名だってことを知らないとか？

878 : 名無しさん＠お腹 - 2007/05/20(日) 03:58:00 (+3,-30,-125)

(setq hoge-timer (run-with-timer 0 1 'hoge))
(defun hoge ()
(interactive)
(message (current-time-string)))
(defun hoge-cancel ()
(interactive)
(cancel-timer hoge-timer))

M-x hoge
=>Sun May 20 03:56:18 2007

879 : lispp? - 2007/05/20(日) 14:40:44 (+38,-30,-63)

LISPを学習して１週間目の者ですが、

(progn
(setq wara 10)
(setq waru 0)
(/ wara waru)
)
でエラーが発生します。

(if (equal waru 0)...)でなくて、catch??? throw???のような例外処理で対応したいのですが、
可能でしょうか？

880 : 名無しさん＠お腹 - 2007/05/20(日) 14:50:53 (+52,+30,+0)

>>879
http://shakosv.sk.tsukuba.ac.jp/ShakoDoc/Editors/NEmacs/elisp-jman/html/eljman_104.html

881 : 名無しさん＠お腹 - 2007/05/20(日) 17:00:06 (+8,-30,-54)

>>879
condition-case

elisp.infoのControl Structuresを参照。
Lispではcatch/throwの例外処理とsignal/condition-caseのエラー処理は別物
である点に留意されたし。

882 : 名無しさん＠お腹 - 2007/05/20(日) 17:12:06 (-1,-29,-8)

xyzzy使っているのですが、 condition-caseで関数がないと表示されます。

883 : 名無しさん＠お腹 - 2007/05/20(日) 17:17:31 (+14,-3,+0)

板違い

884 : 名無しさん＠お腹 - 2007/05/28(月) 20:48:43 (+35,-30,-32)

EmacsでのLispのプログラムについての質問です。
リストAとして((a b c) (d e f) (g h i))というリストがあるとして、このリストの中の要素であるリストの
最後の要素を返す関数を作る場合どうしたらいいでしょうか？

885 : 名無しさん＠お腹 - 2007/05/28(月) 21:33:40 (+50,+18,-10)

>>884
各要素の cdr を見ていって、それが nil なものを返せばいいんじゃないの。
そういう話でない?

886 : 名無しさん＠お腹 - 2007/05/28(月) 21:37:09 (+2,-30,-16)

>>884
(car (last (car (last '((a b c) (d e f) (g h i))))))

887 : 名無しさん＠お腹 - 2007/05/28(月) 21:47:12 (+2,-29,-31)

884の補足ですが、
リストAを引数として（c f i)を返すような関数を定義したいのです。
また、リストAの要素がもっと多い場合にも対応できるようにしたいのです。

888 : 名無しさん＠お腹 - 2007/05/28(月) 21:52:54 (+32,-30,-23)

>>887
(mapcar (lambda (x) (car (last x))) A)

889 : 名無しさん＠お腹 - 2007/05/28(月) 22:00:23 (+62,+29,-5)

>>888
見たことないコマンドが多いのですが・・・。
初心者なのでもう少し分かりやすくしていただけるとありがたいのですが。

890 : 名無しさん＠お腹 - 2007/05/28(月) 22:16:26 (+51,+28,-19)

標準の関数くらい自分でしらべろよ。

891 : 名無しさん＠お腹 - 2007/05/28(月) 22:17:51 (+90,+29,-15)

そういった関数を使わないで定義したいんです。

892 : 名無しさん＠お腹 - 2007/05/28(月) 23:42:03 (-2,-30,-20)

lambda とか mapcar 使わないで lisp のプログラム書くのは
逆に難しいと思うぞ。

893 : 名無しさん＠お腹 - 2007/05/29(火) 00:06:38 (+82,+29,-1)

それは無理な話だ

894 : 名無しさん＠お腹 - 2007/05/29(火) 00:08:04 (+62,+26,-1)

ごめん
>>893は>>891へね

895 : 名無しさん＠お腹 - 2007/05/29(火) 00:11:56 (+31,-30,-179)

おk。mapcar も lambda も car も廃止してやったぞ。last は使わせてくれて…

(require 'cl)
(defun fun-887 (lst)
(loop for element in lst
collect (first (last element))))

last も禁止ならこうだ。

(require 'cl)
(defun fun-887 (lst)
(loop for element in lst
collect (first (reverse element))))

896 : 名無しさん＠お腹 - 2007/05/29(火) 00:16:23 (+56,+14,-37)

>>895ありがとうございました
もう一つ聞きたいのは、数nとリストを引数として取り、
リストのn番目の要素を返す関数を定義したいのですが、
この関数を再帰を使って定義するにはどうしたらいいでしょう

897 : 名無しさん＠お腹 - 2007/05/29(火) 00:24:12 (-2,-30,-27)

(defun list-ref (lis n)
(if (zerop n)
(car lis)
(list-ref (cdr lis) (- n 1))))

898 : 名無しさん＠お腹 - 2007/05/29(火) 00:43:50 (+111,+22,-1)

んー？
http://questionbox.msn.co.jp/qa3033199.html

899 : 名無しさん＠お腹 - 2007/05/29(火) 00:46:01 (+57,+29,-4)

最近なんでもかんでも聞く人多くない？

900 : 名無しさん＠お腹 - 2007/05/29(火) 01:19:24 (-1,-29,-7)

mapcar を独自に定義しようとするとどう書ける？