(add-hook 'after-save-hook 'byte-compile-user-init-file t t)))
(add-hook 'emacs-lisp-mode-hook 'my-emacs-lisp-mode-hook)
+;; To highlight function calls in CC mode.
+(defface font-lock-function-call-face
+ '((t (:foreground "mediumpurple")))
+ "Font Lock mode face used to highlight function calls."
+ :group 'font-lock-highlighting-faces)
+(defvar font-lock-function-call-face 'font-lock-function-call-face)
+(add-hook 'c-mode-hook
+ (lambda ()
+ (font-lock-add-keywords
+ nil
+ '(("\\<\\(\\sw+\\) ?(" 1 font-lock-function-call-face)) t)))
+
+;; Pour colorer TRUE et FALSE
+(defconst bm-additional-constant-keywords
+ (cons
+ (regexp-opt
+ (list
+ "TRUE" "FALSE"
+ ) 'words)
+ font-lock-constant-face
+ ))
+(font-lock-add-keywords
+ 'c-mode
+ (list
+ bm-additional-constant-keywords
+ ))
+
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.