git.sesse.net Git - vlc/blob - extras/analyser/emacs.init

   1 ;;---------------------------------------------------------------------------
   2 ;;
   3 ;; Emacs-Options for Videolan CodingStyle programming
   4 ;;
   5 ;; paste the following lines in your .emacs file
   6 ;;
   7 ;;---------------------------------------------------------------------------
   8
   9 ;; associate c-mode with file extension '.c' or '.h' in vlc trunk tree
  10 (setq auto-mode-alist
  11       (append
  12        '((".*vlc-trunk.*/.*\\.[ch]$" . c-mode)
  13           ) auto-mode-alist))
  14
  15 ;; define videolan c style settings
  16 (defconst videolan-c-style
  17   '((c-tab-always-indent           . t)
  18     (c-comment-only-line-offset    . 4)
  19     (c-hanging-braces-alist        . ((substatement-open before after)
  20                                       (brace-list-open)))
  21     (c-hanging-colons-alist        . ((member-init-intro before)
  22                                       (inher-intro)
  23                                       (case-label after)
  24                                       (label after)
  25                                       (access-label after)))
  26     (c-cleanup-list                . (scope-operator
  27                                       empty-defun-braces
  28                                       defun-close-semi))
  29
  30     (c-offsets-alist     . ((string . -1000)
  31                             (c . c-lineup-C-comments)
  32                             (defun-open . 0)
  33                             (defun-close . 0)
  34                             (defun-block-intro . +)
  35                             (class-open . 0)
  36                             (class-close . 0)
  37                             (inline-open . 0)
  38                             (inline-close . 0)
  39                             (topmost-intro . 0)
  40                             (topmost-intro-cont . 0)
  41                             (member-init-intro . +)
  42                             (member-init-cont . 0)
  43                             (inher-intro . +)
  44                             (inher-cont . 0)
  45                             (block-open . 0)
  46                             (block-close . 0)
  47                             (brace-list-open . +)
  48                             (brace-list-close . 0)
  49                             (brace-list-intro . +)
  50                             (brace-list-entry . 0)
  51                             (statement . 0)
  52                             (statement-cont . +)
  53                             (statement-block-intro . +)
  54                             (statement-case-intro . +)
  55                             (statement-case-open . +)
  56                             (substatement . +)
  57                             (substatement-open . +)
  58                             (case-label . +)
  59                             (access-label . -)
  60                             (label . -1000)
  61                             (do-while-closure . 0)
  62                             (else-clause . 0)
  63                             (comment-intro . 0)
  64                             (arglist-intro . +)
  65                             (arglist-cont . 0)
  66                             (arglist-cont-nonempty . c-lineup-arglist)
  67                             (arglist-close . 0)
  68                             (stream-op . +)
  69                             (inclass . +)
  70                             (cpp-macro . -1000)
  71                             (friend . 0)
  72                             (objc-method-intro . 0)
  73                             (objc-method-args-cont . 0)
  74                             (objc-method-call-cont . 0)))
  75
  76     (c-basic-offset . 4)
  77     (c-echo-syntactic-information-p . t)
  78     )
  79   "Videolan C Programming Style")
  80
  81 ;; Customizations for c-mode
  82 (defun videolan-mode-hook ()
  83   ;; add the Videolan c style and set it for the current buffer
  84   (local-set-key "\r" 'newline-and-indent)
  85   (c-add-style "vlc" videolan-c-style t)
  86   (c-set-offset 'member-init-intro '++)
  87
  88   ;; other customizations
  89   (setq tab-width 4
  90         ;; this will make sure spaces are used instead of tabs
  91         indent-tabs-mode nil)
  92   ;; we like auto-newline and hungry-delete
  93   (c-toggle-auto-newline-state 1)
  94   (custom-set-variables
  95    '(c-hanging-semi&comma-criteria nil))
  96   )
  97
  98 (add-hook 'c-mode-hook 'videolan-mode-hook)