(setq auto-mode-alist
(append '(("\\.h$" . c++-mode))
auto-mode-alist))
(add-hook 'c++-mode-hook
'(lambda ()
(c-set-style "gnu")
(c-set-offset 'innamespace 0)))
ちなみにGNUスタイルは個人的には好きなのでそのまま。ブロックインデント時にカーリーブラケットの有無でインデントが変わるのは視認性が高まって良い。
Think about science.
(setq auto-mode-alist
(append '(("\\.h$" . c++-mode))
auto-mode-alist))
(add-hook 'c++-mode-hook
'(lambda ()
(c-set-style "gnu")
(c-set-offset 'innamespace 0)))
(keyboard-translate ?\C-m ?\C-j)
(keyboard-translate ?\C-j ?\C-m)
(keyboard-translate ?\C-h ?\C-?)
(keyboard-translate ?\C-? ?\C-h)
;; Fundamentals
(global-font-lock-mode t)
(show-paren-mode t)
(setq transient-mark-mode t)
;; SKK
(autoload 'skk-mode "skk" nil t)
(global-set-key "\C-x\C-j" 'skk-mode)
(global-set-key "\C-xj" 'skk-auto-fill-mode)
(global-set-key "\C-xt" 'skk-tutorial)
(add-hook 'isearch-mode-hook
(function (lambda ()
(and (boundp 'skk-mode) skk-mode
(skk-isearch-mode-setup)))))
(add-hook 'isearch-mode-end-hook
(function (lambda ()
(and (boundp 'skk-mode) skk-mode
(skk-isearch-mode-cleanup)
(skk-set-cursor-color-properly)))))
(setq skk-large-jisyo "C:/Meadow/packages/etc/skk/SKK-JISYO.L")
(setq skk-tut-file "C:/Meadow/packages/etc/skk/SKK.tut")
;; SWI-Prolog - http://www.swi-prolog.org/ -
(setq auto-mode-alist
(append '(("\\.pl" . prolog-mode))
auto-mode-alist))
(setq prolog-program-name "C:/Program Files/pl/bin/plcon")
(setq prolog-consult-string "[user].\n")
;; CLISP - http://clisp.cons.org/ -
(setq inferior-lisp-program "C:/clisp/clisp")
;; SLIME - http://common-lisp.net/project/slime/ -
(add-to-list 'load-path "C:/Meadow/slime-2.0/")
(require 'slime)
(slime-setup)
(setq slime-net-coding-system 'euc-jp-unix)
(setq common-lisp-hyperspec-root "c:/clisp/doc/HyperSpec/")
(add-hook 'inferior-lisp-mode
(lambda () (inferior-slime-mode t)))
(add-hook 'lisp-mode-hook
(lambda ()
(slime-mode t)
(show-paren-mode)))
(slime-autodoc-mode)