Gauche 関連情報

h1. 3ページ目の Emacs設定

<pre>

 (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)

</pre>