annotate lisp/progmodes/cc-mode.el @ 107168:282ddc0ca465

* simple.el (save-interprogram-paste-before-kill): Doc fix.
author Chong Yidong <cyd@stupidchicken.com>
date Tue, 16 Feb 2010 09:40:45 -0500
parents 17f07853dd4d
children a83491958b95
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1 ;;; cc-mode.el --- major mode for editing C and similar languages
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2
74372
cf3e4c6cd4c3 Fix Copyright format.
Glenn Morris <rgm@gnu.org>
parents: 72031
diff changeset
3 ;; Copyright (C) 1985, 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
106815
1d1d5d9bd884 Add 2010 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 106522
diff changeset
4 ;; 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
75347
e3694f1cb928 Add 2007 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 75027
diff changeset
5 ;; Free Software Foundation, Inc.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
7 ;; Authors: 2003- Alan Mackenzie
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
8 ;; 1998- Martin Stjernholm
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
9 ;; 1992-1999 Barry A. Warsaw
101112
0685234e527d Comment (minor header format fixes).
Glenn Morris <rgm@gnu.org>
parents: 100908
diff changeset
10 ;; 1987 Dave Detlefs
0685234e527d Comment (minor header format fixes).
Glenn Morris <rgm@gnu.org>
parents: 100908
diff changeset
11 ;; 1987 Stewart Clamen
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
12 ;; 1985 Richard M. Stallman
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
13 ;; Maintainer: bug-cc-mode@gnu.org
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
14 ;; Created: a long, long, time ago. adapted from the original c-mode.el
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
15 ;; Keywords: c languages oop
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
16
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
17 ;; This file is part of GNU Emacs.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
18
94673
52b7a8c22af5 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94293
diff changeset
19 ;; GNU Emacs is free software: you can redistribute it and/or modify
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
20 ;; it under the terms of the GNU General Public License as published by
94673
52b7a8c22af5 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94293
diff changeset
21 ;; the Free Software Foundation, either version 3 of the License, or
52b7a8c22af5 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94293
diff changeset
22 ;; (at your option) any later version.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
23
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
24 ;; GNU Emacs is distributed in the hope that it will be useful,
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
25 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
26 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
27 ;; GNU General Public License for more details.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
28
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
29 ;; You should have received a copy of the GNU General Public License
94673
52b7a8c22af5 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94293
diff changeset
30 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
31
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
32 ;;; Commentary:
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
33
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
34 ;; NOTE: Read the commentary below for the right way to submit bug reports!
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
35 ;; NOTE: See the accompanying texinfo manual for details on using this mode!
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
36 ;; Note: The version string is in cc-defs.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
37
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
38 ;; This package provides GNU Emacs major modes for editing C, C++,
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
39 ;; Objective-C, Java, CORBA's IDL, Pike and AWK code. As of the
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
40 ;; latest Emacs and XEmacs releases, it is the default package for
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
41 ;; editing these languages. This package is called "CC Mode", and
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
42 ;; should be spelled exactly this way.
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
43
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
44 ;; CC Mode supports K&R and ANSI C, ANSI C++, Objective-C, Java,
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
45 ;; CORBA's IDL, Pike and AWK with a consistent indentation model
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
46 ;; across all modes. This indentation model is intuitive and very
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
47 ;; flexible, so that almost any desired style of indentation can be
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
48 ;; supported. Installation, usage, and programming details are
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
49 ;; contained in an accompanying texinfo manual.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
50
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
51 ;; CC Mode's immediate ancestors were, c++-mode.el, cplus-md.el, and
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
52 ;; cplus-md1.el..
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
53
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
54 ;; To submit bug reports, type "C-c C-b". These will be sent to
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
55 ;; bug-gnu-emacs@gnu.org (mirrored as the Usenet newsgroup
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
56 ;; gnu.emacs.bug) as well as bug-cc-mode@gnu.org, which directly
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
57 ;; contacts the CC Mode maintainers. Questions can sent to
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
58 ;; help-gnu-emacs@gnu.org (mirrored as gnu.emacs.help) and/or
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
59 ;; bug-cc-mode@gnu.org. Please do not send bugs or questions to our
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
60 ;; personal accounts; we reserve the right to ignore such email!
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
61
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
62 ;; Many, many thanks go out to all the folks on the beta test list.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
63 ;; Without their patience, testing, insight, code contributions, and
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
64 ;; encouragement CC Mode would be a far inferior package.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
65
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
66 ;; You can get the latest version of CC Mode, including PostScript
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
67 ;; documentation and separate individual files from:
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
68 ;;
30401
b85ee58b24ec (c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents: 26817
diff changeset
69 ;; http://cc-mode.sourceforge.net/
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
70 ;;
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
71 ;; You can join a moderated CC Mode announcement-only mailing list by
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
72 ;; visiting
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
73 ;;
30401
b85ee58b24ec (c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents: 26817
diff changeset
74 ;; http://lists.sourceforge.net/mailman/listinfo/cc-mode-announce
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
75
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
76 ;;; Code:
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
77
94998
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
78 ;; For Emacs < 22.2.
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
79 (eval-and-compile
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
80 (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
81
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
82 (eval-when-compile
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
83 (let ((load-path
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
84 (if (and (boundp 'byte-compile-dest-file)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
85 (stringp byte-compile-dest-file))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
86 (cons (file-name-directory byte-compile-dest-file) load-path)
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
87 load-path)))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
88 (load "cc-bytecomp" nil t)))
21109
a0eda86dd0be (c-initialize-cc-mode): Moved require's to top level.
Richard M. Stallman <rms@gnu.org>
parents: 20917
diff changeset
89
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
90 (cc-require 'cc-defs)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
91 (cc-require-when-compile 'cc-langs)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
92 (cc-require 'cc-vars)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
93 (cc-require 'cc-engine)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
94 (cc-require 'cc-styles)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
95 (cc-require 'cc-cmds)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
96 (cc-require 'cc-align)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
97 (cc-require 'cc-menus)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
98
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
99 ;; Silence the compiler.
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
100 (cc-bytecomp-defvar adaptive-fill-first-line-regexp) ; Emacs
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
101 (cc-bytecomp-defun set-keymap-parents) ; XEmacs
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
102 (cc-bytecomp-defun run-mode-hooks) ; Emacs 21.1
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
103 (cc-bytecomp-obsolete-fun make-local-hook) ; Marked obsolete in Emacs 21.1.
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
104
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
105 ;; We set these variables during mode init, yet we don't require
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
106 ;; font-lock.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
107 (cc-bytecomp-defvar font-lock-defaults)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
108 (cc-bytecomp-defvar font-lock-syntactic-keywords)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
109
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
110 ;; Menu support for both XEmacs and Emacs. If you don't have easymenu
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
111 ;; with your version of Emacs, you are incompatible!
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
112 (cc-external-require 'easymenu)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
113
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
114 ;; Autoload directive for emacsen that doesn't have an older CC Mode
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
115 ;; version in the dist.
106160
b27aeda9c1fd 2009-11-20 Tassilo Horn <tassilo@member.fsf.org>
Tassilo Horn <tassilo@member.fsf.org>
parents: 103966
diff changeset
116 (autoload 'subword-mode "subword"
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
117 "Mode enabling subword movement and editing keys." t)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
118
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
119 ;; Load cc-fonts first after font-lock is loaded, since it isn't
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
120 ;; necessary until font locking is requested.
71754
60304f6ae360 * progmodes/cc-awk.el, cc-defs.el, cc-fonts.el, cc-langs.el,
Alan Mackenzie <acm@muc.de>
parents: 69140
diff changeset
121 ; (eval-after-load "font-lock" ; 2006-07-09: font-lock is now preloaded.
60304f6ae360 * progmodes/cc-awk.el, cc-defs.el, cc-fonts.el, cc-langs.el,
Alan Mackenzie <acm@muc.de>
parents: 69140
diff changeset
122 ; '
60304f6ae360 * progmodes/cc-awk.el, cc-defs.el, cc-fonts.el, cc-langs.el,
Alan Mackenzie <acm@muc.de>
parents: 69140
diff changeset
123 (require 'cc-fonts) ;)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
124
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
125 ;; cc-langs isn't loaded when we're byte compiled, so add autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
126 ;; directives for the interface functions.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
127 (autoload 'c-make-init-lang-vars-fun "cc-langs")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
128 (autoload 'c-init-language-vars "cc-langs" nil nil 'macro)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
129
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
130
18847
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
131 ;; Other modes and packages which depend on CC Mode should do the
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
132 ;; following to make sure everything is loaded and available for their
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
133 ;; use:
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
134 ;;
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
135 ;; (require 'cc-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
136 ;;
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
137 ;; And in the major mode function:
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
138 ;;
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
139 ;; (c-initialize-cc-mode t)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
140 ;; (c-init-language-vars some-mode)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
141 ;; (c-common-init 'some-mode) ; Or perhaps (c-basic-common-init 'some-mode)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
142 ;;
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
143 ;; If you're not writing a derived mode using the language variable
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
144 ;; system, then some-mode is one of the language modes directly
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
145 ;; supported by CC Mode. You can then use (c-init-language-vars-for
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
146 ;; 'some-mode) instead of `c-init-language-vars'.
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
147 ;; `c-init-language-vars-for' is a function that avoids the rather
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
148 ;; large expansion of `c-init-language-vars'.
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
149 ;;
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
150 ;; If you use `c-basic-common-init' then you might want to call
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
151 ;; `c-font-lock-init' too to set up CC Mode's font lock support.
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
152 ;;
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
153 ;; See cc-langs.el for further info. A small example of a derived mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
154 ;; is also available at <http://cc-mode.sourceforge.net/
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
155 ;; derived-mode-ex.el>.
18847
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
156
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
157 (defun c-leave-cc-mode-mode ()
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
158 (setq c-buffer-is-cc-mode nil))
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
159
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
160 (defun c-init-language-vars-for (mode)
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
161 "Initialize the language variables for one of the language modes
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
162 directly supported by CC Mode. This can be used instead of the
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
163 `c-init-language-vars' macro if the language you want to use is one of
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
164 those, rather than a derived language defined through the language
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
165 variable system (see \"cc-langs.el\")."
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
166 (cond ((eq mode 'c-mode) (c-init-language-vars c-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
167 ((eq mode 'c++-mode) (c-init-language-vars c++-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
168 ((eq mode 'objc-mode) (c-init-language-vars objc-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
169 ((eq mode 'java-mode) (c-init-language-vars java-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
170 ((eq mode 'idl-mode) (c-init-language-vars idl-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
171 ((eq mode 'pike-mode) (c-init-language-vars pike-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
172 ((eq mode 'awk-mode) (c-init-language-vars awk-mode))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
173 (t (error "Unsupported mode %s" mode))))
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
174
19253
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
175 ;;;###autoload
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
176 (defun c-initialize-cc-mode (&optional new-style-init)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
177 "Initialize CC Mode for use in the current buffer.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
178 If the optional NEW-STYLE-INIT is nil or left out then all necessary
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
179 initialization to run CC Mode for the C language is done. Otherwise
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
180 only some basic setup is done, and a call to `c-init-language-vars' or
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
181 `c-init-language-vars-for' is necessary too (which gives more
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
182 control). See \"cc-mode.el\" for more info."
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
183
19299
7cd7373cc021 (c-initialize-cc-mode): Set c-buffer-is-cc-mode to t.
Richard M. Stallman <rms@gnu.org>
parents: 19253
diff changeset
184 (setq c-buffer-is-cc-mode t)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
185
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
186 (let ((initprop 'cc-mode-is-initialized)
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
187 c-initialization-ok)
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
188 (unless (get 'c-initialize-cc-mode initprop)
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
189 (unwind-protect
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
190 (progn
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
191 (put 'c-initialize-cc-mode initprop t)
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
192 (c-initialize-builtin-style)
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
193 (run-hooks 'c-initialization-hook)
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
194 ;; Fix obsolete variables.
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
195 (if (boundp 'c-comment-continuation-stars)
87320
80e1a8076c36 * progmodes/cc-vars.el (defcustom-c-stylevar): Eval VAL.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 85185
diff changeset
196 (setq c-block-comment-prefix
80e1a8076c36 * progmodes/cc-vars.el (defcustom-c-stylevar): Eval VAL.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 85185
diff changeset
197 (symbol-value 'c-comment-continuation-stars)))
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
198 (add-hook 'change-major-mode-hook 'c-leave-cc-mode-mode)
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
199 (setq c-initialization-ok t))
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
200 ;; Will try initialization hooks again if they failed.
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
201 (put 'c-initialize-cc-mode initprop c-initialization-ok))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
202
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
203 (unless new-style-init
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
204 (c-init-language-vars-for 'c-mode)))
18847
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
205
dd7615d21a97 (c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents: 18720
diff changeset
206
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
207 ;;; Common routines.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
208
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
209 (defvar c-mode-base-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
210 "Keymap shared by all CC Mode related modes.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
211
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
212 (defun c-make-inherited-keymap ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
213 (let ((map (make-sparse-keymap)))
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
214 ;; Necessary to use `cc-bytecomp-fboundp' below since this
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
215 ;; function is called from top-level forms that are evaluated
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
216 ;; while cc-bytecomp is active when one does M-x eval-buffer.
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
217 (cond
96131
7ee547824da5 (c-make-inherited-keymap): Only use set-keymap-parents if set-keymap-parent
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 95305
diff changeset
218 ;; Emacs
7ee547824da5 (c-make-inherited-keymap): Only use set-keymap-parents if set-keymap-parent
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 95305
diff changeset
219 ((cc-bytecomp-fboundp 'set-keymap-parent)
7ee547824da5 (c-make-inherited-keymap): Only use set-keymap-parents if set-keymap-parent
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 95305
diff changeset
220 (set-keymap-parent map c-mode-base-map))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
221 ;; XEmacs
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
222 ((cc-bytecomp-fboundp 'set-keymap-parents)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
223 (set-keymap-parents map c-mode-base-map))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
224 ;; incompatible
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
225 (t (error "CC Mode is incompatible with this version of Emacs")))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
226 map))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
227
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
228 (defun c-define-abbrev-table (name defs)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
229 ;; Compatibility wrapper for `define-abbrev' which passes a non-nil
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
230 ;; sixth argument for SYSTEM-FLAG in emacsen that support it
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
231 ;; (currently only Emacs >= 21.2).
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
232 (let ((table (or (symbol-value name)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
233 (progn (define-abbrev-table name nil)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
234 (symbol-value name)))))
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
235 (while defs
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
236 (condition-case nil
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
237 (apply 'define-abbrev table (append (car defs) '(t)))
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
238 (wrong-number-of-arguments
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
239 (apply 'define-abbrev table (car defs))))
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
240 (setq defs (cdr defs)))))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
241 (put 'c-define-abbrev-table 'lisp-indent-function 1)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
242
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
243 (defun c-bind-special-erase-keys ()
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
244 ;; Only used in Emacs to bind C-c C-<delete> and C-c C-<backspace>
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
245 ;; to the proper keys depending on `normal-erase-is-backspace'.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
246 (if normal-erase-is-backspace
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
247 (progn
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
248 (define-key c-mode-base-map (kbd "C-c C-<delete>")
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
249 'c-hungry-delete-forward)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
250 (define-key c-mode-base-map (kbd "C-c C-<backspace>")
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
251 'c-hungry-delete-backwards))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
252 (define-key c-mode-base-map (kbd "C-c C-<delete>")
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
253 'c-hungry-delete-backwards)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
254 (define-key c-mode-base-map (kbd "C-c C-<backspace>")
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
255 'c-hungry-delete-forward)))
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
256
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
257 (if c-mode-base-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
258 nil
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
259
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
260 (setq c-mode-base-map (make-sparse-keymap))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
261
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
262 ;; Separate M-BS from C-M-h. The former should remain
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
263 ;; backward-kill-word.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
264 (define-key c-mode-base-map [(control meta h)] 'c-mark-function)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
265 (define-key c-mode-base-map "\e\C-q" 'c-indent-exp)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
266 (substitute-key-definition 'backward-sentence
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
267 'c-beginning-of-statement
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
268 c-mode-base-map global-map)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
269 (substitute-key-definition 'forward-sentence
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
270 'c-end-of-statement
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
271 c-mode-base-map global-map)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
272 (substitute-key-definition 'indent-new-comment-line
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
273 'c-indent-new-comment-line
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
274 c-mode-base-map global-map)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
275 (substitute-key-definition 'indent-for-tab-command
84840
f4b3c97a692f * progmodes/cc-mode.el (c-mode-base-map): Use
Dan Nicolaescu <dann@ics.uci.edu>
parents: 78354
diff changeset
276 ;; XXX Is this the right thing to do
f4b3c97a692f * progmodes/cc-mode.el (c-mode-base-map): Use
Dan Nicolaescu <dann@ics.uci.edu>
parents: 78354
diff changeset
277 ;; here?
f4b3c97a692f * progmodes/cc-mode.el (c-mode-base-map): Use
Dan Nicolaescu <dann@ics.uci.edu>
parents: 78354
diff changeset
278 'c-indent-line-or-region
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
279 c-mode-base-map global-map)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
280 (when (fboundp 'comment-indent-new-line)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
281 ;; indent-new-comment-line has changed name to
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
282 ;; comment-indent-new-line in Emacs 21.
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
283 (substitute-key-definition 'comment-indent-new-line
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
284 'c-indent-new-comment-line
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
285 c-mode-base-map global-map))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
286
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
287 ;; RMS says don't make these the default.
75027
9f636bd65206 Update CC Mode to version 5.31.4. The detailed changes are those
Alan Mackenzie <acm@muc.de>
parents: 74702
diff changeset
288 ;; (April 2006): RMS has now approved these commands as defaults.
96384
59d141ae8c74 cc-mode.el (c-mode-base-map): Don't bind C-M-[ae] to the CC Mode specific
Alan Mackenzie <acm@muc.de>
parents: 96131
diff changeset
289 (unless (memq 'argumentative-bod-function c-emacs-features)
59d141ae8c74 cc-mode.el (c-mode-base-map): Don't bind C-M-[ae] to the CC Mode specific
Alan Mackenzie <acm@muc.de>
parents: 96131
diff changeset
290 (define-key c-mode-base-map "\e\C-a" 'c-beginning-of-defun)
59d141ae8c74 cc-mode.el (c-mode-base-map): Don't bind C-M-[ae] to the CC Mode specific
Alan Mackenzie <acm@muc.de>
parents: 96131
diff changeset
291 (define-key c-mode-base-map "\e\C-e" 'c-end-of-defun))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
292
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
293 (define-key c-mode-base-map "\C-c\C-n" 'c-forward-conditional)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
294 (define-key c-mode-base-map "\C-c\C-p" 'c-backward-conditional)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
295 (define-key c-mode-base-map "\C-c\C-u" 'c-up-conditional)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
296
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
297 ;; It doesn't suffice to put `c-fill-paragraph' on
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
298 ;; `fill-paragraph-function' since `c-fill-paragraph' must be called
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
299 ;; before any fill prefix adaption is done. E.g. `filladapt-mode'
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
300 ;; replaces `fill-paragraph' and does the adaption before calling
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
301 ;; `fill-paragraph-function', and we have to mask comments etc
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
302 ;; before that. Also, `c-fill-paragraph' chains on to
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
303 ;; `fill-paragraph' and the value on `fill-parapgraph-function' to
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
304 ;; do the actual filling work.
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
305 (substitute-key-definition 'fill-paragraph 'c-fill-paragraph
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
306 c-mode-base-map global-map)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
307 ;; In XEmacs the default fill function is called
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
308 ;; fill-paragraph-or-region.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
309 (substitute-key-definition 'fill-paragraph-or-region 'c-fill-paragraph
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
310 c-mode-base-map global-map)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
311
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
312 ;; We bind the forward deletion key and (implicitly) C-d to
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
313 ;; `c-electric-delete-forward', and the backward deletion key to
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
314 ;; `c-electric-backspace'. The hungry variants are bound to the
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
315 ;; same keys but prefixed with C-c. This implies that C-c C-d is
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
316 ;; `c-hungry-delete-forward'. For consistency, we bind not only C-c
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
317 ;; <backspace> to `c-hungry-delete-backwards' but also
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
318 ;; C-c C-<backspace>, so that the Ctrl key can be held down during
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
319 ;; the whole sequence regardless of the direction. This in turn
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
320 ;; implies that we bind C-c C-<delete> to `c-hungry-delete-forward',
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
321 ;; for the same reason.
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
322
37563
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
323 ;; Bind the electric deletion functions to C-d and DEL. Emacs 21
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
324 ;; automatically maps the [delete] and [backspace] keys to these two
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
325 ;; depending on window system and user preferences. (In earlier
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
326 ;; versions it's possible to do the same by using `function-key-map'.)
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
327 (define-key c-mode-base-map "\C-d" 'c-electric-delete-forward)
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
328 (define-key c-mode-base-map "\177" 'c-electric-backspace)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
329 (define-key c-mode-base-map "\C-c\C-d" 'c-hungry-delete-forward)
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
330 (define-key c-mode-base-map [?\C-c ?\d] 'c-hungry-delete-backwards)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
331 (define-key c-mode-base-map [?\C-c ?\C-\d] 'c-hungry-delete-backwards)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
332 (define-key c-mode-base-map [?\C-c deletechar] 'c-hungry-delete-forward) ; C-c <delete> on a tty.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
333 (define-key c-mode-base-map [?\C-c (control deletechar)] ; C-c C-<delete> on a tty.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
334 'c-hungry-delete-forward)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
335 (when (boundp 'normal-erase-is-backspace)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
336 ;; The automatic C-d and DEL mapping functionality doesn't extend
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
337 ;; to special combinations like C-c C-<delete>, so we have to hook
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
338 ;; into the `normal-erase-is-backspace' system to bind it directly
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
339 ;; as appropriate.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
340 (add-hook 'normal-erase-is-backspace-hook 'c-bind-special-erase-keys)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
341 (c-bind-special-erase-keys))
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
342
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
343 (when (fboundp 'delete-forward-p)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
344 ;; In XEmacs we fix the forward and backward deletion behavior by
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
345 ;; binding the keysyms for the [delete] and [backspace] keys
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
346 ;; directly, and use `delete-forward-p' to decide what [delete]
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
347 ;; should do. That's done in the XEmacs specific
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
348 ;; `c-electric-delete' and `c-hungry-delete' functions.
37563
79039a33283a Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents: 36920
diff changeset
349 (define-key c-mode-base-map [delete] 'c-electric-delete)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
350 (define-key c-mode-base-map [backspace] 'c-electric-backspace)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
351 (define-key c-mode-base-map (kbd "C-c <delete>") 'c-hungry-delete)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
352 (define-key c-mode-base-map (kbd "C-c C-<delete>") 'c-hungry-delete)
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
353 (define-key c-mode-base-map (kbd "C-c <backspace>")
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
354 'c-hungry-delete-backwards)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
355 (define-key c-mode-base-map (kbd "C-c C-<backspace>")
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
356 'c-hungry-delete-backwards))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
357
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
358 (define-key c-mode-base-map "#" 'c-electric-pound)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
359 (define-key c-mode-base-map "{" 'c-electric-brace)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
360 (define-key c-mode-base-map "}" 'c-electric-brace)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
361 (define-key c-mode-base-map "/" 'c-electric-slash)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
362 (define-key c-mode-base-map "*" 'c-electric-star)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
363 (define-key c-mode-base-map ";" 'c-electric-semi&comma)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
364 (define-key c-mode-base-map "," 'c-electric-semi&comma)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
365 (define-key c-mode-base-map ":" 'c-electric-colon)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
366 (define-key c-mode-base-map "(" 'c-electric-paren)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
367 (define-key c-mode-base-map ")" 'c-electric-paren)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
368
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
369 (define-key c-mode-base-map "\C-c\C-\\" 'c-backslash-region)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
370 (define-key c-mode-base-map "\C-c\C-a" 'c-toggle-auto-newline)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
371 (define-key c-mode-base-map "\C-c\C-b" 'c-submit-bug-report)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
372 (define-key c-mode-base-map "\C-c\C-c" 'comment-region)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
373 (define-key c-mode-base-map "\C-c\C-l" 'c-toggle-electric-state)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
374 (define-key c-mode-base-map "\C-c\C-o" 'c-set-offset)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
375 (define-key c-mode-base-map "\C-c\C-q" 'c-indent-defun)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
376 (define-key c-mode-base-map "\C-c\C-s" 'c-show-syntactic-information)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
377 ;; (define-key c-mode-base-map "\C-c\C-t" 'c-toggle-auto-hungry-state) Commented out by ACM, 2005-03-05.
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
378 (define-key c-mode-base-map "\C-c." 'c-set-style)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
379 ;; conflicts with OOBR
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
380 ;;(define-key c-mode-base-map "\C-c\C-v" 'c-version)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
381 ;; (define-key c-mode-base-map "\C-c\C-y" 'c-toggle-hungry-state) Commented out by ACM, 2005-11-22.
106160
b27aeda9c1fd 2009-11-20 Tassilo Horn <tassilo@member.fsf.org>
Tassilo Horn <tassilo@member.fsf.org>
parents: 103966
diff changeset
382 (define-key c-mode-base-map "\C-c\C-w" 'subword-mode)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
383 )
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
384
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
385 ;; We don't require the outline package, but we configure it a bit anyway.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
386 (cc-bytecomp-defvar outline-level)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
387
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
388 (defun c-mode-menu (modestr)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
389 "Return a menu spec suitable for `easy-menu-define' that is exactly
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
390 like the C mode menu except that the menu bar item name is MODESTR
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
391 instead of \"C\".
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
392
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
393 This function is provided for compatibility only; derived modes should
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
394 preferably use the `c-mode-menu' language constant directly."
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
395 (cons modestr (c-lang-const c-mode-menu c)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
396
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
397 ;; Ugly hack to pull in the definition of `c-populate-syntax-table'
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
398 ;; from cc-langs to make it available at runtime. It's either this or
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
399 ;; moving the definition for it to cc-defs, but that would mean to
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
400 ;; break up the syntax table setup over two files.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
401 (defalias 'c-populate-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
402 (cc-eval-when-compile
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
403 (let ((f (symbol-function 'c-populate-syntax-table)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
404 (if (byte-code-function-p f) f (byte-compile f)))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
405
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
406 ;; CAUTION: Try to avoid installing things on
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
407 ;; `before-change-functions'. The macro `combine-after-change-calls'
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
408 ;; is used and it doesn't work if there are things on that hook. That
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
409 ;; can cause font lock functions to run in inconvenient places during
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
410 ;; temporary changes in some font lock support modes, causing extra
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
411 ;; unnecessary work and font lock glitches due to interactions between
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
412 ;; various text properties.
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
413 ;;
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
414 ;; (2007-02-12): The macro `combine-after-change-calls' ISN'T used any
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
415 ;; more.
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
416
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
417 (defun c-unfind-enclosing-token (pos)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
418 ;; If POS is wholly inside a token, remove that id from
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
419 ;; `c-found-types', should it be present. Return t if we were in an
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
420 ;; id, else nil.
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
421 (save-excursion
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
422 (let ((tok-beg (progn (goto-char pos)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
423 (and (c-beginning-of-current-token) (point))))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
424 (tok-end (progn (goto-char pos)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
425 (and (c-end-of-current-token) (point)))))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
426 (when (and tok-beg tok-end)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
427 (c-unfind-type (buffer-substring-no-properties tok-beg tok-end))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
428 t))))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
429
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
430 (defun c-unfind-coalesced-tokens (beg end)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
431 ;; unless the non-empty region (beg end) is entirely WS and there's at
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
432 ;; least one character of WS just before or after this region, remove
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
433 ;; the tokens which touch the region from `c-found-types' should they
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
434 ;; be present.
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
435 (or (c-partial-ws-p beg end)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
436 (save-excursion
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
437 (progn
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
438 (goto-char beg)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
439 (or (eq beg (point-min))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
440 (c-skip-ws-backward (1- beg))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
441 (/= (point) beg)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
442 (= (c-backward-token-2) 1)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
443 (c-unfind-type (buffer-substring-no-properties
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
444 (point) beg)))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
445 (goto-char end)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
446 (or (eq end (point-max))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
447 (c-skip-ws-forward (1+ end))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
448 (/= (point) end)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
449 (progn (forward-char) (c-end-of-current-token) nil)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
450 (c-unfind-type (buffer-substring-no-properties
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
451 end (point))))))))
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
452
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
453 ;; c-maybe-stale-found-type records a place near the region being
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
454 ;; changed where an element of `found-types' might become stale. It
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
455 ;; is set in c-before-change and is either nil, or has the form:
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
456 ;;
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
457 ;; (c-decl-id-start "foo" 97 107 " (* ooka) " "o"), where
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
458 ;;
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
459 ;; o - `c-decl-id-start' is the c-type text property value at buffer
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
460 ;; pos 96.
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
461 ;;
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
462 ;; o - 97 107 is the region potentially containing the stale type -
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
463 ;; this is delimited by a non-nil c-type text property at 96 and
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
464 ;; either another one or a ";", "{", or "}" at 107.
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
465 ;;
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
466 ;; o - " (* ooka) " is the (before change) buffer portion containing
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
467 ;; the suspect type (here "ooka").
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
468 ;;
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
469 ;; o - "o" is the buffer contents which is about to be deleted. This
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
470 ;; would be the empty string for an insertion.
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
471 (defvar c-maybe-stale-found-type nil)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
472 (make-variable-buffer-local 'c-maybe-stale-found-type)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
473
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
474 (defun c-basic-common-init (mode default-style)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
475 "Do the necessary initialization for the syntax handling routines
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
476 and the line breaking/filling code. Intended to be used by other
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
477 packages that embed CC Mode.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
478
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
479 MODE is the CC Mode flavor to set up, e.g. 'c-mode or 'java-mode.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
480 DEFAULT-STYLE tells which indentation style to install. It has the
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
481 same format as `c-default-style'.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
482
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
483 Note that `c-init-language-vars' must be called before this function.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
484 This function cannot do that since `c-init-language-vars' is a macro
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
485 that requires a literal mode spec at compile time."
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
486
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
487 (setq c-buffer-is-cc-mode mode)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
488
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
489 ;; these variables should always be buffer local; they do not affect
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
490 ;; indentation style.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
491 (make-local-variable 'parse-sexp-ignore-comments)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
492 (make-local-variable 'indent-line-function)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
493 (make-local-variable 'indent-region-function)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
494 (make-local-variable 'normal-auto-fill-function)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
495 (make-local-variable 'comment-start)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
496 (make-local-variable 'comment-end)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
497 (make-local-variable 'comment-start-skip)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
498 (make-local-variable 'comment-multi-line)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
499 (make-local-variable 'comment-line-break-function)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
500 (make-local-variable 'paragraph-start)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
501 (make-local-variable 'paragraph-separate)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
502 (make-local-variable 'paragraph-ignore-fill-prefix)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
503 (make-local-variable 'adaptive-fill-mode)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
504 (make-local-variable 'adaptive-fill-regexp)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
505
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
506 ;; now set their values
49496
2c05c557df6c (c-require-final-newline): Made this variable an alist to specify a value
Martin Stjernholm <mast@lysator.liu.se>
parents: 49470
diff changeset
507 (setq parse-sexp-ignore-comments t
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
508 indent-line-function 'c-indent-line
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
509 indent-region-function 'c-indent-region
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
510 normal-auto-fill-function 'c-do-auto-fill
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
511 comment-multi-line t
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
512 comment-line-break-function 'c-indent-new-comment-line)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
513
49654
b025ca405045 (c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents: 49496
diff changeset
514 ;; Install `c-fill-paragraph' on `fill-paragraph-function' so that a
b025ca405045 (c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents: 49496
diff changeset
515 ;; direct call to `fill-paragraph' behaves better. This still
b025ca405045 (c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents: 49496
diff changeset
516 ;; doesn't work with filladapt but it's better than nothing.
b025ca405045 (c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents: 49496
diff changeset
517 (make-local-variable 'fill-paragraph-function)
b025ca405045 (c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents: 49496
diff changeset
518 (setq fill-paragraph-function 'c-fill-paragraph)
b025ca405045 (c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents: 49496
diff changeset
519
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
520 ;; Initialise the cache of brace pairs, and opening braces/brackets/parens.
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
521 (c-state-cache-init)
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
522
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
523 (when (or c-recognize-<>-arglists
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
524 (c-major-mode-is 'awk-mode)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
525 (c-major-mode-is '(c-mode c++-mode objc-mode)))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
526 ;; We'll use the syntax-table text property to change the syntax
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
527 ;; of some chars for this language, so do the necessary setup for
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
528 ;; that.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
529 ;;
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
530 ;; Note to other package developers: It's ok to turn this on in CC
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
531 ;; Mode buffers when CC Mode doesn't, but it's not ok to turn it
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
532 ;; off if CC Mode has turned it on.
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
533
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
534 ;; Emacs.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
535 (when (boundp 'parse-sexp-lookup-properties)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
536 (make-local-variable 'parse-sexp-lookup-properties)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
537 (setq parse-sexp-lookup-properties t))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
538
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
539 ;; Same as above for XEmacs.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
540 (when (boundp 'lookup-syntax-properties)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
541 (make-local-variable 'lookup-syntax-properties)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
542 (setq lookup-syntax-properties t)))
49496
2c05c557df6c (c-require-final-newline): Made this variable an alist to specify a value
Martin Stjernholm <mast@lysator.liu.se>
parents: 49470
diff changeset
543
106522
0a0832d4518d Fix bug#5091: indentation in c++-mode.
Alan Mackenzie <acm@muc.de>
parents: 106428
diff changeset
544 ;; Use this in Emacs 21+ to avoid meddling with the rear-nonsticky
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
545 ;; property on each character.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
546 (when (boundp 'text-property-default-nonsticky)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
547 (make-local-variable 'text-property-default-nonsticky)
106522
0a0832d4518d Fix bug#5091: indentation in c++-mode.
Alan Mackenzie <acm@muc.de>
parents: 106428
diff changeset
548 (mapc (lambda (tprop)
0a0832d4518d Fix bug#5091: indentation in c++-mode.
Alan Mackenzie <acm@muc.de>
parents: 106428
diff changeset
549 (unless (assq tprop text-property-default-nonsticky)
0a0832d4518d Fix bug#5091: indentation in c++-mode.
Alan Mackenzie <acm@muc.de>
parents: 106428
diff changeset
550 (setq text-property-default-nonsticky
0a0832d4518d Fix bug#5091: indentation in c++-mode.
Alan Mackenzie <acm@muc.de>
parents: 106428
diff changeset
551 (cons `(,tprop . t) text-property-default-nonsticky))))
0a0832d4518d Fix bug#5091: indentation in c++-mode.
Alan Mackenzie <acm@muc.de>
parents: 106428
diff changeset
552 '(syntax-table category c-type)))
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
553
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
554 ;; In Emacs 21 and later it's possible to turn off the ad-hoc
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
555 ;; heuristic that open parens in column 0 are defun starters. Since
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
556 ;; we have c-state-cache, that heuristic isn't useful and only causes
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
557 ;; trouble, so turn it off.
74702
2d3815650232 (c-basic-common-init): don't set open-paren-in-column-0-is-defun-start to
Alan Mackenzie <acm@muc.de>
parents: 74372
diff changeset
558 ;; 2006/12/17: This facility is somewhat confused, and doesn't really seem
2d3815650232 (c-basic-common-init): don't set open-paren-in-column-0-is-defun-start to
Alan Mackenzie <acm@muc.de>
parents: 74372
diff changeset
559 ;; helpful. Comment it out for now.
2d3815650232 (c-basic-common-init): don't set open-paren-in-column-0-is-defun-start to
Alan Mackenzie <acm@muc.de>
parents: 74372
diff changeset
560 ;; (when (memq 'col-0-paren c-emacs-features)
2d3815650232 (c-basic-common-init): don't set open-paren-in-column-0-is-defun-start to
Alan Mackenzie <acm@muc.de>
parents: 74372
diff changeset
561 ;; (make-local-variable 'open-paren-in-column-0-is-defun-start)
2d3815650232 (c-basic-common-init): don't set open-paren-in-column-0-is-defun-start to
Alan Mackenzie <acm@muc.de>
parents: 74372
diff changeset
562 ;; (setq open-paren-in-column-0-is-defun-start nil))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
563
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
564 (c-clear-found-types)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
565
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
566 ;; now set the mode style based on default-style
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
567 (let ((style (if (stringp default-style)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
568 default-style
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
569 (or (cdr (assq mode default-style))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
570 (cdr (assq 'other default-style))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
571 "gnu"))))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
572 ;; Override style variables if `c-old-style-variable-behavior' is
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
573 ;; set. Also override if we are using global style variables,
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
574 ;; have already initialized a style once, and are switching to a
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
575 ;; different style. (It's doubtful whether this is desirable, but
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
576 ;; the whole situation with nonlocal style variables is a bit
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
577 ;; awkward. It's at least the most compatible way with the old
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
578 ;; style init procedure.)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
579 (c-set-style style (not (or c-old-style-variable-behavior
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
580 (and (not c-style-variables-are-local-p)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
581 c-indentation-style
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
582 (not (string-equal c-indentation-style
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
583 style)))))))
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
584 (c-setup-paragraph-variables)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
585
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
586 ;; we have to do something special for c-offsets-alist so that the
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
587 ;; buffer local value has its own alist structure.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
588 (setq c-offsets-alist (copy-alist c-offsets-alist))
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
589
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
590 ;; setup the comment indent variable in a Emacs version portable way
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
591 (make-local-variable 'comment-indent-function)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
592 (setq comment-indent-function 'c-comment-indent)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
593
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
594 ;; ;; Put submode indicators onto minor-mode-alist, but only once.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
595 ;; (or (assq 'c-submode-indicators minor-mode-alist)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
596 ;; (setq minor-mode-alist
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
597 ;; (cons '(c-submode-indicators c-submode-indicators)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
598 ;; minor-mode-alist)))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
599 (c-update-modeline)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
600
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
601 ;; Install the functions that ensure that various internal caches
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
602 ;; don't become invalid due to buffer changes.
76399
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
603 (make-local-hook 'before-change-functions)
ec0b1fedc030 (c-unfind-enclosing-token, c-unfind-coalesced-tokens, c-before-change): new
Alan Mackenzie <acm@muc.de>
parents: 75347
diff changeset
604 (add-hook 'before-change-functions 'c-before-change nil t)
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
605 (make-local-hook 'after-change-functions)
80459
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
606 (add-hook 'after-change-functions 'c-after-change nil t)
80470
3f1db83024f5 (c-basic-common-init): Don't set
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 80459
diff changeset
607 (set (make-local-variable 'font-lock-extend-after-change-region-function)
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
608 'c-extend-after-change-region)) ; Currently (2009-05) used by all
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
609 ; lanaguages with #define (C, C++,; ObjC), and by AWK.
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
610
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
611 (defun c-setup-doc-comment-style ()
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
612 "Initialize the variables that depend on the value of `c-doc-comment-style'."
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
613 (when (and (featurep 'font-lock)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
614 (symbol-value 'font-lock-mode))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
615 ;; Force font lock mode to reinitialize itself.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
616 (font-lock-mode 0)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
617 (font-lock-mode 1)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
618
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
619 (defun c-common-init (&optional mode)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
620 "Common initialization for all CC Mode modes.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
621 In addition to the work done by `c-basic-common-init' and
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
622 `c-font-lock-init', this function sets up various other things as
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
623 customary in CC Mode modes but which aren't strictly necessary for CC
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
624 Mode to operate correctly.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
625
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
626 MODE is the symbol for the mode to initialize, like 'c-mode. See
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
627 `c-basic-common-init' for details. It's only optional to be
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
628 compatible with old code; callers should always specify it."
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
629
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
630 (unless mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
631 ;; Called from an old third party package. The fallback is to
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
632 ;; initialize for C.
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
633 (c-init-language-vars-for 'c-mode))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
634
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
635 (c-basic-common-init mode c-default-style)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
636 (when mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
637 ;; Only initialize font locking if we aren't called from an old package.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
638 (c-font-lock-init))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
639
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
640 ;; Starting a mode is a sort of "change". So call the change functions...
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
641 (save-restriction
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
642 (widen)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
643 (save-excursion
107086
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
644 (if c-get-state-before-change-functions
107098
17f07853dd4d * progmodes/cc-mode.el (c-common-init): Bind temporary variables
Chong Yidong <cyd@stupidchicken.com>
parents: 107086
diff changeset
645 (let ((beg (point-min))
17f07853dd4d * progmodes/cc-mode.el (c-common-init): Bind temporary variables
Chong Yidong <cyd@stupidchicken.com>
parents: 107086
diff changeset
646 (end (point-max)))
17f07853dd4d * progmodes/cc-mode.el (c-common-init): Bind temporary variables
Chong Yidong <cyd@stupidchicken.com>
parents: 107086
diff changeset
647 (mapc (lambda (fn)
17f07853dd4d * progmodes/cc-mode.el (c-common-init): Bind temporary variables
Chong Yidong <cyd@stupidchicken.com>
parents: 107086
diff changeset
648 (funcall fn beg end))
17f07853dd4d * progmodes/cc-mode.el (c-common-init): Bind temporary variables
Chong Yidong <cyd@stupidchicken.com>
parents: 107086
diff changeset
649 c-get-state-before-change-functions)))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
650 (if c-before-font-lock-function
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
651 (funcall c-before-font-lock-function (point-min) (point-max)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
652 (- (point-max) (point-min))))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
653
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
654 (make-local-variable 'outline-regexp)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
655 (make-local-variable 'outline-level)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
656 (setq outline-regexp "[^#\n\^M]"
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
657 outline-level 'c-outline-level)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
658
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
659 (let ((rfn (assq mode c-require-final-newline)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
660 (when rfn
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
661 (make-local-variable 'require-final-newline)
59239
a88429b12685 (c-common-init): Use mode-require-final-newline.
Richard M. Stallman <rms@gnu.org>
parents: 58747
diff changeset
662 (and (cdr rfn)
a88429b12685 (c-common-init): Use mode-require-final-newline.
Richard M. Stallman <rms@gnu.org>
parents: 58747
diff changeset
663 (setq require-final-newline mode-require-final-newline)))))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
664
97140
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
665 (defun c-before-hack-hook ()
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
666 "Set the CC Mode style and \"offsets\" when in the buffer's local variables.
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
667 They are set only when, respectively, the pseudo variables
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
668 `c-file-style' and `c-file-offsets' are present in the list.
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
669
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
670 This function is called from the hook `before-hack-local-variables-hook'."
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
671 (when c-buffer-is-cc-mode
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
672 (let ((stile (cdr (assq 'c-file-style file-local-variables-alist)))
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
673 (offsets (cdr (assq 'c-file-offsets file-local-variables-alist))))
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
674 (when stile
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
675 (or (stringp stile) (error "c-file-style is not a string"))
106428
7925d1bc07e3 Revert change 1.85
Alan Mackenzie <acm@muc.de>
parents: 106395
diff changeset
676 (c-set-style stile))
97140
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
677 (when offsets
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
678 (mapc
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
679 (lambda (langentry)
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
680 (let ((langelem (car langentry))
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
681 (offset (cdr langentry)))
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
682 (c-set-offset langelem offset)))
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
683 offsets)))))
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
684
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
685 (defun c-remove-any-local-eval-or-mode-variables ()
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
686 ;; If the buffer specifies `mode' or `eval' in its File Local Variable list
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
687 ;; or on the first line, remove all occurrences. See
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
688 ;; `c-postprocess-file-styles' for justification. There is no need to save
78027
5131a632194a (c-remove-any-local-eval-or-mode-variables): When removing lines, also
Alan Mackenzie <acm@muc.de>
parents: 77612
diff changeset
689 ;; point here, or even bother too much about the buffer contents. However,
5131a632194a (c-remove-any-local-eval-or-mode-variables): When removing lines, also
Alan Mackenzie <acm@muc.de>
parents: 77612
diff changeset
690 ;; DON'T mess up the kill-ring.
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
691 ;;
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
692 ;; Most of the code here is derived from Emacs 21.3's `hack-local-variables'
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
693 ;; in files.el.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
694 (goto-char (point-max))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
695 (search-backward "\n\^L" (max (- (point-max) 3000) (point-min)) 'move)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
696 (let (lv-point (prefix "") (suffix ""))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
697 (when (let ((case-fold-search t))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
698 (search-forward "Local Variables:" nil t))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
699 (setq lv-point (point))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
700 ;; The prefix is what comes before "local variables:" in its line.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
701 ;; The suffix is what comes after "local variables:" in its line.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
702 (skip-chars-forward " \t")
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
703 (or (eolp)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
704 (setq suffix (buffer-substring (point)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
705 (progn (end-of-line) (point)))))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
706 (goto-char (match-beginning 0))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
707 (or (bolp)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
708 (setq prefix
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
709 (buffer-substring (point)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
710 (progn (beginning-of-line) (point)))))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
711
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
712 (while (search-forward-regexp
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
713 (concat "^[ \t]*"
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
714 (regexp-quote prefix)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
715 "\\(mode\\|eval\\):.*"
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
716 (regexp-quote suffix)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
717 "$")
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
718 nil t)
78027
5131a632194a (c-remove-any-local-eval-or-mode-variables): When removing lines, also
Alan Mackenzie <acm@muc.de>
parents: 77612
diff changeset
719 (forward-line 0)
5131a632194a (c-remove-any-local-eval-or-mode-variables): When removing lines, also
Alan Mackenzie <acm@muc.de>
parents: 77612
diff changeset
720 (delete-region (point) (progn (forward-line) (point)))))
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
721
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
722 ;; Delete the first line, if we've got one, in case it contains a mode spec.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
723 (unless (and lv-point
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
724 (progn (goto-char lv-point)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
725 (forward-line 0)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
726 (bobp)))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
727 (goto-char (point-min))
78027
5131a632194a (c-remove-any-local-eval-or-mode-variables): When removing lines, also
Alan Mackenzie <acm@muc.de>
parents: 77612
diff changeset
728 (unless (eobp)
5131a632194a (c-remove-any-local-eval-or-mode-variables): When removing lines, also
Alan Mackenzie <acm@muc.de>
parents: 77612
diff changeset
729 (delete-region (point) (progn (forward-line) (point)))))))
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
730
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
731 (defun c-postprocess-file-styles ()
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
732 "Function that post processes relevant file local variables in CC Mode.
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
733 Currently, this function simply applies any style and offset settings
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
734 found in the file's Local Variable list. It first applies any style
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
735 setting found in `c-file-style', then it applies any offset settings
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
736 it finds in `c-file-offsets'.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
737
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
738 Note that the style variables are always made local to the buffer."
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
739
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
740 ;; apply file styles and offsets
45632
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
741 (when c-buffer-is-cc-mode
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
742 (if (or c-file-style c-file-offsets)
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
743 (c-make-styles-buffer-local t))
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
744 (when c-file-style
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
745 (or (stringp c-file-style)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
746 (error "c-file-style is not a string"))
106428
7925d1bc07e3 Revert change 1.85
Alan Mackenzie <acm@muc.de>
parents: 106395
diff changeset
747 (c-set-style c-file-style))
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
748
45632
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
749 (and c-file-offsets
85185
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
750 (mapc
45632
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
751 (lambda (langentry)
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
752 (let ((langelem (car langentry))
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
753 (offset (cdr langentry)))
9d60ac21968f (c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents: 44728
diff changeset
754 (c-set-offset langelem offset)))
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
755 c-file-offsets))
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
756 ;; Problem: The file local variable block might have explicitly set a
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
757 ;; style variable. The `c-set-style' or `mapcar' call might have
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
758 ;; overwritten this. So we run `hack-local-variables' again to remedy
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
759 ;; this. There are no guarantees this will work properly, particularly as
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
760 ;; we have no control over what the other hook functions on
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
761 ;; `hack-local-variables-hook' would have done. We now (2006/2/1) remove
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
762 ;; any `eval' or `mode' expressions before we evaluate again (see below).
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
763 ;; ACM, 2005/11/2.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
764 ;;
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
765 ;; Problem (bug reported by Gustav Broberg): if one of the variables is
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
766 ;; `mode', this will invoke c-mode (etc.) again, setting up the style etc.
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
767 ;; We prevent this by temporarily removing `mode' from the Local Variables
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
768 ;; section.
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
769 (if (or c-file-style c-file-offsets)
75027
9f636bd65206 Update CC Mode to version 5.31.4. The detailed changes are those
Alan Mackenzie <acm@muc.de>
parents: 74702
diff changeset
770 (let ((hack-local-variables-hook nil) (inhibit-read-only t))
9f636bd65206 Update CC Mode to version 5.31.4. The detailed changes are those
Alan Mackenzie <acm@muc.de>
parents: 74702
diff changeset
771 (c-tentative-buffer-changes
69140
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
772 (c-remove-any-local-eval-or-mode-variables)
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
773 (hack-local-variables))
3d8b060d10fb cc-align.el, cc-awk.el, cc-bytecomp.el, cc-cmds.el, cc-compat.el,
Alan Mackenzie <acm@muc.de>
parents: 68773
diff changeset
774 nil))))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
775
97140
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
776 (if (boundp 'before-hack-local-variables-hook)
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
777 (add-hook 'before-hack-local-variables-hook 'c-before-hack-hook)
9637a590d441 (c-before-hack-hook): New function
Chong Yidong <cyd@stupidchicken.com>
parents: 96966
diff changeset
778 (add-hook 'hack-local-variables-hook 'c-postprocess-file-styles))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
779
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
780 (defmacro c-run-mode-hooks (&rest hooks)
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
781 ;; Emacs 21.1 has introduced a system with delayed mode hooks that
107086
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
782 ;; requires the use of the new function `run-mode-hooks'.
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
783 (if (cc-bytecomp-fboundp 'run-mode-hooks)
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
784 `(run-mode-hooks ,@hooks)
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
785 `(progn ,@(mapcar (lambda (hook) `(run-hooks ,hook)) hooks))))
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
786
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
787
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
788 ;;; Change hooks, linking with Font Lock.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
789
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
790 ;; Buffer local variables defining the region to be fontified by a font lock
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
791 ;; after-change function. They are set in c-after-change to
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
792 ;; after-change-function's BEG and END, and may be modified by a
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
793 ;; `c-before-font-lock-function'.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
794 (defvar c-new-BEG 0)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
795 (make-variable-buffer-local 'c-new-BEG)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
796 (defvar c-new-END 0)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
797 (make-variable-buffer-local 'c-new-END)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
798
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
799 ;; Buffer local variables recording Beginning/End-of-Macro position before a
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
800 ;; change, when a macro straddles, respectively, the BEG or END (or both) of
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
801 ;; the change region. Otherwise these have the values BEG/END.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
802 (defvar c-old-BOM 0)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
803 (make-variable-buffer-local 'c-old-BOM)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
804 (defvar c-old-EOM 0)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
805 (make-variable-buffer-local 'c-old-EOM)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
806
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
807 (defun c-extend-region-for-CPP (beg end)
80170
3e4f6980296d (c-extend-region-for-CPP): always set c-old-EOM.
Alan Mackenzie <acm@muc.de>
parents: 80160
diff changeset
808 ;; Set c-old-BOM or c-old-EOM respectively to BEG, END, each extended to the
3e4f6980296d (c-extend-region-for-CPP): always set c-old-EOM.
Alan Mackenzie <acm@muc.de>
parents: 80160
diff changeset
809 ;; beginning/end of any preprocessor construct they may be in.
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
810 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
811 ;; Point is undefined both before and after this function call; the buffer
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
812 ;; has already been widened, and match-data saved. The return value is
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
813 ;; meaningless.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
814 ;;
107086
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
815 ;; This function is in the C/C++/ObjC values of
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
816 ;; `c-get-state-before-change-functions' and is called exclusively as a
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
817 ;; before change function.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
818 (goto-char beg)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
819 (c-beginning-of-macro)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
820 (setq c-old-BOM (point))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
821
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
822 (goto-char end)
80170
3e4f6980296d (c-extend-region-for-CPP): always set c-old-EOM.
Alan Mackenzie <acm@muc.de>
parents: 80160
diff changeset
823 (if (c-beginning-of-macro)
3e4f6980296d (c-extend-region-for-CPP): always set c-old-EOM.
Alan Mackenzie <acm@muc.de>
parents: 80160
diff changeset
824 (c-end-of-macro))
3e4f6980296d (c-extend-region-for-CPP): always set c-old-EOM.
Alan Mackenzie <acm@muc.de>
parents: 80160
diff changeset
825 (setq c-old-EOM (point)))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
826
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
827 (defun c-neutralize-CPP-line (beg end)
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
828 ;; BEG and END bound a region, typically a preprocessor line. Put a
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
829 ;; "punctuation" syntax-table property on syntactically obtrusive
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
830 ;; characters, ones which would interact syntactically with stuff outside
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
831 ;; this region.
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
832 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
833 ;; These are unmatched string delimiters, or unmatched
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
834 ;; parens/brackets/braces. An unclosed comment is regarded as valid, NOT
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
835 ;; obtrusive.
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
836 (save-excursion
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
837 (let (s)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
838 (while
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
839 (progn
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
840 (setq s (parse-partial-sexp beg end -1))
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
841 (cond
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
842 ((< (nth 0 s) 0) ; found an unmated ),},]
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
843 (c-put-char-property (1- (point)) 'syntax-table '(1))
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
844 t)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
845 ((nth 3 s) ; In a string
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
846 (c-put-char-property (nth 8 s) 'syntax-table '(1))
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
847 t)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
848 ((> (nth 0 s) 0) ; In a (,{,[
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
849 (c-put-char-property (nth 1 s) 'syntax-table '(1))
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
850 t)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
851 (t nil)))))))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
852
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
853 (defun c-neutralize-syntax-in-and-mark-CPP (begg endd old-len)
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
854 ;; (i) Extend the font lock region to cover all changed preprocessor
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
855 ;; regions; it does this by setting the variables `c-new-BEG' and
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
856 ;; `c-new-END' to the new boundaries.
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
857 ;;
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
858 ;; (ii) "Neutralize" every preprocessor line wholly or partially in the
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
859 ;; extended changed region. "Restore" lines which were CPP lines before the
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
860 ;; change and are no longer so; these can be located from the Buffer local
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
861 ;; variables `c-old-BOM' and `c-old-EOM'.
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
862 ;;
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
863 ;; (iii) Mark every CPP construct by placing a `category' property value
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
864 ;; `c-cpp-delimiter' at its start and end. The marked characters are the
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
865 ;; opening # and usually the terminating EOL, but sometimes the character
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
866 ;; before a comment/string delimiter.
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
867 ;;
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
868 ;; That is, set syntax-table properties on characters that would otherwise
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
869 ;; interact syntactically with those outside the CPP line(s).
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
870 ;;
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
871 ;; This function is called from an after-change function, BEGG ENDD and
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
872 ;; OLD-LEN being the standard parameters. It prepares the buffer for font
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
873 ;; locking, hence must get called before `font-lock-after-change-function'.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
874 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
875 ;; Point is undefined both before and after this function call, the buffer
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
876 ;; has been widened, and match-data saved. The return value is ignored.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
877 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
878 ;; This function is the C/C++/ObjC value of `c-before-font-lock-function'.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
879 ;;
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
880 ;; Note: SPEED _MATTERS_ IN THIS FUNCTION!!!
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
881 ;;
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
882 ;; This function might make hidden buffer changes.
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
883 (c-save-buffer-state (limits)
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
884 ;; First determine the region, (c-new-BEG c-new-END), which will get font
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
885 ;; locked. It might need "neutralizing". This region may not start
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
886 ;; inside a string, comment, or macro.
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
887 (goto-char c-old-BOM) ; already set to old start of macro or begg.
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
888 (setq c-new-BEG
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
889 (if (setq limits (c-state-literal-at (point)))
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
890 (cdr limits) ; go forward out of any string or comment.
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
891 (point)))
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
892
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
893 (goto-char endd)
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
894 (if (setq limits (c-state-literal-at (point)))
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
895 (goto-char (car limits))) ; go backward out of any string or comment.
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
896 (if (c-beginning-of-macro)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
897 (c-end-of-macro))
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
898 (setq c-new-END (max (+ (- c-old-EOM old-len) (- endd begg))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
899 (point)))
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
900
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
901 ;; Clear all old relevant properties.
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
902 (c-clear-char-property-with-value c-new-BEG c-new-END 'syntax-table '(1))
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
903 (c-clear-char-property-with-value c-new-BEG c-new-END 'category 'c-cpp-delimiter)
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
904 ;; FIXME!!! What about the "<" and ">" category properties? 2009-11-16
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
905
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
906 ;; Add needed properties to each CPP construct in the region.
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
907 (goto-char c-new-BEG)
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
908 (let ((pps-position c-new-BEG) pps-state mbeg)
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
909 (while (and (< (point) c-new-END)
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
910 (search-forward-regexp c-anchored-cpp-prefix c-new-END t))
80587
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
911 ;; If we've found a "#" inside a string/comment, ignore it.
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
912 (setq pps-state
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
913 (parse-partial-sexp pps-position (point) nil nil pps-state)
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
914 pps-position (point))
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
915 (unless (or (nth 3 pps-state) ; in a string?
52c723879a4b * progmodes/cc-mode.el (c-postprocess-file-styles): Throw an error
Alan Mackenzie <acm@muc.de>
parents: 80470
diff changeset
916 (nth 4 pps-state)) ; in a comment?
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
917 (goto-char (match-beginning 0))
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
918 (setq mbeg (point))
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
919 (if (> (c-syntactic-end-of-macro) mbeg)
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
920 (progn
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
921 (c-neutralize-CPP-line mbeg (point))
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
922 (c-set-cpp-delimiters mbeg (point))
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
923 ;(setq pps-position (point))
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
924 )
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
925 (forward-line)) ; no infinite loop with, e.g., "#//"
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
926 )))))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
927
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
928 (defun c-before-change (beg end)
107086
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
929 ;; Function to be put on `before-change-functions'. Primarily, this calls
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
930 ;; the language dependent `c-get-state-before-change-functions'. It is
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
931 ;; otherwise used only to remove stale entries from the `c-found-types'
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
932 ;; cache, and to record entries which a `c-after-change' function might
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
933 ;; confirm as stale.
106395
f2b36fb84bf7 Enhance `c-parse-state' to run efficiently in "brace desserts".
Alan Mackenzie <acm@muc.de>
parents: 106160
diff changeset
934 ;;
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
935 ;; Note that this function must be FAST rather than accurate. Note
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
936 ;; also that it only has any effect when font locking is enabled.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
937 ;; We exploit this by checking for font-lock-*-face instead of doing
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
938 ;; rigourous syntactic analysis.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
939
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
940 ;; If either change boundary is wholly inside an identifier, delete
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
941 ;; it/them from the cache. Don't worry about being inside a string
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
942 ;; or a comment - "wrongly" removing a symbol from `c-found-types'
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
943 ;; isn't critical.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
944 (setq c-maybe-stale-found-type nil)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
945 (save-restriction
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
946 (save-match-data
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
947 (widen)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
948 (save-excursion
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
949 ;; Are we inserting/deleting stuff in the middle of an identifier?
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
950 (c-unfind-enclosing-token beg)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
951 (c-unfind-enclosing-token end)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
952 ;; Are we coalescing two tokens together, e.g. "fo o" -> "foo"?
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
953 (when (< beg end)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
954 (c-unfind-coalesced-tokens beg end))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
955 ;; Are we (potentially) disrupting the syntactic context which
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
956 ;; makes a type a type? E.g. by inserting stuff after "foo" in
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
957 ;; "foo bar;", or before "foo" in "typedef foo *bar;"?
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
958 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
959 ;; We search for appropriate c-type properties "near" the change.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
960 ;; First, find an appropriate boundary for this property search.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
961 (let (lim
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
962 type type-pos
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
963 marked-id term-pos
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
964 (end1
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
965 (or (and (eq (get-text-property end 'face) 'font-lock-comment-face)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
966 (previous-single-property-change end 'face))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
967 end)))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
968 (when (>= end1 beg) ; Don't hassle about changes entirely in comments.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
969 ;; Find a limit for the search for a `c-type' property
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
970 (while
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
971 (and (/= (skip-chars-backward "^;{}") 0)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
972 (> (point) (point-min))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
973 (memq (c-get-char-property (1- (point)) 'face)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
974 '(font-lock-comment-face font-lock-string-face))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
975 (setq lim (max (point-min) (1- (point))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
976
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
977 ;; Look for the latest `c-type' property before end1
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
978 (when (and (> end1 (point-min))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
979 (setq type-pos
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
980 (if (get-text-property (1- end1) 'c-type)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
981 end1
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
982 (previous-single-property-change end1 'c-type nil lim))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
983 (setq type (get-text-property (max (1- type-pos) lim) 'c-type))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
984
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
985 (when (memq type '(c-decl-id-start c-decl-type-start))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
986 ;; Get the identifier, if any, that the property is on.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
987 (goto-char (1- type-pos))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
988 (setq marked-id
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
989 (when (looking-at "\\(\\sw\\|\\s_\\)")
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
990 (c-beginning-of-current-token)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
991 (buffer-substring-no-properties (point) type-pos)))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
992
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
993 (goto-char end1)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
994 (skip-chars-forward "^;{}") ; FIXME!!! loop for comment, maybe
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
995 (setq lim (point))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
996 (setq term-pos
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
997 (or (next-single-property-change end 'c-type nil lim) lim))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
998 (setq c-maybe-stale-found-type
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
999 (list type marked-id
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1000 type-pos term-pos
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1001 (buffer-substring-no-properties type-pos term-pos)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1002 (buffer-substring-no-properties beg end)))))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1003
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
1004 ;; (c-new-BEG c-new-END) will be the region to fontify. It may become
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
1005 ;; larger than (beg end).
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1006 (setq c-new-BEG beg
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1007 c-new-END end)
107086
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
1008 (if c-get-state-before-change-functions
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
1009 (mapc (lambda (fn)
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
1010 (funcall fn beg end))
1786f2e6a856 Change strategy for marking < and > as template delimiters: mark them
Alan Mackenzie <acm@muc.de>
parents: 106815
diff changeset
1011 c-get-state-before-change-functions))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1012 ))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1013
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1014 (defun c-after-change (beg end old-len)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1015 ;; Function put on `after-change-functions' to adjust various caches
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1016 ;; etc. Prefer speed to finesse here, since there will be an order
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1017 ;; of magnitude more calls to this function than any of the
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1018 ;; functions that use the caches.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1019 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1020 ;; Note that care must be taken so that this is called before any
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1021 ;; font-lock callbacks since we might get calls to functions using
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1022 ;; these caches from inside them, and we must thus be sure that this
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1023 ;; has already been executed.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1024 ;;
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1025 ;; This calls the language variable c-before-font-lock-function, if non nil.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1026 ;; This typically sets `syntax-table' properties.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1027
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1028 (c-save-buffer-state ()
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1029 ;; When `combine-after-change-calls' is used we might get calls
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1030 ;; with regions outside the current narrowing. This has been
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1031 ;; observed in Emacs 20.7.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1032 (save-restriction
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1033 (save-match-data ; c-recognize-<>-arglists changes match-data
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1034 (widen)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1035
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1036 (when (> end (point-max))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1037 ;; Some emacsen might return positions past the end. This has been
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1038 ;; observed in Emacs 20.7 when rereading a buffer changed on disk
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1039 ;; (haven't been able to minimize it, but Emacs 21.3 appears to
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1040 ;; work).
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1041 (setq end (point-max))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1042 (when (> beg end)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1043 (setq beg end)))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1044
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1045 (c-trim-found-types beg end old-len) ; maybe we don't need all of these.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1046 (c-invalidate-sws-region-after beg end)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1047 (c-invalidate-state-cache beg)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1048 (c-invalidate-find-decl-cache beg)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1049
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1050 (when c-recognize-<>-arglists
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1051 (c-after-change-check-<>-operators beg end))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1052
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1053 (if c-before-font-lock-function
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1054 (save-excursion
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1055 (funcall c-before-font-lock-function beg end old-len)))))))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1056
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1057 (defun c-after-font-lock-init ()
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1058 ;; Put on `font-lock-mode-hook'.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1059 (remove-hook 'after-change-functions 'c-after-change t)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1060 (add-hook 'after-change-functions 'c-after-change nil t))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1061
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1062 (defun c-font-lock-init ()
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1063 "Set up the font-lock variables for using the font-lock support in CC Mode.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1064 This does not load the font-lock package. Use after
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1065 `c-basic-common-init' and after cc-fonts has been loaded."
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1066
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1067 (make-local-variable 'font-lock-defaults)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1068 (setq font-lock-defaults
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1069 `(,(if (c-major-mode-is 'awk-mode)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1070 ;; awk-mode currently has only one font lock level.
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1071 'awk-font-lock-keywords
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1072 (mapcar 'c-mode-symbol
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1073 '("font-lock-keywords" "font-lock-keywords-1"
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1074 "font-lock-keywords-2" "font-lock-keywords-3")))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1075 nil nil
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1076 ,c-identifier-syntax-modifications
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1077 c-beginning-of-syntax
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1078 (font-lock-mark-block-function
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1079 . c-mark-function)))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1080
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1081 (make-local-hook 'font-lock-mode-hook)
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1082 (add-hook 'font-lock-mode-hook 'c-after-font-lock-init nil t))
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1083
80459
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1084 (defun c-extend-after-change-region (beg end old-len)
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1085 "Extend the region to be fontified, if necessary."
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1086 ;; Note: the parameters are ignored here. This somewhat indirect
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1087 ;; implementation exists because it is minimally different from the
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1088 ;; stand-alone CC Mode which, lacking
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1089 ;; font-lock-extend-after-change-region-function, is forced to use advice
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1090 ;; instead.
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1091 ;;
103260
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
1092 ;; Of the seven CC Mode languages, currently (2009-05) only C, C++, Objc
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
1093 ;; (the languages with #define) and AWK Mode make non-null use of this
864eb5478bfc cc-mode.el (c-extend-and-neutralize-CPP-line): Renamed from
Alan Mackenzie <acm@muc.de>
parents: 101688
diff changeset
1094 ;; function.
80459
9b3c86e7f6b0 (c-extend-after-change-region): New function, used in
Alan Mackenzie <acm@muc.de>
parents: 80258
diff changeset
1095 (cons c-new-BEG c-new-END))
80160
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1096
3ca9638d2306 Set of changes so that "obtrusive" syntactic elements in a
Alan Mackenzie <acm@muc.de>
parents: 79717
diff changeset
1097
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1098 ;; Support for C
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1099
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1100 ;;;###autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1101 (defvar c-mode-syntax-table nil
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1102 "Syntax table used in c-mode buffers.")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1103 (or c-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1104 (setq c-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1105 (funcall (c-lang-const c-make-mode-syntax-table c))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1106
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1107 (defvar c-mode-abbrev-table nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1108 "Abbreviation table used in c-mode buffers.")
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1109 (c-define-abbrev-table 'c-mode-abbrev-table
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1110 '(("else" "else" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1111 ("while" "while" c-electric-continued-statement 0)))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1112
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1113 (defvar c-mode-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1114 "Keymap used in c-mode buffers.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1115 (if c-mode-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1116 nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1117 (setq c-mode-map (c-make-inherited-keymap))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1118 ;; add bindings which are only useful for C
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1119 (define-key c-mode-map "\C-c\C-e" 'c-macro-expand)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1120 )
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1121
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1122 (easy-menu-define c-c-menu c-mode-map "C Mode Commands"
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1123 (cons "C" (c-lang-const c-mode-menu c)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1124
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1125 ;; In XEmacs >= 21.5 modes should add their own entries to
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1126 ;; `auto-mode-alist'. The comment form of autoload is used to avoid
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1127 ;; doing this on load. That since `add-to-list' prepends the value
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1128 ;; which could cause it to clobber user settings. Later emacsen have
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1129 ;; an append option, but it's not safe to use.
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1130
101688
2af7c063ac90 # Fix a typo.
Alan Mackenzie <acm@muc.de>
parents: 101112
diff changeset
1131 ;; The extension ".C" is associated with C++ while the lowercase
2af7c063ac90 # Fix a typo.
Alan Mackenzie <acm@muc.de>
parents: 101112
diff changeset
1132 ;; variant goes with C. On case insensitive file systems, this means
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1133 ;; that ".c" files also might open C++ mode if the C++ entry comes
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1134 ;; first on `auto-mode-alist'. Thus we try to ensure that ".C" comes
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1135 ;; after ".c", and since `add-to-list' adds the entry first we have to
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1136 ;; add the ".C" entry first.
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1137 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.\\(cc\\|hh\\)\\'" . c++-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1138 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.[ch]\\(pp\\|xx\\|\\+\\+\\)\\'" . c++-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1139 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.\\(CC?\\|HH?\\)\\'" . c++-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1140
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1141 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.[ch]\\'" . c-mode))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1142
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1143 ;; NB: The following two associate yacc and lex files to C Mode, which
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1144 ;; is not really suitable for those formats. Anyway, afaik there's
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1145 ;; currently no better mode for them, and besides this is legacy.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1146 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.y\\(acc\\)?\\'" . c-mode))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1147 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.lex\\'" . c-mode))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1148
96966
729f146c194c (auto-mode-alist): Add .i and .ii files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 96384
diff changeset
1149 ;; Preprocessed files generated by C and C++ compilers.
729f146c194c (auto-mode-alist): Add .i and .ii files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 96384
diff changeset
1150 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.i\\'" . c-mode))
729f146c194c (auto-mode-alist): Add .i and .ii files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 96384
diff changeset
1151 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.ii\\'" . c++-mode))
729f146c194c (auto-mode-alist): Add .i and .ii files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 96384
diff changeset
1152
729f146c194c (auto-mode-alist): Add .i and .ii files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 96384
diff changeset
1153
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1154 ;;;###autoload
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1155 (defun c-mode ()
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1156 "Major mode for editing K&R and ANSI C code.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1157 To submit a problem report, enter `\\[c-submit-bug-report]' from a
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1158 c-mode buffer. This automatically sets up a mail buffer with version
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1159 information already added. You just need to add a description of the
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1160 problem, including a reproducible test case, and send the message.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1161
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1162 To see what version of CC Mode you are running, enter `\\[c-version]'.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1163
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1164 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1165 initialization, then `c-mode-hook'.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1166
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1167 Key bindings:
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1168 \\{c-mode-map}"
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1169 (interactive)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1170 (kill-all-local-variables)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1171 (c-initialize-cc-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1172 (set-syntax-table c-mode-syntax-table)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1173 (setq major-mode 'c-mode
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1174 mode-name "C"
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1175 local-abbrev-table c-mode-abbrev-table
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1176 abbrev-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1177 (use-local-map c-mode-map)
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
1178 (c-init-language-vars-for 'c-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1179 (c-common-init 'c-mode)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1180 (easy-menu-add c-c-menu)
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1181 (cc-imenu-init cc-imenu-c-generic-expression)
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
1182 (c-run-mode-hooks 'c-mode-common-hook 'c-mode-hook)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1183 (c-update-modeline))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1184
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1185
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1186 ;; Support for C++
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1187
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1188 ;;;###autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1189 (defvar c++-mode-syntax-table nil
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1190 "Syntax table used in c++-mode buffers.")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1191 (or c++-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1192 (setq c++-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1193 (funcall (c-lang-const c-make-mode-syntax-table c++))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1194
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1195 (defvar c++-mode-abbrev-table nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1196 "Abbreviation table used in c++-mode buffers.")
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1197 (c-define-abbrev-table 'c++-mode-abbrev-table
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1198 '(("else" "else" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1199 ("while" "while" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1200 ("catch" "catch" c-electric-continued-statement 0)))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1201
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1202 (defvar c++-mode-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1203 "Keymap used in c++-mode buffers.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1204 (if c++-mode-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1205 nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1206 (setq c++-mode-map (c-make-inherited-keymap))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1207 ;; add bindings which are only useful for C++
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1208 (define-key c++-mode-map "\C-c\C-e" 'c-macro-expand)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1209 (define-key c++-mode-map "\C-c:" 'c-scope-operator)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1210 (define-key c++-mode-map "<" 'c-electric-lt-gt)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1211 (define-key c++-mode-map ">" 'c-electric-lt-gt))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1212
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1213 (easy-menu-define c-c++-menu c++-mode-map "C++ Mode Commands"
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1214 (cons "C++" (c-lang-const c-mode-menu c++)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1215
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1216 ;;;###autoload
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1217 (defun c++-mode ()
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1218 "Major mode for editing C++ code.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1219 To submit a problem report, enter `\\[c-submit-bug-report]' from a
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1220 c++-mode buffer. This automatically sets up a mail buffer with
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1221 version information already added. You just need to add a description
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1222 of the problem, including a reproducible test case, and send the
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1223 message.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1224
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1225 To see what version of CC Mode you are running, enter `\\[c-version]'.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1226
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1227 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1228 initialization, then `c++-mode-hook'.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1229
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1230 Key bindings:
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1231 \\{c++-mode-map}"
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1232 (interactive)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1233 (kill-all-local-variables)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1234 (c-initialize-cc-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1235 (set-syntax-table c++-mode-syntax-table)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1236 (setq major-mode 'c++-mode
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1237 mode-name "C++"
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1238 local-abbrev-table c++-mode-abbrev-table
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1239 abbrev-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1240 (use-local-map c++-mode-map)
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
1241 (c-init-language-vars-for 'c++-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1242 (c-common-init 'c++-mode)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1243 (easy-menu-add c-c++-menu)
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1244 (cc-imenu-init cc-imenu-c++-generic-expression)
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
1245 (c-run-mode-hooks 'c-mode-common-hook 'c++-mode-hook)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1246 (c-update-modeline))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1247
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1248
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1249 ;; Support for Objective-C
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1250
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1251 ;;;###autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1252 (defvar objc-mode-syntax-table nil
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1253 "Syntax table used in objc-mode buffers.")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1254 (or objc-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1255 (setq objc-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1256 (funcall (c-lang-const c-make-mode-syntax-table objc))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1257
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1258 (defvar objc-mode-abbrev-table nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1259 "Abbreviation table used in objc-mode buffers.")
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1260 (c-define-abbrev-table 'objc-mode-abbrev-table
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1261 '(("else" "else" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1262 ("while" "while" c-electric-continued-statement 0)))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1263
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1264 (defvar objc-mode-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1265 "Keymap used in objc-mode buffers.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1266 (if objc-mode-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1267 nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1268 (setq objc-mode-map (c-make-inherited-keymap))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1269 ;; add bindings which are only useful for Objective-C
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1270 (define-key objc-mode-map "\C-c\C-e" 'c-macro-expand))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1271
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1272 (easy-menu-define c-objc-menu objc-mode-map "ObjC Mode Commands"
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1273 (cons "ObjC" (c-lang-const c-mode-menu objc)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1274
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1275 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.m\\'" . objc-mode))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1276
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1277 ;;;###autoload
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1278 (defun objc-mode ()
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1279 "Major mode for editing Objective C code.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1280 To submit a problem report, enter `\\[c-submit-bug-report]' from an
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1281 objc-mode buffer. This automatically sets up a mail buffer with
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1282 version information already added. You just need to add a description
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1283 of the problem, including a reproducible test case, and send the
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1284 message.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1285
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1286 To see what version of CC Mode you are running, enter `\\[c-version]'.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1287
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1288 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1289 initialization, then `objc-mode-hook'.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1290
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1291 Key bindings:
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1292 \\{objc-mode-map}"
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1293 (interactive)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1294 (kill-all-local-variables)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1295 (c-initialize-cc-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1296 (set-syntax-table objc-mode-syntax-table)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1297 (setq major-mode 'objc-mode
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1298 mode-name "ObjC"
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1299 local-abbrev-table objc-mode-abbrev-table
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1300 abbrev-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1301 (use-local-map objc-mode-map)
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
1302 (c-init-language-vars-for 'objc-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1303 (c-common-init 'objc-mode)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1304 (easy-menu-add c-objc-menu)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1305 (cc-imenu-init nil 'cc-imenu-objc-function)
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
1306 (c-run-mode-hooks 'c-mode-common-hook 'objc-mode-hook)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1307 (c-update-modeline))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1308
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1309
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1310 ;; Support for Java
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1311
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1312 ;;;###autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1313 (defvar java-mode-syntax-table nil
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1314 "Syntax table used in java-mode buffers.")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1315 (or java-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1316 (setq java-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1317 (funcall (c-lang-const c-make-mode-syntax-table java))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1318
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1319 (defvar java-mode-abbrev-table nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1320 "Abbreviation table used in java-mode buffers.")
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1321 (c-define-abbrev-table 'java-mode-abbrev-table
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1322 '(("else" "else" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1323 ("while" "while" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1324 ("catch" "catch" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1325 ("finally" "finally" c-electric-continued-statement 0)))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1326
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1327 (defvar java-mode-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1328 "Keymap used in java-mode buffers.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1329 (if java-mode-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1330 nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1331 (setq java-mode-map (c-make-inherited-keymap))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1332 ;; add bindings which are only useful for Java
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1333 )
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1334
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1335 ;; Regexp trying to describe the beginning of a Java top-level
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1336 ;; definition. This is not used by CC Mode, nor is it maintained
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1337 ;; since it's practically impossible to write a regexp that reliably
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1338 ;; matches such a construct. Other tools are necessary.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1339 (defconst c-Java-defun-prompt-regexp
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1340 "^[ \t]*\\(\\(\\(public\\|protected\\|private\\|const\\|abstract\\|synchronized\\|final\\|static\\|threadsafe\\|transient\\|native\\|volatile\\)\\s-+\\)*\\(\\(\\([[a-zA-Z][][_$.a-zA-Z0-9]*[][_$.a-zA-Z0-9]+\\|[[a-zA-Z]\\)\\s-*\\)\\s-+\\)\\)?\\(\\([[a-zA-Z][][_$.a-zA-Z0-9]*\\s-+\\)\\s-*\\)?\\([_a-zA-Z][^][ \t:;.,{}()=]*\\|\\([_$a-zA-Z][_$.a-zA-Z0-9]*\\)\\)\\s-*\\(([^);{}]*)\\)?\\([] \t]*\\)\\(\\s-*\\<throws\\>\\s-*\\(\\([_$a-zA-Z][_$.a-zA-Z0-9]*\\)[, \t\n\r\f\v]*\\)+\\)?\\s-*")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1341
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1342 (easy-menu-define c-java-menu java-mode-map "Java Mode Commands"
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1343 (cons "Java" (c-lang-const c-mode-menu java)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1344
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1345 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.java\\'" . java-mode))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1346
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1347 ;;;###autoload
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1348 (defun java-mode ()
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1349 "Major mode for editing Java code.
20135
ecb78a6ccd8d (objc-mode): Bind imenu-create-index-function
Karl Heuer <kwzh@gnu.org>
parents: 19808
diff changeset
1350 To submit a problem report, enter `\\[c-submit-bug-report]' from a
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1351 java-mode buffer. This automatically sets up a mail buffer with
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1352 version information already added. You just need to add a description
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1353 of the problem, including a reproducible test case, and send the
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1354 message.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1355
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1356 To see what version of CC Mode you are running, enter `\\[c-version]'.
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1357
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1358 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1359 initialization, then `java-mode-hook'.
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1360
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1361 Key bindings:
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1362 \\{java-mode-map}"
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1363 (interactive)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1364 (kill-all-local-variables)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1365 (c-initialize-cc-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1366 (set-syntax-table java-mode-syntax-table)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1367 (setq major-mode 'java-mode
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1368 mode-name "Java"
30401
b85ee58b24ec (c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents: 26817
diff changeset
1369 local-abbrev-table java-mode-abbrev-table
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1370 abbrev-mode t)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1371 (use-local-map java-mode-map)
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
1372 (c-init-language-vars-for 'java-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1373 (c-common-init 'java-mode)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1374 (easy-menu-add c-java-menu)
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1375 (cc-imenu-init cc-imenu-java-generic-expression)
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
1376 (c-run-mode-hooks 'c-mode-common-hook 'java-mode-hook)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1377 (c-update-modeline))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1378
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1379
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1380 ;; Support for CORBA's IDL language
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1381
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1382 ;;;###autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1383 (defvar idl-mode-syntax-table nil
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1384 "Syntax table used in idl-mode buffers.")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1385 (or idl-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1386 (setq idl-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1387 (funcall (c-lang-const c-make-mode-syntax-table idl))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1388
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1389 (defvar idl-mode-abbrev-table nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1390 "Abbreviation table used in idl-mode buffers.")
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1391 (c-define-abbrev-table 'idl-mode-abbrev-table nil)
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1392
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1393 (defvar idl-mode-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1394 "Keymap used in idl-mode buffers.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1395 (if idl-mode-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1396 nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1397 (setq idl-mode-map (c-make-inherited-keymap))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1398 ;; add bindings which are only useful for IDL
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1399 )
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1400
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1401 (easy-menu-define c-idl-menu idl-mode-map "IDL Mode Commands"
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1402 (cons "IDL" (c-lang-const c-mode-menu idl)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1403
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1404 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.idl\\'" . idl-mode))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1405
19253
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1406 ;;;###autoload
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1407 (defun idl-mode ()
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1408 "Major mode for editing CORBA's IDL, PSDL and CIDL code.
19253
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1409 To submit a problem report, enter `\\[c-submit-bug-report]' from an
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1410 idl-mode buffer. This automatically sets up a mail buffer with
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1411 version information already added. You just need to add a description
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1412 of the problem, including a reproducible test case, and send the
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1413 message.
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1414
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1415 To see what version of CC Mode you are running, enter `\\[c-version]'.
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1416
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1417 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1418 initialization, then `idl-mode-hook'.
19253
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1419
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1420 Key bindings:
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1421 \\{idl-mode-map}"
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1422 (interactive)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1423 (kill-all-local-variables)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1424 (c-initialize-cc-mode t)
19253
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1425 (set-syntax-table idl-mode-syntax-table)
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1426 (setq major-mode 'idl-mode
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1427 mode-name "IDL"
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1428 local-abbrev-table idl-mode-abbrev-table)
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1429 (use-local-map idl-mode-map)
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
1430 (c-init-language-vars-for 'idl-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1431 (c-common-init 'idl-mode)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1432 (easy-menu-add c-idl-menu)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1433 ;;(cc-imenu-init cc-imenu-idl-generic-expression) ;TODO
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
1434 (c-run-mode-hooks 'c-mode-common-hook 'idl-mode-hook)
19253
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1435 (c-update-modeline))
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1436
2bda7e07f25d (idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents: 18847
diff changeset
1437
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1438 ;; Support for Pike
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1439
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1440 ;;;###autoload
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1441 (defvar pike-mode-syntax-table nil
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1442 "Syntax table used in pike-mode buffers.")
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1443 (or pike-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1444 (setq pike-mode-syntax-table
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1445 (funcall (c-lang-const c-make-mode-syntax-table pike))))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1446
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1447 (defvar pike-mode-abbrev-table nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1448 "Abbreviation table used in pike-mode buffers.")
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1449 (c-define-abbrev-table 'pike-mode-abbrev-table
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1450 '(("else" "else" c-electric-continued-statement 0)
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1451 ("while" "while" c-electric-continued-statement 0)))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1452
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1453 (defvar pike-mode-map ()
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1454 "Keymap used in pike-mode buffers.")
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1455 (if pike-mode-map
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1456 nil
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1457 (setq pike-mode-map (c-make-inherited-keymap))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1458 ;; additional bindings
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1459 (define-key pike-mode-map "\C-c\C-e" 'c-macro-expand))
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1460
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1461 (easy-menu-define c-pike-menu pike-mode-map "Pike Mode Commands"
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1462 (cons "Pike" (c-lang-const c-mode-menu pike)))
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1463
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1464 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.\\(u?lpc\\|pike\\|pmod\\(.in\\)?\\)\\'" . pike-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1465 ;;;###autoload (add-to-list 'interpreter-mode-alist '("pike" . pike-mode))
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1466
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1467 ;;;###autoload
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1468 (defun pike-mode ()
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1469 "Major mode for editing Pike code.
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1470 To submit a problem report, enter `\\[c-submit-bug-report]' from a
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1471 pike-mode buffer. This automatically sets up a mail buffer with
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1472 version information already added. You just need to add a description
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1473 of the problem, including a reproducible test case, and send the
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1474 message.
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1475
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1476 To see what version of CC Mode you are running, enter `\\[c-version]'.
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1477
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1478 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1479 initialization, then `pike-mode-hook'.
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1480
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1481 Key bindings:
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1482 \\{pike-mode-map}"
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1483 (interactive)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1484 (kill-all-local-variables)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1485 (c-initialize-cc-mode t)
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1486 (set-syntax-table pike-mode-syntax-table)
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1487 (setq major-mode 'pike-mode
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1488 mode-name "Pike"
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1489 local-abbrev-table pike-mode-abbrev-table
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1490 abbrev-mode t)
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1491 (use-local-map pike-mode-map)
52108
5a4fdabed57e 2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 51747
diff changeset
1492 (c-init-language-vars-for 'pike-mode)
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1493 (c-common-init 'pike-mode)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1494 (easy-menu-add c-pike-menu)
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1495 ;;(cc-imenu-init cc-imenu-pike-generic-expression) ;TODO
62641
27b53b1903b6 2005-05-23 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents: 62046
diff changeset
1496 (c-run-mode-hooks 'c-mode-common-hook 'pike-mode-hook)
24282
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1497 (c-update-modeline))
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1498
5b0864259a4b Installed CC Mode 5.25.
Barry A. Warsaw <barry@zope.org>
parents: 21109
diff changeset
1499
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1500 ;; Support for AWK
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1501
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1502 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.awk\\'" . awk-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1503 ;;;###autoload (add-to-list 'interpreter-mode-alist '("awk" . awk-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1504 ;;;###autoload (add-to-list 'interpreter-mode-alist '("mawk" . awk-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1505 ;;;###autoload (add-to-list 'interpreter-mode-alist '("nawk" . awk-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1506 ;;;###autoload (add-to-list 'interpreter-mode-alist '("gawk" . awk-mode))
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1507
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1508 ;;; Autoload directives must be on the top level, so we construct an
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1509 ;;; autoload form instead.
58747
e3dfd80003ea (awk-mode autoload): Supply t meaning interactive function.
Richard M. Stallman <rms@gnu.org>
parents: 58198
diff changeset
1510 ;;;###autoload (autoload 'awk-mode "cc-mode" "Major mode for editing AWK code." t)
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1511
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1512 (defvar awk-mode-abbrev-table nil
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1513 "Abbreviation table used in awk-mode buffers.")
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1514 (c-define-abbrev-table 'awk-mode-abbrev-table
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1515 '(("else" "else" c-electric-continued-statement 0)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1516 ("while" "while" c-electric-continued-statement 0)))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1517
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1518 (defvar awk-mode-map ()
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1519 "Keymap used in awk-mode buffers.")
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1520 (if awk-mode-map
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1521 nil
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1522 (setq awk-mode-map (c-make-inherited-keymap))
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1523 ;; add bindings which are only useful for awk.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1524 (define-key awk-mode-map "#" 'self-insert-command)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1525 (define-key awk-mode-map "/" 'self-insert-command)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1526 (define-key awk-mode-map "*" 'self-insert-command)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1527 (define-key awk-mode-map "\C-c\C-n" 'undefined) ; #if doesn't exist in awk.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1528 (define-key awk-mode-map "\C-c\C-p" 'undefined)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1529 (define-key awk-mode-map "\C-c\C-u" 'undefined)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1530 (define-key awk-mode-map "\M-a" 'c-beginning-of-statement) ; 2003/10/7
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1531 (define-key awk-mode-map "\M-e" 'c-end-of-statement) ; 2003/10/7
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1532 (define-key awk-mode-map "\C-\M-a" 'c-awk-beginning-of-defun)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1533 (define-key awk-mode-map "\C-\M-e" 'c-awk-end-of-defun))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1534
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1535 (easy-menu-define c-awk-menu awk-mode-map "AWK Mode Commands"
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1536 (cons "AWK" (c-lang-const c-mode-menu awk)))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1537
94998
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
1538 ;; (require 'cc-awk) brings these in.
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
1539 (defvar awk-mode-syntax-table)
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
1540 (declare-function c-awk-unstick-NL-prop "cc-awk" ())
3f4cdd183536 (declare-function): Add compat definition.
Glenn Morris <rgm@gnu.org>
parents: 94673
diff changeset
1541
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1542 (defun awk-mode ()
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1543 "Major mode for editing AWK code.
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1544 To submit a problem report, enter `\\[c-submit-bug-report]' from an
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1545 awk-mode buffer. This automatically sets up a mail buffer with version
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1546 information already added. You just need to add a description of the
51747
b4fb79bf98ba Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents: 51714
diff changeset
1547 problem, including a reproducible test case, and send the message.
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1548
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1549 To see what version of CC Mode you are running, enter `\\[c-version]'.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1550
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1551 The hook `c-mode-common-hook' is run with no args at mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1552 initialization, then `awk-mode-hook'.
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1553
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1554 Key bindings:
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1555 \\{awk-mode-map}"
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1556 (interactive)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1557 (require 'cc-awk) ; Added 2003/6/10.
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1558 (kill-all-local-variables)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1559 (c-initialize-cc-mode t)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1560 (set-syntax-table awk-mode-syntax-table)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1561 (setq major-mode 'awk-mode
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1562 mode-name "AWK"
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1563 local-abbrev-table awk-mode-abbrev-table
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1564 abbrev-mode t)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1565 (use-local-map awk-mode-map)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1566 (c-init-language-vars-for 'awk-mode)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1567 (c-common-init 'awk-mode)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1568 (c-awk-unstick-NL-prop)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1569
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1570 ;; Prevent Xemacs's buffer-syntactic-context being used. See the comment
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1571 ;; in cc-engine.el, just before (defun c-fast-in-literal ...
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1572 (defalias 'c-in-literal 'c-slow-in-literal)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1573
67252
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1574 (c-run-mode-hooks 'c-mode-common-hook 'awk-mode-hook)
04d2abb755d9 Update CC Mode to release 5.31.
Alan Mackenzie <acm@muc.de>
parents: 65812
diff changeset
1575 (c-update-modeline))
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1576
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1577
20146
d7ea5d1fa91b (c-submit-bug-report): Remove
Karl Heuer <kwzh@gnu.org>
parents: 20135
diff changeset
1578 ;; bug reporting
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1579
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1580 (defconst c-mode-help-address
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1581 "bug-cc-mode@gnu.org"
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1582 "Address(es) for CC Mode bug reports.")
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1583
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1584 (defun c-version ()
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1585 "Echo the current version of CC Mode in the minibuffer."
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1586 (interactive)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1587 (message "Using CC Mode version %s" c-version)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1588 (c-keep-region-active))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1589
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1590 (defvar c-prepare-bug-report-hooks nil)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1591
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1592 ;; Dynamic variables used by reporter.
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1593 (defvar reporter-prompt-for-summary-p)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1594 (defvar reporter-dont-compact-list)
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1595
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1596 (defun c-submit-bug-report ()
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1597 "Submit via mail a bug report on CC Mode."
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1598 (interactive)
20917
c6e2c4d9a305 (c-mode, c++-mode, objc-mode, java-mode): Set
Richard M. Stallman <rms@gnu.org>
parents: 20459
diff changeset
1599 (require 'reporter)
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1600 ;; load in reporter
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1601 (let ((reporter-prompt-for-summary-p t)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1602 (reporter-dont-compact-list '(c-offsets-alist))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1603 (style c-indentation-style)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1604 (c-features c-emacs-features))
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1605 (and
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1606 (if (y-or-n-p "Do you want to submit a report on CC Mode? ")
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1607 t (message "") nil)
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1608 (reporter-submit-bug-report
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1609 c-mode-help-address
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1610 (concat "CC Mode " c-version " (" mode-name ")")
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1611 (let ((vars (append
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1612 c-style-variables
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1613 '(c-buffer-is-cc-mode
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1614 c-tab-always-indent
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1615 c-syntactic-indentation
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1616 c-syntactic-indentation-in-macros
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1617 c-ignore-auto-fill
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1618 c-auto-align-backslashes
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1619 c-backspace-function
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1620 c-delete-function
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1621 c-electric-pound-behavior
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1622 c-default-style
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1623 c-enable-xemacs-performance-kludge-p
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1624 c-old-style-variable-behavior
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1625 defun-prompt-regexp
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1626 tab-width
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1627 comment-column
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1628 parse-sexp-ignore-comments
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1629 parse-sexp-lookup-properties
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1630 lookup-syntax-properties
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1631 ;; A brain-damaged XEmacs only variable that, if
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1632 ;; set to nil can cause all kinds of chaos.
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1633 signal-error-on-buffer-boundary
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1634 ;; Variables that affect line breaking and comments.
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1635 auto-fill-mode
30401
b85ee58b24ec (c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents: 26817
diff changeset
1636 auto-fill-function
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1637 filladapt-mode
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1638 comment-multi-line
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1639 comment-start-skip
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1640 fill-prefix
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1641 fill-column
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1642 paragraph-start
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1643 adaptive-fill-mode
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1644 adaptive-fill-regexp)
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1645 nil)))
85185
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1646 (mapc (lambda (var) (unless (boundp var)
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1647 (setq vars (delq var vars))))
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1648 '(signal-error-on-buffer-boundary
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1649 filladapt-mode
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1650 defun-prompt-regexp
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1651 font-lock-mode
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1652 font-lock-maximum-decoration
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1653 parse-sexp-lookup-properties
264b4ccf31a8 (c-postprocess-file-styles)
Glenn Morris <rgm@gnu.org>
parents: 84840
diff changeset
1654 lookup-syntax-properties))
26817
03befb219d03 Installed version 5.26
Gerd Moellmann <gerd@gnu.org>
parents: 24282
diff changeset
1655 vars)
41592
b89d0c514129 (c-submit-bug-report): Make sure that the arguments to `insert' are strings.
Sam Steingold <sds@gnu.org>
parents: 37563
diff changeset
1656 (lambda ()
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1657 (run-hooks 'c-prepare-bug-report-hooks)
51714
bc91cbf50c24 Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents: 51620
diff changeset
1658 (insert (format "Buffer Style: %s\nc-emacs-features: %s\n"
44728
7a3ac6c387fe CC Mode update to version 5.29. This is for testing; it's not a released
Martin Stjernholm <mast@lysator.liu.se>
parents: 42390
diff changeset
1659 style c-features)))))))
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1660
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1661
36920
32a4317c6aa5 Update to version 5.28.
Gerd Moellmann <gerd@gnu.org>
parents: 34304
diff changeset
1662 (cc-provide 'cc-mode)
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 52108
diff changeset
1663
93975
1e3a407766b9 Fix up comment convention on the arch-tag lines.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 93802
diff changeset
1664 ;; arch-tag: 7825e5c4-fd09-439f-a04d-4c13208ba3d7
18720
fc6d08b9bbe2 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1665 ;;; cc-mode.el ends here