[Comp] Gauche と Emacs

LispImplForSICPを参考にして、
.emacs.elに設定。

(setq scheme-program-name "gosh")

(require 'cmuscheme)

(defun scheme-other-window ()

    "Run scheme on other window"

      (interactive)

        (switch-to-buffer-other-window

             (get-buffer-create "*scheme*"))

          (run-scheme scheme-program-name))

(defun gauche-info ()

    (interactive)

      (switch-to-buffer-other-frame

           (get-buffer-create "*info*"))

        (info

             "/usr/local/info/gauche-refj.info.gz"))

(define-key global-map

              "\C-cS" 'scheme-other-window)

(define-key global-map

              "\C-cI" 'gauche-info)

Haskellとは直接関係ないのですが、
SICPも読もうかなと思っているので。