とういう感じのを試してみた。 defvar-localとかindent-for-commentとかを見ていて、インデントはして欲しくはないけどコメントの所に移動して欲しいときはあるので、indent-for-commentからパクって適当に付け加えてcommentの開始位置に移動するのを試して…

■具体的に何をするか 2分割したWindowの縦横を切り替える。 (defun window-toggle-division () "ウィンドウ 2 分割時に、縦分割<->横分割" (interactive) (unless (= (count-windows 1) 2) (error "ウィンドウが 2 分割されていません。")) (let ((before-he…

前に書いたのを多少エラーとかとってマシな感じにした。follow-modeらしきもの。また前に書いたのと大差ないようなのがダラダラしそうなので、一応こっちに置いておいた。 こっち→follow-modoki.l■具体的に何をするか Emacsとかにあるfollow-modeらしきもの…

前にもOn Lispの話は少し書いたけど、それのPDFのを見つけたので、最近読んでみたりしている。翻訳してくれた人に感謝したい。しかし、難しい。之はlispを覚えるために読むというよりlispでプログラムできる人が、更にLispの知識を深めるために読むもののよ…

guttyonのメモ帳・日記 scheme-mode - Extlib Wiki最近気づいたんだけど関数型プログラミングって最近の流行なのね。xyzzyを触っておいて、そんな事にすら気づいてないのはアレな感じ。まあ、いつもの事だけど。xyzzyに飽きたら少し調べてみようかと思う。■…

どう違うのかよく分かっていなかったけど、雑記帖のにっき(09-10長年日記) ここを見たら、非常にために成った。■defvar-localの場合 defvar-localの中身 (macroexpand '(defvar-local *c* "xyzzy")) => (progn nil (or (boundp '*c*) (set-default '*c* "xyz…

Common Lisp http://www.h7.dion.ne.jp/~matsu/feature/common-lisp/index.html#feature.common-lisp.details 今日チョット読んだ限りでも結構、色々分かった。というか、今まで知らずに居た方が無謀なのかもしれないけど。今見た限りでもオススメ。sourceが…

以下は変数fooに関数hogeの実体を格納し呼び出している. > (setf foo (symbol-function 'hoge)) #lgt;CLOSURE HOGE (X) (DECLARE (SYSTEM::IN-DEFUN HOGE)) (BLOCK HOGE (+ X 1))> > (funcall foo 1) 2 > (foo 1) *** - EVAL: the function FOO is undefined…

何気なく読んで、今頃気づいたり。数字も返せるんだ。*1何となく気分的に、tかnilだけかと思っていた。あ、そういえばpointとかは数字が帰ってきていたけど、気にしていなかった。一番最後の奴が戻るというのもあまり理解していなかったかも。retrun-from ho…

括弧にカーソルがある場合はC-eとかM-fとかで対応する括弧に飛ぶ戻るのはC-aとかM-bを想定。見つけたそれらしいものをメモ silog - memo/xyzzy/paren http://white.s151.xrea.com/wiki/index.php?memo%2Fxyzzy%2Fparen (defun match-paren (&optional arg) (…

色々読んだ限りの所で面白そうなのを試してみた。 レキシカル変数（ローカル変数みたいなものの様子）をletの外から使う。 (multiple-value-bind (flag-x) (let ((x nil)) (values #'(lambda () (if (eq x nil) (setf x t) (setf x nil))))) (setf (symbol-f…