紹介マニアMoinMoin

.scmで起動します。

標準のままだと利用しずらいし、動作しません。カスタマイズは必須です。

;; パスの設定
(setq scheme-program-name "/usr/local/bin/gosh -i")
;; デフォルトのままだとだめです
(autoload 'run-scheme "cmuscheme" "Run an inferior Scheme process." t)

;; python-modeに似せています。C-c!で画面を分割し、分割画面にschmeインタプリタバッファを表示
;; かなりいいかげん
(defun my-scm-shell ()
  (interactive)
  (let ((win (selected-window))
        (tmpbuf " * temporary *"))
    (pop-to-buffer tmpbuf)
    (run-scheme scheme-program-name)
    (select-window win)
    ))

;; カッコの色の変更。この設定だと薄めの色になります
(defvar paren-face 'paren-face)
(make-face 'paren-face)
(set-face-background 'paren-face "black")
(set-face-foreground 'paren-face "gray50")

;; 定義をhookに設定して有効にします
(add-hook 'scheme-mode-hook
          (function
            (lambda ()
              (define-key scheme-mode-map "\C-c!" 'my-scm-shell)
              (setq scheme-font-lock-keywords-2
                    (append '(("(\\|)" . paren-face))
                            scheme-font-lock-keywords-2))
              )))

(setq cmuscheme-load-hook
      '((lambda () (define-key inferior-scheme-mode-map "\C-c\C-t"
     'favorite-cmd))))

C-x C-eで実行していきます。C-c!した後ならインタプリタのバッファに結果が表示されます。

代替

ほとんどの場合はScheme-modeを変更すればいいだけですが、代替物も作成されています。

Quack

http://www.neilvandyke.org/quack/

参考

http://www.math.s.chiba-u.ac.jp/~matsu/emacs/emacs21/scheme.html

http://www.ksky.ne.jp/~sakae/sicp/gosh-run.html

http://homepage3.nifty.com/oatu/emacs/misc.html

http://openspace.timedia.co.jp/~nyama/wiliki/sicp.cgi?Emacs%A4%C7Scheme&l=jp


CategoryEmacs Scheme gay photos free gay pictures gay porno gay fucking gay hunks free gay movies gay rape gay teens gay bondage gay anal gay bear free gay pics naked gay men gay boys gay men free gay stories gay stories gay naked men gay cock gay naked men gay pics gay gallery stud free gay gay anal gay travel free gay videos gay men having sex stud gay teen twinks free gay free gay clips twinks twinks gay bondage free gay boys gay sex young gay boys gay incest gay black men gay anal gay sex free gay pictures gay pictures gay dick free gay gay males gay underwear pics gay rights gay sex pictures gay porn free gay pic gay blowjobs free gay pics

紹介マニアMoinMoin: scheme-mode (last edited 2010-02-21 00:09:12 by sakito)