Mercurial > hg > xemacs-beta

comparison lisp/cc-mode/cc-styles.el @ 181:bfd6434d15b3 r20-3b17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b17
author cvs
date Mon, 13 Aug 2007 09:53:19 +0200
parents 6075d714658b
children e121b013d1f0
comparison
equal deleted inserted replaced
180:add28d59e586 181:bfd6434d15b3
5 ;; Authors: 1992-1997 Barry A. Warsaw 5 ;; Authors: 1992-1997 Barry A. Warsaw
6 ;; 1987 Dave Detlefs and Stewart Clamen 6 ;; 1987 Dave Detlefs and Stewart Clamen
7 ;; 1985 Richard M. Stallman 7 ;; 1985 Richard M. Stallman
8 ;; Maintainer: cc-mode-help@python.org 8 ;; Maintainer: cc-mode-help@python.org
9 ;; Created: 22-Apr-1997 (split from cc-mode.el) 9 ;; Created: 22-Apr-1997 (split from cc-mode.el)
10 ;; Version: 5.14 10 ;; Version: 5.15
11 ;; Keywords: c languages oop 11 ;; Keywords: c languages oop
12 12
13 ;; This file is part of GNU Emacs. 13 ;; This file is part of GNU Emacs.
14 14
15 ;; GNU Emacs is free software; you can redistribute it and/or modify 15 ;; GNU Emacs is free software; you can redistribute it and/or modify
328 (objc-method-args-cont . c-lineup-ObjC-method-args) 328 (objc-method-args-cont . c-lineup-ObjC-method-args)
329 (objc-method-call-cont . c-lineup-ObjC-method-call) 329 (objc-method-call-cont . c-lineup-ObjC-method-call)
330 (extern-lang-open . 0) 330 (extern-lang-open . 0)
331 (extern-lang-close . 0) 331 (extern-lang-close . 0)
332 (inextern-lang . +) 332 (inextern-lang . +)
333 (template-args-cont . +)
333 ) 334 )
334 "Association list of syntactic element symbols and indentation offsets. 335 "Association list of syntactic element symbols and indentation offsets.
335 As described below, each cons cell in this list has the form: 336 As described below, each cons cell in this list has the form:
336 337
337 (SYNTACTIC-SYMBOL . OFFSET) 338 (SYNTACTIC-SYMBOL . OFFSET)
426 objc-method-args-cont -- lines continuing an Objective-C method definition 427 objc-method-args-cont -- lines continuing an Objective-C method definition
427 objc-method-call-cont -- lines continuing an Objective-C method call 428 objc-method-call-cont -- lines continuing an Objective-C method call
428 extern-lang-open -- brace that opens an external language block 429 extern-lang-open -- brace that opens an external language block
429 extern-lang-close -- brace that closes an external language block 430 extern-lang-close -- brace that closes an external language block
430 inextern-lang -- analogous to `inclass' syntactic symbol 431 inextern-lang -- analogous to `inclass' syntactic symbol
432 template-args-cont -- C++ template argument list continuations
431 ") 433 ")
432 434
433 (defun c-get-offset (langelem) 435 (defun c-get-offset (langelem)
434 ;; Get offset from LANGELEM which is a cons cell of the form: 436 ;; Get offset from LANGELEM which is a cons cell of the form:
435 ;; (SYMBOL . RELPOS). The symbol is matched against 437 ;; (SYMBOL . RELPOS). The symbol is matched against
503 (t (ding) 505 (t (ding)
504 (setq prompt errmsg) 506 (setq prompt errmsg)
505 nil)))) 507 nil))))
506 offset)) 508 offset))
507 509
510 ;;;###autoload
508 (defun c-set-offset (symbol offset &optional add-p) 511 (defun c-set-offset (symbol offset &optional add-p)
509 "Change the value of a syntactic element symbol in `c-offsets-alist'. 512 "Change the value of a syntactic element symbol in `c-offsets-alist'.
510 SYMBOL is the syntactic element symbol to change and OFFSET is the new 513 SYMBOL is the syntactic element symbol to change and OFFSET is the new
511 offset for that syntactic element. Optional ADD says to add SYMBOL to 514 offset for that syntactic element. Optional ADD says to add SYMBOL to
512 `c-offsets-alist' if it doesn't already appear there." 515 `c-offsets-alist' if it doesn't already appear there."