changeset 19380:87b40a65d4cd

(c-buffer-is-cc-mode): Definition moved here from cc-vars.el. Also, put permanent-local property on variable so it's value won't get killed by kill-all-local-variables. This makes it easier for non-CC Mode derived modes to be initialized correctly. (c++-mode, java-mode, objc-mode, idl-mode): Remove obsolete variable c-double-slash-is-comments-p.
author Richard M. Stallman <rms@gnu.org>
date Sat, 16 Aug 1997 03:41:39 +0000
parents 19c6e028d602
children 3ad777918b6c
files lisp/progmodes/cc-mode.el
diffstat 1 files changed, 11 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/cc-mode.el	Sat Aug 16 03:41:02 1997 +0000
+++ b/lisp/progmodes/cc-mode.el	Sat Aug 16 03:41:39 1997 +0000
@@ -7,7 +7,7 @@
 ;;             1985 Richard M. Stallman
 ;; Maintainer: cc-mode-help@python.org
 ;; Created:    a long, long, time ago. adapted from the original c-mode.el
-;; Version:    5.15
+;; Version:    5.16
 ;; Keywords:   c languages oop
 
 ;; NOTE: Read the commentary below for the right way to submit bug reports!
@@ -81,6 +81,15 @@
   (require 'cc-menus))
 (require 'cc-defs)
 
+(defvar c-buffer-is-cc-mode nil
+  "Non-nil for all buffers with a `major-mode' derived from CC Mode.
+Otherwise, this variable is nil.  I.e. this variable is non-nil for
+`c-mode', `c++-mode', `objc-mode', `java-mode', `idl-mode', and any
+other non-CC Mode mode that calls `c-initialize-cc-mode'
+\(e.g. `awk-mode').")
+(make-variable-buffer-local 'c-buffer-is-cc-mode)
+(put 'c-buffer-is-cc-mode 'permanent-local t)
+
 
 ;; Other modes and packages which depend on CC Mode should do the
 ;; following to make sure everything is loaded and available for their
@@ -185,7 +194,6 @@
 	c-comment-start-regexp c-C++-comment-start-regexp
 	c-class-key c-C++-class-key
 	c-access-key c-C++-access-key
-	c-double-slash-is-comments-p t
 	c-recognize-knr-p nil
 	imenu-generic-expression cc-imenu-c++-generic-expression)
   (run-hooks 'c-mode-common-hook)
@@ -226,7 +234,6 @@
  	c-class-key c-ObjC-class-key
 	c-baseclass-key nil
 	c-access-key c-ObjC-access-key
-	c-double-slash-is-comments-p t
 	c-method-key c-ObjC-method-key)
   (run-hooks 'c-mode-common-hook)
   (run-hooks 'objc-mode-hook)
@@ -267,7 +274,6 @@
  	c-comment-start-regexp c-Java-comment-start-regexp
   	c-class-key c-Java-class-key
 	c-method-key c-Java-method-key
-	c-double-slash-is-comments-p t
  	c-baseclass-key nil
 	c-recognize-knr-p nil
  	c-access-key c-Java-access-key
@@ -312,7 +318,6 @@
 	c-comment-start-regexp c-C++-comment-start-regexp
 	c-class-key c-C++-class-key
 	c-access-key c-C++-access-key
-	c-double-slash-is-comments-p t
 	c-recognize-knr-p nil)
 ;;	imenu-generic-expression cc-imenu-c++-generic-expression)
   (run-hooks 'c-mode-common-hook)
@@ -321,7 +326,7 @@
 
 
 ;; defuns for submitting bug reports
-(defconst c-version "5.15"
+(defconst c-version "5.16"
   "CC Mode version number.")
 
 (defconst c-mode-help-address