Gauche 関連情報

h1. 3ページ目の Emacs設定

(setq process-coding-system-alist
(cons '("gosh" utf-8 . utf-8) process-coding-system-alist))
;; goshインタプリタのパスに合わせます。
(setq scheme-program-name "C:/cygwin/usr/local/bin/gosh.exe -i")
(autoload 'scheme-mode "cmuscheme" "Major mode for Scheme." t)
(autoload 'run-scheme "cmuscheme" "Run an inferior Scheme process." t)
;; ウィンドウを2つに分け、一方でgoshインタプリタを実行するコマンドを定義します。
(defun scheme-other-window ()
"Run scheme on other window"
(interactive)
(switch-to-buffer-other-window
(get-buffer-create "scheme"))
(run-scheme scheme-program-name))
;; そのコマンドをCtrl-cSで呼び出します。
(define-key global-map
"\C-cS" 'scheme-other-window)
;; 直前/直後の括弧に対応する括弧を光らせます。
(show-paren-mode)