aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorStefan Monnier2026-04-10 12:04:59 -0400
committerStefan Monnier2026-04-10 12:05:16 -0400
commit923eb9afef02f2d788d67660725e9687bd783ccf (patch)
treed4d67630b2bdf44563e3a256c3a28f501f6e22d0 /src
parent5cb7446245ccf09c4186985f37cc4ad7a91488cd (diff)
downloademacs-923eb9afef02f2d788d67660725e9687bd783ccf.tar.gz
emacs-923eb9afef02f2d788d67660725e9687bd783ccf.zip
src/eval.c (Fdefault_toplevel_value): Improve docstring (bug#80775)
Diffstat (limited to 'src')
-rw-r--r--src/eval.c8
1 files changed, 6 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c
index 0b451b2c891..ff2ce1b01a5 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -810,7 +810,10 @@ lexbound_p (Lisp_Object symbol)
810 810
811DEFUN ("default-toplevel-value", Fdefault_toplevel_value, Sdefault_toplevel_value, 1, 1, 0, 811DEFUN ("default-toplevel-value", Fdefault_toplevel_value, Sdefault_toplevel_value, 1, 1, 0,
812 doc: /* Return SYMBOL's toplevel default value. 812 doc: /* Return SYMBOL's toplevel default value.
813"Toplevel" means outside of any let binding. */) 813"Toplevel" means outside of any let binding.
814Signals `void-variable' if there is no such value, which can
815happen even if `default-boundp' is non-nil.
816Note: In most cases, you'll want to use `default-value' instead. */)
814 (Lisp_Object symbol) 817 (Lisp_Object symbol)
815{ 818{
816 union specbinding *binding = default_toplevel_binding (symbol); 819 union specbinding *binding = default_toplevel_binding (symbol);
@@ -824,7 +827,8 @@ DEFUN ("default-toplevel-value", Fdefault_toplevel_value, Sdefault_toplevel_valu
824DEFUN ("set-default-toplevel-value", Fset_default_toplevel_value, 827DEFUN ("set-default-toplevel-value", Fset_default_toplevel_value,
825 Sset_default_toplevel_value, 2, 2, 0, 828 Sset_default_toplevel_value, 2, 2, 0,
826 doc: /* Set SYMBOL's toplevel default value to VALUE. 829 doc: /* Set SYMBOL's toplevel default value to VALUE.
827"Toplevel" means outside of any let binding. */) 830"Toplevel" means outside of any let binding.
831Note: In most cases, you'll want to use `set-default' instead. */)
828 (Lisp_Object symbol, Lisp_Object value) 832 (Lisp_Object symbol, Lisp_Object value)
829{ 833{
830 union specbinding *binding = default_toplevel_binding (symbol); 834 union specbinding *binding = default_toplevel_binding (symbol);