HCoop
/
bpt
/
emacs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(Fdefconst): Mark variable as risky.
[bpt/emacs.git]
/
src
/
eval.c
diff --git
a/src/eval.c
b/src/eval.c
index
20f29b5
..
5f8d266
100644
(file)
--- a/
src/eval.c
+++ b/
src/eval.c
@@
-195,9
+195,10
@@
int handling_signal;
Lisp_Object Vmacro_declaration_function;
Lisp_Object Vmacro_declaration_function;
+extern Lisp_Object Qrisky_local_variable;
static Lisp_Object funcall_lambda P_ ((Lisp_Object, int, Lisp_Object*));
static Lisp_Object funcall_lambda P_ ((Lisp_Object, int, Lisp_Object*));
-
+
\f
void
init_eval_once ()
{
void
init_eval_once ()
{
@@
-895,6
+896,7
@@
usage: (defconst SYMBOL INITVALUE [DOCSTRING]) */)
tem = Fpurecopy (tem);
Fput (sym, Qvariable_documentation, tem);
}
tem = Fpurecopy (tem);
Fput (sym, Qvariable_documentation, tem);
}
+ Fput (sym, Qrisky_local_variable, Qt);
LOADHIST_ATTACH (sym);
return sym;
}
LOADHIST_ATTACH (sym);
return sym;
}