changeset 87772:d8143a93113f

(c-constant-symbol): Put this defun inside an eval-and-compile, so as to permit byte-compiling (e.g. in bootstrap).
author Alan Mackenzie <acm@muc.de>
date Tue, 15 Jan 2008 23:56:38 +0000
parents 242c61284e79
children 3dfe2f6767ab
files lisp/progmodes/cc-vars.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/cc-vars.el	Tue Jan 15 23:55:28 2008 +0000
+++ b/lisp/progmodes/cc-vars.el	Tue Jan 15 23:56:38 2008 +0000
@@ -74,7 +74,8 @@
       :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 @@
     `(const
       :size ,len
       :format ,disp
-      :value ,sym)))
+      :value ,sym))))
 
 (define-widget 'c-const-symbol 'item
   "An uneditable lisp symbol.  This is obsolete -