(c-constant-symbol): Put this defun inside an eval-and-compile, so as to

permit byte-compiling (e.g. in bootstrap).

diff --git a/lisp/progmodes/cc-vars.el b/lisp/progmodes/cc-vars.el
index 5c5c4b3a0010ddccad808093d9bc3531b97e7734..8ee89170f19fab5a37734e4fec91faa8072251f1 100644 (file)
--- a/lisp/progmodes/cc-vars.el
+++ b/lisp/progmodes/cc-vars.el
@@ -74,7 +74,8 @@ Useful as last item in a `choice' widget."
       :value 'other))
 
 ;; The next defun will supersede c-const-symbol.
-(defun c-constant-symbol (sym len)
+(eval-and-compile
+  (defun c-constant-symbol (sym len)
   "Create an uneditable symbol for customization buffers.
 SYM is the name of the symbol, LEN the length of the field (in
 characters) the symbol will be displayed in.  LEN must be big
@@ -89,7 +90,7 @@ within a customization type."
     `(const
       :size ,len
       :format ,disp
-      :value ,sym)))
+      :value ,sym))))
 
 (define-widget 'c-const-symbol 'item
   "An uneditable lisp symbol.  This is obsolete -