131 |
;; These are used to collect the init forms from the subsequent |
;; These are used to collect the init forms from the subsequent |
132 |
;; `c-lang-defvar'. They are used to build the lambda in |
;; `c-lang-defvar'. They are used to build the lambda in |
133 |
;; `c-make-init-lang-vars-fun' below. |
;; `c-make-init-lang-vars-fun' below. |
134 |
(defconst c-lang-variable-inits (list nil)) |
(defvar c-lang-variable-inits nil) |
135 |
(defconst c-lang-variable-inits-tail c-lang-variable-inits)) |
(defvar c-lang-variable-inits-tail nil) |
136 |
|
(setq c-lang-variable-inits (list nil) |
137 |
|
c-lang-variable-inits-tail c-lang-variable-inits)) |
138 |
|
|
139 |
(defmacro c-lang-defvar (var val &optional doc) |
(defmacro c-lang-defvar (var val &optional doc) |
140 |
"Declares the buffer local variable VAR to get the value VAL at mode |
"Declares the buffer local variable VAR to get the value VAL at mode |