Mercurial > emacs
annotate lisp/progmodes/cc-mode.el @ 62047:71210632feca
(cc-define-list-program): Remove this
recent addition.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Tue, 03 May 2005 06:45:54 +0000 |
parents | cff3c2be0762 |
children | 27b53b1903b6 |
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 | 2 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
3 ;; Copyright (C) 1985,1987,1992-2003 Free Software Foundation, Inc. |
18720 | 4 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
5 ;; Authors: 2003- Alan Mackenzie |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
6 ;; 1998- Martin Stjernholm |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
7 ;; 1992-1999 Barry A. Warsaw |
18720 | 8 ;; 1987 Dave Detlefs and Stewart Clamen |
9 ;; 1985 Richard M. Stallman | |
24282 | 10 ;; Maintainer: bug-cc-mode@gnu.org |
18720 | 11 ;; Created: a long, long, time ago. adapted from the original c-mode.el |
12 ;; Keywords: c languages oop | |
13 | |
14 ;; This file is part of GNU Emacs. | |
15 | |
16 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
17 ;; it under the terms of the GNU General Public License as published by | |
18 ;; the Free Software Foundation; either version 2, or (at your option) | |
19 ;; any later version. | |
20 | |
21 ;; GNU Emacs is distributed in the hope that it will be useful, | |
22 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
23 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
24 ;; GNU General Public License for more details. | |
25 | |
26 ;; You should have received a copy of the GNU General Public License | |
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
|
27 ;; along with GNU Emacs; see the file COPYING. If not, write to |
36920 | 28 ;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
18720 | 29 ;; Boston, MA 02111-1307, USA. |
30 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
31 ;;; Commentary: |
36920 | 32 |
33 ;; NOTE: Read the commentary below for the right way to submit bug reports! | |
34 ;; 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
|
35 ;; Note: The version string is in cc-defs. |
18720 | 36 |
37 ;; 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
|
38 ;; 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
|
39 ;; 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
|
40 ;; 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
|
41 ;; should be spelled exactly this way. |
24282 | 42 |
43 ;; 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
|
44 ;; 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
|
45 ;; 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
|
46 ;; 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
|
47 ;; 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
|
48 ;; contained in an accompanying texinfo manual. |
18720 | 49 |
50 ;; CC Mode's immediate ancestors were, c++-mode.el, cplus-md.el, and | |
51 ;; cplus-md1.el.. | |
52 | |
53 ;; To submit bug reports, type "C-c C-b". These will be sent to | |
24282 | 54 ;; bug-gnu-emacs@gnu.org (mirrored as the Usenet newsgroup |
55 ;; gnu.emacs.bug) as well as bug-cc-mode@gnu.org, which directly | |
56 ;; contacts the CC Mode maintainers. Questions can sent to | |
57 ;; help-gnu-emacs@gnu.org (mirrored as gnu.emacs.help) and/or | |
36920 | 58 ;; bug-cc-mode@gnu.org. Please do not send bugs or questions to our |
59 ;; personal accounts; we reserve the right to ignore such email! | |
18720 | 60 |
61 ;; Many, many thanks go out to all the folks on the beta test list. | |
62 ;; Without their patience, testing, insight, code contributions, and | |
63 ;; encouragement CC Mode would be a far inferior package. | |
64 | |
65 ;; You can get the latest version of CC Mode, including PostScript | |
66 ;; documentation and separate individual files from: | |
67 ;; | |
30401
b85ee58b24ec
(c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents:
26817
diff
changeset
|
68 ;; http://cc-mode.sourceforge.net/ |
18720 | 69 ;; |
24282 | 70 ;; You can join a moderated CC Mode announcement-only mailing list by |
71 ;; visiting | |
72 ;; | |
30401
b85ee58b24ec
(c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents:
26817
diff
changeset
|
73 ;; http://lists.sourceforge.net/mailman/listinfo/cc-mode-announce |
18720 | 74 |
75 ;;; Code: | |
76 | |
26817 | 77 (eval-when-compile |
78 (let ((load-path | |
36920 | 79 (if (and (boundp 'byte-compile-dest-file) |
80 (stringp byte-compile-dest-file)) | |
81 (cons (file-name-directory byte-compile-dest-file) load-path) | |
26817 | 82 load-path))) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
83 (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
|
84 |
36920 | 85 (cc-require 'cc-defs) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
86 (cc-require-when-compile 'cc-langs) |
36920 | 87 (cc-require 'cc-vars) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
88 (cc-require 'cc-engine) |
36920 | 89 (cc-require 'cc-styles) |
90 (cc-require 'cc-cmds) | |
91 (cc-require 'cc-align) | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
92 (cc-require 'cc-menus) |
36920 | 93 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
94 ;; SILENCE the compiler. |
36920 | 95 (cc-bytecomp-defvar comment-line-break-function) ; (X)Emacs 20+ |
96 (cc-bytecomp-defvar adaptive-fill-first-line-regexp) ; Emacs 20+ | |
97 (cc-bytecomp-defun set-keymap-parents) ; XEmacs | |
98 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
99 ;; 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
|
100 ;; font-lock. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
101 (cc-bytecomp-defvar font-lock-defaults) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
102 (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
|
103 |
36920 | 104 ;; Menu support for both XEmacs and Emacs. If you don't have easymenu |
105 ;; 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
|
106 (cc-external-require 'easymenu) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
107 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
108 ;; 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
|
109 ;; necessary until font locking is requested. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
110 (eval-after-load "font-lock" |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
111 '(require 'cc-fonts)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
112 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
113 ;; 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
|
114 ;; directives for the interface functions. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
115 (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
|
116 (autoload 'c-init-language-vars "cc-langs" nil nil 'macro) |
18720 | 117 |
118 | |
18847
dd7615d21a97
(c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents:
18720
diff
changeset
|
119 ;; 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
|
120 ;; 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
|
121 ;; use: |
dd7615d21a97
(c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents:
18720
diff
changeset
|
122 ;; |
dd7615d21a97
(c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents:
18720
diff
changeset
|
123 ;; (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
|
124 ;; |
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
|
125 ;; 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
|
126 ;; |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
127 ;; (c-initialize-cc-mode t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
128 ;; (c-init-language-vars some-mode) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
129 ;; (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
|
130 ;; |
52108
5a4fdabed57e
2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents:
51747
diff
changeset
|
131 ;; 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
|
132 ;; 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
|
133 ;; 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
|
134 ;; '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
|
135 ;; `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
|
136 ;; 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
|
137 ;; |
5a4fdabed57e
2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents:
51747
diff
changeset
|
138 ;; 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
|
139 ;; `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
|
140 ;; |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
141 ;; 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
|
142 ;; 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
|
143 ;; derived-mode-ex.el>. |
18847
dd7615d21a97
(c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents:
18720
diff
changeset
|
144 |
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
|
145 (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
|
146 (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
|
147 |
52108
5a4fdabed57e
2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents:
51747
diff
changeset
|
148 (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
|
149 "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
|
150 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
|
151 `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
|
152 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
|
153 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
|
154 ;; This function does not do any hidden buffer changes. |
5a4fdabed57e
2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents:
51747
diff
changeset
|
155 (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
|
156 ((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
|
157 ((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
|
158 ((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
|
159 ((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
|
160 ((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
|
161 ((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
|
162 (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
|
163 |
19253
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
164 ;;;###autoload |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
165 (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
|
166 "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
|
167 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
|
168 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
|
169 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
|
170 `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
|
171 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
|
172 ;; |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
173 ;; This function does not do any hidden buffer changes. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
174 |
19299
7cd7373cc021
(c-initialize-cc-mode): Set c-buffer-is-cc-mode to t.
Richard M. Stallman <rms@gnu.org>
parents:
19253
diff
changeset
|
175 (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
|
176 |
24282 | 177 (let ((initprop 'cc-mode-is-initialized) |
178 c-initialization-ok) | |
179 (unless (get 'c-initialize-cc-mode initprop) | |
180 (unwind-protect | |
181 (progn | |
26817 | 182 (put 'c-initialize-cc-mode initprop t) |
183 (c-initialize-builtin-style) | |
24282 | 184 (run-hooks 'c-initialization-hook) |
26817 | 185 ;; Fix obsolete variables. |
186 (if (boundp 'c-comment-continuation-stars) | |
187 (setq c-block-comment-prefix 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
|
188 (add-hook 'change-major-mode-hook 'c-leave-cc-mode-mode) |
24282 | 189 (setq c-initialization-ok t)) |
190 ;; 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
|
191 (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
|
192 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
193 (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
|
194 (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
|
195 |
dd7615d21a97
(c-initialize-cc-mode): New function.
Richard M. Stallman <rms@gnu.org>
parents:
18720
diff
changeset
|
196 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
197 ;;; Common routines. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
198 |
36920 | 199 (defvar c-mode-base-map () |
200 "Keymap shared by all CC Mode related modes.") | |
201 | |
202 (defun c-make-inherited-keymap () | |
203 (let ((map (make-sparse-keymap))) | |
204 (cond | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
205 ;; XEmacs |
36920 | 206 ((fboundp 'set-keymap-parents) |
207 (set-keymap-parents map c-mode-base-map)) | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
208 ;; Emacs |
36920 | 209 ((fboundp 'set-keymap-parent) |
210 (set-keymap-parent map c-mode-base-map)) | |
211 ;; incompatible | |
212 (t (error "CC Mode is incompatible with this version of Emacs"))) | |
213 map)) | |
214 | |
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
|
215 (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
|
216 ;; 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
|
217 ;; sixth argument for SYSTEM-FLAG in emacsen that support it |
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
|
218 ;; (currently only Emacs 21.2). |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
219 (let ((table (or (symbol-value name) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
220 (progn (define-abbrev-table name nil) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
221 (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
|
222 (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
|
223 (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
|
224 (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
|
225 (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
|
226 (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
|
227 (setq defs (cdr defs))))) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
228 (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
|
229 |
36920 | 230 (if c-mode-base-map |
231 nil | |
232 ;; TBD: should we even worry about naming this keymap. My vote: no, | |
233 ;; because Emacs and XEmacs do it differently. | |
234 (setq c-mode-base-map (make-sparse-keymap)) | |
235 ;; put standard keybindings into MAP | |
236 ;; the following mappings correspond more or less directly to BOCM | |
237 (define-key c-mode-base-map "{" 'c-electric-brace) | |
238 (define-key c-mode-base-map "}" 'c-electric-brace) | |
239 (define-key c-mode-base-map ";" 'c-electric-semi&comma) | |
240 (define-key c-mode-base-map "#" 'c-electric-pound) | |
241 (define-key c-mode-base-map ":" 'c-electric-colon) | |
242 (define-key c-mode-base-map "(" 'c-electric-paren) | |
243 (define-key c-mode-base-map ")" 'c-electric-paren) | |
244 ;; Separate M-BS from C-M-h. The former should remain | |
245 ;; backward-kill-word. | |
246 (define-key c-mode-base-map [(control meta h)] 'c-mark-function) | |
247 (define-key c-mode-base-map "\e\C-q" 'c-indent-exp) | |
248 (substitute-key-definition 'backward-sentence | |
249 'c-beginning-of-statement | |
250 c-mode-base-map global-map) | |
251 (substitute-key-definition 'forward-sentence | |
252 'c-end-of-statement | |
253 c-mode-base-map global-map) | |
254 (substitute-key-definition 'indent-new-comment-line | |
255 'c-indent-new-comment-line | |
256 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
|
257 (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
|
258 ;; 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
|
259 ;; 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
|
260 (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
|
261 '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
|
262 c-mode-base-map global-map)) |
36920 | 263 ;; RMS says don't make these the default. |
264 ;; (define-key c-mode-base-map "\e\C-a" 'c-beginning-of-defun) | |
265 ;; (define-key c-mode-base-map "\e\C-e" 'c-end-of-defun) | |
266 (define-key c-mode-base-map "\C-c\C-n" 'c-forward-conditional) | |
267 (define-key c-mode-base-map "\C-c\C-p" 'c-backward-conditional) | |
268 (define-key c-mode-base-map "\C-c\C-u" 'c-up-conditional) | |
269 (substitute-key-definition 'indent-for-tab-command | |
270 'c-indent-command | |
271 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
|
272 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
273 ;; 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
|
274 ;; `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
|
275 ;; 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
|
276 ;; 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
|
277 ;; `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
|
278 ;; 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
|
279 ;; `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
|
280 ;; do the actual filling work. |
36920 | 281 (substitute-key-definition 'fill-paragraph 'c-fill-paragraph |
282 c-mode-base-map global-map) | |
283 ;; In XEmacs the default fill function is called | |
284 ;; fill-paragraph-or-region. | |
285 (substitute-key-definition 'fill-paragraph-or-region 'c-fill-paragraph | |
286 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
|
287 |
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
|
288 ;; 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
|
289 ;; 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
|
290 ;; 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
|
291 ;; 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
|
292 (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
|
293 (define-key c-mode-base-map "\177" 'c-electric-backspace) |
79039a33283a
Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents:
36920
diff
changeset
|
294 (when (boundp 'delete-key-deletes-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
|
295 ;; In XEmacs 20 and later we fix the forward and backward deletion |
79039a33283a
Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents:
36920
diff
changeset
|
296 ;; behavior by binding the keysyms for the [delete] and |
79039a33283a
Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents:
36920
diff
changeset
|
297 ;; [backspace] keys directly, and use `delete-forward-p' or |
79039a33283a
Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents:
36920
diff
changeset
|
298 ;; `delete-key-deletes-forward' to decide what [delete] should do. |
79039a33283a
Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents:
36920
diff
changeset
|
299 (define-key c-mode-base-map [delete] 'c-electric-delete) |
79039a33283a
Bind c-electric-delete-forward to C-d and c-electric-backspace to DEL.
Eli Zaretskii <eliz@gnu.org>
parents:
36920
diff
changeset
|
300 (define-key c-mode-base-map [backspace] 'c-electric-backspace)) |
36920 | 301 (define-key c-mode-base-map "," 'c-electric-semi&comma) |
302 (define-key c-mode-base-map "*" 'c-electric-star) | |
303 (define-key c-mode-base-map "/" 'c-electric-slash) | |
304 (define-key c-mode-base-map "\C-c\C-q" 'c-indent-defun) | |
305 (define-key c-mode-base-map "\C-c\C-\\" 'c-backslash-region) | |
306 (define-key c-mode-base-map "\C-c\C-a" 'c-toggle-auto-state) | |
307 (define-key c-mode-base-map "\C-c\C-b" 'c-submit-bug-report) | |
308 (define-key c-mode-base-map "\C-c\C-c" 'comment-region) | |
309 (define-key c-mode-base-map "\C-c\C-d" 'c-toggle-hungry-state) | |
310 (define-key c-mode-base-map "\C-c\C-o" 'c-set-offset) | |
311 (define-key c-mode-base-map "\C-c\C-s" 'c-show-syntactic-information) | |
312 (define-key c-mode-base-map "\C-c\C-t" 'c-toggle-auto-hungry-state) | |
313 (define-key c-mode-base-map "\C-c." 'c-set-style) | |
314 ;; conflicts with OOBR | |
315 ;;(define-key c-mode-base-map "\C-c\C-v" 'c-version) | |
316 ) | |
317 | |
318 ;; We don't require the outline package, but we configure it a bit anyway. | |
319 (cc-bytecomp-defvar outline-level) | |
320 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
321 (defun c-mode-menu (modestr) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
322 "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
|
323 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
|
324 instead of \"C\". |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
325 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
326 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
|
327 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
|
328 (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
|
329 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
330 ;; 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
|
331 ;; 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
|
332 ;; 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
|
333 ;; 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
|
334 (defalias 'c-populate-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
335 (cc-eval-when-compile |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
336 (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
|
337 (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
|
338 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
339 (defun c-after-change (beg end len) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
340 ;; Function put on `after-change-functions' to adjust various |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
341 ;; caches. Prefer speed to finesse here, since there will be an |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
342 ;; order of magnitude more calls to this function than any of the |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
343 ;; functions that use the caches. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
344 ;; |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
345 ;; Note that care must be taken so that this is called before any |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
346 ;; font-lock callbacks since we might get calls to functions using |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
347 ;; these caches from inside them, and we must thus be sure that this |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
348 ;; has already been executed. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
349 ;; |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
350 ;; This function does not do any hidden buffer changes. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
351 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
352 (c-save-buffer-state () |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
353 (when (> end (point-max)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
354 ;; Some emacsen might return positions past the end. This has been |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
355 ;; observed in Emacs 20.7 when rereading a buffer changed on disk |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
356 ;; (haven't been able to minimize it, but Emacs 21.3 appears to |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
357 ;; work). |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
358 (setq end (point-max)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
359 (when (> beg end) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
360 (setq beg end))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
361 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
362 (c-invalidate-sws-region-after beg end) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
363 (c-invalidate-state-cache beg) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
364 (c-invalidate-find-decl-cache beg))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
365 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
366 (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
|
367 "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
|
368 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
|
369 packages that embed CC Mode. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
370 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
371 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
|
372 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
|
373 same format as `c-default-style'. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
374 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
375 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
|
376 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
|
377 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
|
378 ;; |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
379 ;; This function does not do any hidden buffer changes. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
380 |
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
|
381 (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
|
382 |
36920 | 383 ;; these variables should always be buffer local; they do not affect |
384 ;; indentation style. | |
385 (make-local-variable 'parse-sexp-ignore-comments) | |
386 (make-local-variable 'indent-line-function) | |
387 (make-local-variable 'indent-region-function) | |
388 (make-local-variable 'normal-auto-fill-function) | |
389 (make-local-variable 'comment-start) | |
390 (make-local-variable 'comment-end) | |
391 (make-local-variable 'comment-start-skip) | |
392 (make-local-variable 'comment-multi-line) | |
393 (make-local-variable 'paragraph-start) | |
394 (make-local-variable 'paragraph-separate) | |
395 (make-local-variable 'paragraph-ignore-fill-prefix) | |
396 (make-local-variable 'adaptive-fill-mode) | |
397 (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
|
398 |
36920 | 399 ;; 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
|
400 (setq parse-sexp-ignore-comments t |
36920 | 401 indent-line-function 'c-indent-line |
402 indent-region-function 'c-indent-region | |
403 normal-auto-fill-function 'c-do-auto-fill | |
404 comment-multi-line t) | |
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
|
405 |
49654
b025ca405045
(c-basic-common-init): Install `c-fill-paragraph' on
Martin Stjernholm <mast@lysator.liu.se>
parents:
49496
diff
changeset
|
406 ;; 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
|
407 ;; 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
|
408 ;; 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
|
409 (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
|
410 (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
|
411 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
412 ;; (X)Emacs 20 and later. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
413 (when (boundp 'comment-line-break-function) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
414 (make-local-variable 'comment-line-break-function) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
415 (setq comment-line-break-function |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
416 'c-indent-new-comment-line)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
417 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
418 ;; Emacs 20 and later. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
419 (when (boundp 'parse-sexp-lookup-properties) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
420 (make-local-variable 'parse-sexp-lookup-properties) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
421 (setq parse-sexp-lookup-properties t)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
422 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
423 ;; Same as above for XEmacs 21 (although currently undocumented). |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
424 (when (boundp 'lookup-syntax-properties) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
425 (make-local-variable 'lookup-syntax-properties) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
426 (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
|
427 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
428 ;; Use this in Emacs 21 to avoid meddling with the rear-nonsticky |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
429 ;; property on each character. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
430 (when (boundp 'text-property-default-nonsticky) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
431 (make-local-variable 'text-property-default-nonsticky) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
432 (let ((elem (assq 'syntax-table text-property-default-nonsticky))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
433 (if elem |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
434 (setcdr elem t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
435 (setq text-property-default-nonsticky |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
436 (cons '(syntax-table . t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
437 text-property-default-nonsticky)))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
438 (setq text-property-default-nonsticky |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
439 (cons '(c-type . t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
440 text-property-default-nonsticky))) |
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
|
441 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
442 ;; 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
|
443 ;; heuristic that open parens in column 0 are defun starters. Since |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
444 ;; we have c-state-cache that isn't useful and only causes trouble |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
445 ;; so turn it off. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
446 (when (memq 'col-0-paren c-emacs-features) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
447 (make-local-variable 'open-paren-in-column-0-is-defun-start) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
448 (setq open-paren-in-column-0-is-defun-start nil)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
449 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
450 ;; The `c-type' text property with `c-decl-end' is used to mark the |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
451 ;; ends of access keys to make interactive refontification work |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
452 ;; better. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
453 (when c-opt-access-key |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
454 (setq c-type-decl-end-used t)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
455 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
456 (c-clear-found-types) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
457 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
458 ;; 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
|
459 (let ((style (if (stringp default-style) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
460 default-style |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
461 (or (cdr (assq mode default-style)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
462 (cdr (assq 'other default-style)) |
36920 | 463 "gnu")))) |
464 ;; Override style variables if `c-old-style-variable-behavior' is | |
465 ;; set. Also override if we are using global style variables, | |
466 ;; have already initialized a style once, and are switching to a | |
467 ;; different style. (It's doubtful whether this is desirable, but | |
468 ;; the whole situation with nonlocal style variables is a bit | |
469 ;; awkward. It's at least the most compatible way with the old | |
470 ;; style init procedure.) | |
471 (c-set-style style (not (or c-old-style-variable-behavior | |
472 (and (not c-style-variables-are-local-p) | |
473 c-indentation-style | |
474 (not (string-equal c-indentation-style | |
475 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
|
476 (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
|
477 |
36920 | 478 ;; we have to do something special for c-offsets-alist so that the |
479 ;; buffer local value has its own alist structure. | |
480 (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
|
481 |
36920 | 482 ;; setup the comment indent variable in a Emacs version portable way |
483 (make-local-variable 'comment-indent-function) | |
484 (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
|
485 |
36920 | 486 ;; put auto-hungry designators onto minor-mode-alist, but only once |
487 (or (assq 'c-auto-hungry-string minor-mode-alist) | |
488 (setq minor-mode-alist | |
489 (cons '(c-auto-hungry-string c-auto-hungry-string) | |
490 minor-mode-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
|
491 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
492 ;; 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
|
493 ;; don't become invalid due to buffer changes. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
494 (add-hook 'after-change-functions 'c-after-change nil t)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
495 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
496 (defun c-after-font-lock-init () |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
497 ;; Put on `font-lock-mode-hook'. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
498 (remove-hook 'after-change-functions 'c-after-change t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
499 (add-hook 'after-change-functions 'c-after-change nil t)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
500 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
501 (defun c-font-lock-init () |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
502 "Set up the font-lock variables for using the font-lock support in CC Mode. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
503 This does not load the font-lock package. Use after |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
504 `c-basic-common-init' and after cc-fonts has been loaded." |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
505 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
506 (make-local-variable 'font-lock-defaults) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
507 (setq font-lock-defaults |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
508 `(,(if (c-mode-is-new-awk-p) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
509 ;; awk-mode currently has only one font lock level. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
510 'awk-font-lock-keywords |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
511 (mapcar 'c-mode-symbol |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
512 '("font-lock-keywords" "font-lock-keywords-1" |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
513 "font-lock-keywords-2" "font-lock-keywords-3"))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
514 nil nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
515 ,c-identifier-syntax-modifications |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
516 c-beginning-of-syntax |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
517 (font-lock-mark-block-function |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
518 . c-mark-function))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
519 (add-hook 'font-lock-mode-hook 'c-after-font-lock-init nil t)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
520 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
521 (defun c-setup-doc-comment-style () |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
522 "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
|
523 (when (and (featurep 'font-lock) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
524 (symbol-value 'font-lock-mode)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
525 ;; 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
|
526 (font-lock-mode 0) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
527 (font-lock-mode 1))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
528 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
529 (defun c-common-init (&optional mode) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
530 "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
|
531 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
|
532 `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
|
533 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
|
534 Mode to operate correctly. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
535 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
536 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
|
537 `c-basic-common-init' for details. It's only optional to be |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
538 compatible with old code; callers should always specify it. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
539 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
540 This function does not do any hidden buffer changes." |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
541 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
542 (unless mode |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
543 ;; 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
|
544 ;; 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
|
545 (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
|
546 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
547 (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
|
548 (when mode |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
549 ;; 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
|
550 (c-font-lock-init)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
551 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
552 (make-local-variable 'outline-regexp) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
553 (make-local-variable 'outline-level) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
554 (setq outline-regexp "[^#\n\^M]" |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
555 outline-level 'c-outline-level) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
556 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
557 (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
|
558 (when rfn |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
559 (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
|
560 (and (cdr rfn) |
a88429b12685
(c-common-init): Use mode-require-final-newline.
Richard M. Stallman <rms@gnu.org>
parents:
58747
diff
changeset
|
561 (setq require-final-newline mode-require-final-newline))))) |
36920 | 562 |
563 (defun c-postprocess-file-styles () | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
564 "Function that post processes relevant file local variables in CC Mode. |
36920 | 565 Currently, this function simply applies any style and offset settings |
566 found in the file's Local Variable list. It first applies any style | |
567 setting found in `c-file-style', then it applies any offset settings | |
568 it finds in `c-file-offsets'. | |
569 | |
570 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
|
571 ;; |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
572 ;; This function does not do any hidden buffer changes. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
573 |
36920 | 574 ;; 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
|
575 (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
|
576 (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
|
577 (c-make-styles-buffer-local t)) |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
578 (and c-file-style |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
579 (c-set-style c-file-style)) |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
580 (and c-file-offsets |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
581 (mapcar |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
582 (lambda (langentry) |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
583 (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
|
584 (offset (cdr langentry))) |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
585 (c-set-offset langelem offset))) |
9d60ac21968f
(c-postprocess-file-styles): Do nothing except in CC modes.
Richard M. Stallman <rms@gnu.org>
parents:
44728
diff
changeset
|
586 c-file-offsets)))) |
36920 | 587 |
588 (add-hook 'hack-local-variables-hook 'c-postprocess-file-styles) | |
589 | |
590 | |
591 ;; Support for C | |
592 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
593 ;;;###autoload |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
594 (defvar c-mode-syntax-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
595 "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
|
596 (or c-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
597 (setq c-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
598 (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
|
599 |
36920 | 600 (defvar c-mode-abbrev-table nil |
601 "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
|
602 (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
|
603 '(("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
|
604 ("while" "while" c-electric-continued-statement 0))) |
36920 | 605 |
606 (defvar c-mode-map () | |
607 "Keymap used in c-mode buffers.") | |
608 (if c-mode-map | |
609 nil | |
610 (setq c-mode-map (c-make-inherited-keymap)) | |
611 ;; add bindings which are only useful for C | |
612 (define-key c-mode-map "\C-c\C-e" 'c-macro-expand) | |
613 ) | |
614 | |
615 (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
|
616 (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
|
617 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
618 ;; 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
|
619 ;; `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
|
620 ;; 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
|
621 ;; 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
|
622 ;; 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
|
623 |
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
624 ;; The the extension ".C" is associated to C++ while the lowercase |
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
625 ;; variant goes to C. On case insensitive file systems, this means |
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
626 ;; 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
|
627 ;; 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
|
628 ;; 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
|
629 ;; 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
|
630 ;;;###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
|
631 ;;;###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
|
632 ;;;###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
|
633 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
634 ;;;###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
|
635 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
636 ;; 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
|
637 ;; 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
|
638 ;; 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
|
639 ;;;###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
|
640 ;;;###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
|
641 |
18720 | 642 ;;;###autoload |
643 (defun c-mode () | |
644 "Major mode for editing K&R and ANSI C code. | |
645 To submit a problem report, enter `\\[c-submit-bug-report]' from a | |
646 c-mode buffer. This automatically sets up a mail buffer with version | |
647 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
|
648 problem, including a reproducible test case, and send the message. |
18720 | 649 |
650 To see what version of CC Mode you are running, enter `\\[c-version]'. | |
651 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
652 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
|
653 initialization, then `c-mode-hook'. |
18720 | 654 |
655 Key bindings: | |
656 \\{c-mode-map}" | |
657 (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
|
658 (kill-all-local-variables) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
659 (c-initialize-cc-mode t) |
18720 | 660 (set-syntax-table c-mode-syntax-table) |
661 (setq major-mode 'c-mode | |
662 mode-name "C" | |
36920 | 663 local-abbrev-table c-mode-abbrev-table |
664 abbrev-mode t) | |
18720 | 665 (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
|
666 (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
|
667 (c-common-init 'c-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
668 (easy-menu-add c-c-menu) |
26817 | 669 (cc-imenu-init cc-imenu-c-generic-expression) |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
670 (run-mode-hooks 'c-mode-common-hook 'c-mode-hook) |
18720 | 671 (c-update-modeline)) |
672 | |
673 | |
36920 | 674 ;; Support for C++ |
675 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
676 ;;;###autoload |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
677 (defvar c++-mode-syntax-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
678 "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
|
679 (or c++-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
680 (setq c++-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
681 (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
|
682 |
36920 | 683 (defvar c++-mode-abbrev-table nil |
684 "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
|
685 (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
|
686 '(("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
|
687 ("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
|
688 ("catch" "catch" c-electric-continued-statement 0))) |
36920 | 689 |
690 (defvar c++-mode-map () | |
691 "Keymap used in c++-mode buffers.") | |
692 (if c++-mode-map | |
693 nil | |
694 (setq c++-mode-map (c-make-inherited-keymap)) | |
695 ;; add bindings which are only useful for C++ | |
696 (define-key c++-mode-map "\C-c\C-e" 'c-macro-expand) | |
697 (define-key c++-mode-map "\C-c:" 'c-scope-operator) | |
698 (define-key c++-mode-map "<" 'c-electric-lt-gt) | |
699 (define-key c++-mode-map ">" 'c-electric-lt-gt)) | |
700 | |
701 (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
|
702 (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
|
703 |
18720 | 704 ;;;###autoload |
705 (defun c++-mode () | |
706 "Major mode for editing C++ code. | |
707 To submit a problem report, enter `\\[c-submit-bug-report]' from a | |
708 c++-mode buffer. This automatically sets up a mail buffer with | |
709 version information already added. You just need to add a description | |
710 of the problem, including a reproducible test case, and send the | |
711 message. | |
712 | |
713 To see what version of CC Mode you are running, enter `\\[c-version]'. | |
714 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
715 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
|
716 initialization, then `c++-mode-hook'. |
18720 | 717 |
718 Key bindings: | |
719 \\{c++-mode-map}" | |
720 (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
|
721 (kill-all-local-variables) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
722 (c-initialize-cc-mode t) |
18720 | 723 (set-syntax-table c++-mode-syntax-table) |
724 (setq major-mode 'c++-mode | |
725 mode-name "C++" | |
36920 | 726 local-abbrev-table c++-mode-abbrev-table |
727 abbrev-mode t) | |
18720 | 728 (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
|
729 (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
|
730 (c-common-init 'c++-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
731 (easy-menu-add c-c++-menu) |
26817 | 732 (cc-imenu-init cc-imenu-c++-generic-expression) |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
733 (run-mode-hooks 'c-mode-common-hook 'c++-mode-hook) |
18720 | 734 (c-update-modeline)) |
735 | |
736 | |
36920 | 737 ;; Support for Objective-C |
738 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
739 ;;;###autoload |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
740 (defvar objc-mode-syntax-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
741 "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
|
742 (or objc-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
743 (setq objc-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
744 (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
|
745 |
36920 | 746 (defvar objc-mode-abbrev-table nil |
747 "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
|
748 (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
|
749 '(("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
|
750 ("while" "while" c-electric-continued-statement 0))) |
36920 | 751 |
752 (defvar objc-mode-map () | |
753 "Keymap used in objc-mode buffers.") | |
754 (if objc-mode-map | |
755 nil | |
756 (setq objc-mode-map (c-make-inherited-keymap)) | |
757 ;; add bindings which are only useful for Objective-C | |
758 (define-key objc-mode-map "\C-c\C-e" 'c-macro-expand)) | |
759 | |
760 (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
|
761 (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
|
762 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
763 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.m\\'" . objc-mode)) |
36920 | 764 |
18720 | 765 ;;;###autoload |
766 (defun objc-mode () | |
767 "Major mode for editing Objective C code. | |
768 To submit a problem report, enter `\\[c-submit-bug-report]' from an | |
769 objc-mode buffer. This automatically sets up a mail buffer with | |
770 version information already added. You just need to add a description | |
771 of the problem, including a reproducible test case, and send the | |
772 message. | |
773 | |
774 To see what version of CC Mode you are running, enter `\\[c-version]'. | |
775 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
776 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
|
777 initialization, then `objc-mode-hook'. |
18720 | 778 |
779 Key bindings: | |
780 \\{objc-mode-map}" | |
781 (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
|
782 (kill-all-local-variables) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
783 (c-initialize-cc-mode t) |
18720 | 784 (set-syntax-table objc-mode-syntax-table) |
785 (setq major-mode 'objc-mode | |
786 mode-name "ObjC" | |
36920 | 787 local-abbrev-table objc-mode-abbrev-table |
788 abbrev-mode t) | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
789 ;; The `c-type' text property with `c-decl-end' is used to mark the |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
790 ;; end of the @-style directives. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
791 (setq c-type-decl-end-used t) |
18720 | 792 (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
|
793 (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
|
794 (c-common-init 'objc-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
795 (easy-menu-add c-objc-menu) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
796 (cc-imenu-init nil 'cc-imenu-objc-function) |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
797 (run-mode-hooks 'c-mode-common-hook 'objc-mode-hook) |
18720 | 798 (c-update-modeline)) |
799 | |
800 | |
36920 | 801 ;; Support for Java |
802 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
803 ;;;###autoload |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
804 (defvar java-mode-syntax-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
805 "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
|
806 (or java-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
807 (setq java-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
808 (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
|
809 |
36920 | 810 (defvar java-mode-abbrev-table nil |
811 "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
|
812 (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
|
813 '(("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
|
814 ("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
|
815 ("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
|
816 ("finally" "finally" c-electric-continued-statement 0))) |
36920 | 817 |
818 (defvar java-mode-map () | |
819 "Keymap used in java-mode buffers.") | |
820 (if java-mode-map | |
821 nil | |
822 (setq java-mode-map (c-make-inherited-keymap)) | |
823 ;; add bindings which are only useful for Java | |
824 ) | |
825 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
826 ;; 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
|
827 ;; 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
|
828 ;; 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
|
829 ;; 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
|
830 (defconst c-Java-defun-prompt-regexp |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
831 "^[ \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
|
832 |
36920 | 833 (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
|
834 (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
|
835 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
836 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.java\\'" . java-mode)) |
36920 | 837 |
18720 | 838 ;;;###autoload |
839 (defun java-mode () | |
840 "Major mode for editing Java code. | |
20135
ecb78a6ccd8d
(objc-mode): Bind imenu-create-index-function
Karl Heuer <kwzh@gnu.org>
parents:
19808
diff
changeset
|
841 To submit a problem report, enter `\\[c-submit-bug-report]' from a |
18720 | 842 java-mode buffer. This automatically sets up a mail buffer with |
843 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
|
844 of the problem, including a reproducible test case, and send the |
18720 | 845 message. |
846 | |
847 To see what version of CC Mode you are running, enter `\\[c-version]'. | |
848 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
849 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
|
850 initialization, then `java-mode-hook'. |
18720 | 851 |
852 Key bindings: | |
853 \\{java-mode-map}" | |
854 (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
|
855 (kill-all-local-variables) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
856 (c-initialize-cc-mode t) |
18720 | 857 (set-syntax-table java-mode-syntax-table) |
858 (setq major-mode 'java-mode | |
859 mode-name "Java" | |
30401
b85ee58b24ec
(c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents:
26817
diff
changeset
|
860 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
|
861 abbrev-mode t) |
18720 | 862 (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
|
863 (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
|
864 (c-common-init 'java-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
865 (easy-menu-add c-java-menu) |
26817 | 866 (cc-imenu-init cc-imenu-java-generic-expression) |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
867 (run-mode-hooks 'c-mode-common-hook 'java-mode-hook) |
18720 | 868 (c-update-modeline)) |
869 | |
870 | |
36920 | 871 ;; Support for CORBA's IDL language |
872 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
873 ;;;###autoload |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
874 (defvar idl-mode-syntax-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
875 "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
|
876 (or idl-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
877 (setq idl-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
878 (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
|
879 |
36920 | 880 (defvar idl-mode-abbrev-table nil |
881 "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
|
882 (c-define-abbrev-table 'idl-mode-abbrev-table nil) |
36920 | 883 |
884 (defvar idl-mode-map () | |
885 "Keymap used in idl-mode buffers.") | |
886 (if idl-mode-map | |
887 nil | |
888 (setq idl-mode-map (c-make-inherited-keymap)) | |
889 ;; add bindings which are only useful for IDL | |
890 ) | |
891 | |
892 (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
|
893 (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
|
894 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
895 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.idl\\'" . idl-mode)) |
36920 | 896 |
19253
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
897 ;;;###autoload |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
898 (defun idl-mode () |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
899 "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
|
900 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
|
901 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
|
902 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
|
903 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
|
904 message. |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
905 |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
906 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
|
907 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
908 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
|
909 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
|
910 |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
911 Key bindings: |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
912 \\{idl-mode-map}" |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
913 (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
|
914 (kill-all-local-variables) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
915 (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
|
916 (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
|
917 (setq major-mode 'idl-mode |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
918 mode-name "IDL" |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
919 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
|
920 (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
|
921 (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
|
922 (c-common-init 'idl-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
923 (easy-menu-add c-idl-menu) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
924 ;;(cc-imenu-init cc-imenu-idl-generic-expression) ;TODO |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
925 (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
|
926 (c-update-modeline)) |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
927 |
2bda7e07f25d
(idl-mode): Support for CORBA's IDL language.
Richard M. Stallman <rms@gnu.org>
parents:
18847
diff
changeset
|
928 |
36920 | 929 ;; Support for Pike |
930 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
931 ;;;###autoload |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
932 (defvar pike-mode-syntax-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
933 "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
|
934 (or pike-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
935 (setq pike-mode-syntax-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
936 (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
|
937 |
36920 | 938 (defvar pike-mode-abbrev-table nil |
939 "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
|
940 (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
|
941 '(("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
|
942 ("while" "while" c-electric-continued-statement 0))) |
36920 | 943 |
944 (defvar pike-mode-map () | |
945 "Keymap used in pike-mode buffers.") | |
946 (if pike-mode-map | |
947 nil | |
948 (setq pike-mode-map (c-make-inherited-keymap)) | |
949 ;; additional bindings | |
950 (define-key pike-mode-map "\C-c\C-e" 'c-macro-expand)) | |
951 | |
952 (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
|
953 (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
|
954 |
51747
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
955 ;;;###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
|
956 ;;;###autoload (add-to-list 'interpreter-mode-alist '("pike" . pike-mode)) |
36920 | 957 |
24282 | 958 ;;;###autoload |
959 (defun pike-mode () | |
960 "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
|
961 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
|
962 pike-mode buffer. This automatically sets up a mail buffer with |
24282 | 963 version information already added. You just need to add a description |
964 of the problem, including a reproducible test case, and send the | |
965 message. | |
966 | |
967 To see what version of CC Mode you are running, enter `\\[c-version]'. | |
968 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
969 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
|
970 initialization, then `pike-mode-hook'. |
24282 | 971 |
972 Key bindings: | |
973 \\{pike-mode-map}" | |
974 (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
|
975 (kill-all-local-variables) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
976 (c-initialize-cc-mode t) |
24282 | 977 (set-syntax-table pike-mode-syntax-table) |
978 (setq major-mode 'pike-mode | |
979 mode-name "Pike" | |
36920 | 980 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
|
981 abbrev-mode t) |
24282 | 982 (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
|
983 (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
|
984 (c-common-init 'pike-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
985 (easy-menu-add c-pike-menu) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
986 ;;(cc-imenu-init cc-imenu-pike-generic-expression) ;TODO |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
987 (run-mode-hooks 'c-mode-common-hook 'pike-mode-hook) |
24282 | 988 (c-update-modeline)) |
989 | |
990 | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
991 ;; Support for awk. This is purposely disabled for older (X)Emacsen which |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
992 ;; don't support syntax-table properties. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
993 |
51747
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
994 ;;;###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
|
995 ;;;###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
|
996 ;;;###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
|
997 ;;;###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
|
998 ;;;###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
|
999 |
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
1000 ;;; 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
|
1001 ;;; autoload form instead. |
58747
e3dfd80003ea
(awk-mode autoload): Supply t meaning interactive function.
Richard M. Stallman <rms@gnu.org>
parents:
58198
diff
changeset
|
1002 ;;;###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
|
1003 |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1004 (if (not (memq 'syntax-properties c-emacs-features)) |
51747
b4fb79bf98ba
Fixed some autoload problems: Try to ensure that the entry for ".c"
Martin Stjernholm <mast@lysator.liu.se>
parents:
51714
diff
changeset
|
1005 (autoload 'awk-mode "awk-mode" "Major mode for editing AWK code." t) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1006 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1007 (defvar awk-mode-abbrev-table nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1008 "Abbreviation table used in awk-mode buffers.") |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1009 (c-define-abbrev-table 'awk-mode-abbrev-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1010 '(("else" "else" c-electric-continued-statement 0) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1011 ("while" "while" c-electric-continued-statement 0))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1012 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1013 (defvar awk-mode-map () |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1014 "Keymap used in awk-mode buffers.") |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1015 (if awk-mode-map |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1016 nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1017 (setq awk-mode-map (c-make-inherited-keymap)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1018 ;; add bindings which are only useful for awk. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1019 (define-key awk-mode-map "#" 'self-insert-command) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1020 (define-key awk-mode-map "/" 'self-insert-command) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1021 (define-key awk-mode-map "*" 'self-insert-command) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1022 (define-key awk-mode-map "\C-c\C-n" 'undefined) ; #if doesn't exist in awk. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1023 (define-key awk-mode-map "\C-c\C-p" 'undefined) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1024 (define-key awk-mode-map "\C-c\C-u" 'undefined) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1025 (define-key awk-mode-map "\M-a" 'undefined) ; c-awk-beginning-of-statement isn't yet implemented. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1026 (define-key awk-mode-map "\M-e" 'undefined) ; c-awk-end-of-statement isn't yet implemented. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1027 (define-key awk-mode-map "\C-\M-a" 'c-awk-beginning-of-defun) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1028 (define-key awk-mode-map "\C-\M-e" 'c-awk-end-of-defun)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1029 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1030 (easy-menu-define c-awk-menu awk-mode-map "AWK Mode Commands" |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1031 (cons "AWK" (c-lang-const c-mode-menu awk))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1032 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1033 (defun awk-mode () |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1034 "Major mode for editing AWK code. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1035 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
|
1036 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
|
1037 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
|
1038 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
|
1039 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1040 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
|
1041 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1042 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
|
1043 initialization, then `awk-mode-hook'. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1044 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1045 Key bindings: |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1046 \\{awk-mode-map}" |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1047 (interactive) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1048 (require 'cc-awk) ; Added 2003/6/10. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1049 (kill-all-local-variables) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1050 (c-initialize-cc-mode t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1051 (set-syntax-table awk-mode-syntax-table) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1052 (setq major-mode 'awk-mode |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1053 mode-name "AWK" |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1054 local-abbrev-table awk-mode-abbrev-table |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1055 abbrev-mode t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1056 (use-local-map awk-mode-map) |
52108
5a4fdabed57e
2003-08-03 Martin Stjernholm <bug-cc-mode@gnu.org>
Martin Stjernholm <mast@lysator.liu.se>
parents:
51747
diff
changeset
|
1057 (c-init-language-vars-for 'awk-mode) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1058 (c-common-init 'awk-mode) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1059 ;; The rest of CC Mode does not (yet) use `font-lock-syntactic-keywords', |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1060 ;; so it's not set by `c-font-lock-init'. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1061 (make-local-variable 'font-lock-syntactic-keywords) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1062 (setq font-lock-syntactic-keywords |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1063 '((c-awk-set-syntax-table-properties |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1064 0 (0) ; Everything on this line is a dummy. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1065 nil t))) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1066 (c-awk-unstick-NL-prop) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1067 (add-hook 'before-change-functions 'c-awk-before-change nil t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1068 (add-hook 'after-change-functions 'c-awk-after-change nil t) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1069 (c-save-buffer-state nil |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1070 (save-restriction |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1071 (widen) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1072 (c-awk-clear-NL-props (point-min) (point-max)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1073 (c-awk-after-change (point-min) (point-max) 0))) ; Set syntax-table props. |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1074 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1075 ;; Prevent Xemacs's buffer-syntactic-context being used. See the comment |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1076 ;; in cc-engine.el, just before (defun c-fast-in-literal ... |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1077 (defalias 'c-in-literal 'c-slow-in-literal) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1078 |
58198
3d3304742b88
(c-basic-common-initc-font-lock-init, c-font-lock-init): Eliminate obsolete make-local-hook.
Daniel Pfeiffer <occitan@esperanto.org>
parents:
52401
diff
changeset
|
1079 (run-mode-hooks 'c-mode-common-hook 'awk-mode-hook) |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1080 (c-update-modeline)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1081 ) ;; closes the (if (not (memq 'syntax-properties c-emacs-features)) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1082 |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1083 |
20146 | 1084 ;; bug reporting |
18720 | 1085 |
1086 (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
|
1087 "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
|
1088 "Address(es) for CC Mode bug reports.") |
18720 | 1089 |
1090 (defun c-version () | |
1091 "Echo the current version of CC Mode in the minibuffer." | |
1092 (interactive) | |
1093 (message "Using CC Mode version %s" c-version) | |
1094 (c-keep-region-active)) | |
1095 | |
36920 | 1096 (defvar c-prepare-bug-report-hooks nil) |
1097 | |
1098 ;; Dynamic variables used by reporter. | |
1099 (defvar reporter-prompt-for-summary-p) | |
1100 (defvar reporter-dont-compact-list) | |
1101 | |
18720 | 1102 (defun c-submit-bug-report () |
1103 "Submit via mail a bug report on CC Mode." | |
1104 (interactive) | |
20917
c6e2c4d9a305
(c-mode, c++-mode, objc-mode, java-mode): Set
Richard M. Stallman <rms@gnu.org>
parents:
20459
diff
changeset
|
1105 (require 'reporter) |
18720 | 1106 ;; load in reporter |
1107 (let ((reporter-prompt-for-summary-p t) | |
1108 (reporter-dont-compact-list '(c-offsets-alist)) | |
1109 (style c-indentation-style) | |
1110 (c-features c-emacs-features)) | |
1111 (and | |
1112 (if (y-or-n-p "Do you want to submit a report on CC Mode? ") | |
1113 t (message "") nil) | |
1114 (reporter-submit-bug-report | |
1115 c-mode-help-address | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1116 (concat "CC Mode " c-version " (" mode-name ")") |
26817 | 1117 (let ((vars (append |
1118 c-style-variables | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1119 '(c-buffer-is-cc-mode |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1120 c-tab-always-indent |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1121 c-syntactic-indentation |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1122 c-syntactic-indentation-in-macros |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1123 c-ignore-auto-fill |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1124 c-auto-align-backslashes |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1125 c-backspace-function |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1126 c-delete-function |
26817 | 1127 c-electric-pound-behavior |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1128 c-default-style |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1129 c-enable-xemacs-performance-kludge-p |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1130 c-old-style-variable-behavior |
26817 | 1131 defun-prompt-regexp |
1132 tab-width | |
1133 comment-column | |
1134 parse-sexp-ignore-comments | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1135 parse-sexp-lookup-properties |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1136 lookup-syntax-properties |
26817 | 1137 ;; A brain-damaged XEmacs only variable that, if |
1138 ;; set to nil can cause all kinds of chaos. | |
1139 signal-error-on-buffer-boundary | |
1140 ;; 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
|
1141 auto-fill-mode |
30401
b85ee58b24ec
(c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents:
26817
diff
changeset
|
1142 auto-fill-function |
26817 | 1143 filladapt-mode |
1144 comment-multi-line | |
1145 comment-start-skip | |
1146 fill-prefix | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1147 fill-column |
26817 | 1148 paragraph-start |
1149 adaptive-fill-mode | |
1150 adaptive-fill-regexp) | |
1151 nil))) | |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1152 (mapcar (lambda (var) (unless (boundp var) |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1153 (setq vars (delq var vars)))) |
30401
b85ee58b24ec
(c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents:
26817
diff
changeset
|
1154 '(signal-error-on-buffer-boundary |
b85ee58b24ec
(c-initialize-cc-mode): Handling of obsolete
Gerd Moellmann <gerd@gnu.org>
parents:
26817
diff
changeset
|
1155 filladapt-mode |
51714
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1156 defun-prompt-regexp |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1157 font-lock-mode |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1158 font-lock-maximum-decoration |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1159 parse-sexp-lookup-properties |
bc91cbf50c24
Updated CC Mode to version 5.30.
Martin Stjernholm <mast@lysator.liu.se>
parents:
51620
diff
changeset
|
1160 lookup-syntax-properties)) |
26817 | 1161 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
|
1162 (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
|
1163 (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
|
1164 (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
|
1165 style c-features))))))) |
18720 | 1166 |
1167 | |
36920 | 1168 (cc-provide 'cc-mode) |
52401 | 1169 |
1170 ;;; arch-tag: 7825e5c4-fd09-439f-a04d-4c13208ba3d7 | |
18720 | 1171 ;;; cc-mode.el ends here |