491 |
|
|
492 |
;; Install the functions that ensure that various internal caches |
;; Install the functions that ensure that various internal caches |
493 |
;; don't become invalid due to buffer changes. |
;; don't become invalid due to buffer changes. |
|
(make-local-hook 'after-change-functions) |
|
494 |
(add-hook 'after-change-functions 'c-after-change nil t)) |
(add-hook 'after-change-functions 'c-after-change nil t)) |
495 |
|
|
496 |
(defun c-after-font-lock-init () |
(defun c-after-font-lock-init () |
516 |
c-beginning-of-syntax |
c-beginning-of-syntax |
517 |
(font-lock-mark-block-function |
(font-lock-mark-block-function |
518 |
. c-mark-function))) |
. c-mark-function))) |
|
|
|
|
(make-local-hook 'font-lock-mode-hook) |
|
519 |
(add-hook 'font-lock-mode-hook 'c-after-font-lock-init nil t)) |
(add-hook 'font-lock-mode-hook 'c-after-font-lock-init nil t)) |
520 |
|
|
521 |
(defun c-setup-doc-comment-style () |
(defun c-setup-doc-comment-style () |
666 |
(c-common-init 'c-mode) |
(c-common-init 'c-mode) |
667 |
(easy-menu-add c-c-menu) |
(easy-menu-add c-c-menu) |
668 |
(cc-imenu-init cc-imenu-c-generic-expression) |
(cc-imenu-init cc-imenu-c-generic-expression) |
669 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'c-mode-hook) |
|
(run-hooks 'c-mode-hook) |
|
670 |
(c-update-modeline)) |
(c-update-modeline)) |
671 |
|
|
672 |
|
|
729 |
(c-common-init 'c++-mode) |
(c-common-init 'c++-mode) |
730 |
(easy-menu-add c-c++-menu) |
(easy-menu-add c-c++-menu) |
731 |
(cc-imenu-init cc-imenu-c++-generic-expression) |
(cc-imenu-init cc-imenu-c++-generic-expression) |
732 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'c++-mode-hook) |
|
(run-hooks 'c++-mode-hook) |
|
733 |
(c-update-modeline)) |
(c-update-modeline)) |
734 |
|
|
735 |
|
|
793 |
(c-common-init 'objc-mode) |
(c-common-init 'objc-mode) |
794 |
(easy-menu-add c-objc-menu) |
(easy-menu-add c-objc-menu) |
795 |
(cc-imenu-init nil 'cc-imenu-objc-function) |
(cc-imenu-init nil 'cc-imenu-objc-function) |
796 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'objc-mode-hook) |
|
(run-hooks 'objc-mode-hook) |
|
797 |
(c-update-modeline)) |
(c-update-modeline)) |
798 |
|
|
799 |
|
|
863 |
(c-common-init 'java-mode) |
(c-common-init 'java-mode) |
864 |
(easy-menu-add c-java-menu) |
(easy-menu-add c-java-menu) |
865 |
(cc-imenu-init cc-imenu-java-generic-expression) |
(cc-imenu-init cc-imenu-java-generic-expression) |
866 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'java-mode-hook) |
|
(run-hooks 'java-mode-hook) |
|
867 |
(c-update-modeline)) |
(c-update-modeline)) |
868 |
|
|
869 |
|
|
921 |
(c-common-init 'idl-mode) |
(c-common-init 'idl-mode) |
922 |
(easy-menu-add c-idl-menu) |
(easy-menu-add c-idl-menu) |
923 |
;;(cc-imenu-init cc-imenu-idl-generic-expression) ;TODO |
;;(cc-imenu-init cc-imenu-idl-generic-expression) ;TODO |
924 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'idl-mode-hook) |
|
(run-hooks 'idl-mode-hook) |
|
925 |
(c-update-modeline)) |
(c-update-modeline)) |
926 |
|
|
927 |
|
|
983 |
(c-common-init 'pike-mode) |
(c-common-init 'pike-mode) |
984 |
(easy-menu-add c-pike-menu) |
(easy-menu-add c-pike-menu) |
985 |
;;(cc-imenu-init cc-imenu-pike-generic-expression) ;TODO |
;;(cc-imenu-init cc-imenu-pike-generic-expression) ;TODO |
986 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'pike-mode-hook) |
|
(run-hooks 'pike-mode-hook) |
|
987 |
(c-update-modeline)) |
(c-update-modeline)) |
988 |
|
|
989 |
|
|
1075 |
;; in cc-engine.el, just before (defun c-fast-in-literal ... |
;; in cc-engine.el, just before (defun c-fast-in-literal ... |
1076 |
(defalias 'c-in-literal 'c-slow-in-literal) |
(defalias 'c-in-literal 'c-slow-in-literal) |
1077 |
|
|
1078 |
(run-hooks 'c-mode-common-hook) |
(run-mode-hooks 'c-mode-common-hook 'awk-mode-hook) |
|
(run-hooks 'awk-mode-hook) |
|
1079 |
(c-update-modeline)) |
(c-update-modeline)) |
1080 |
) ;; closes the (if (not (memq 'syntax-properties c-emacs-features)) |
) ;; closes the (if (not (memq 'syntax-properties c-emacs-features)) |
1081 |
|
|