From 923eb9afef02f2d788d67660725e9687bd783ccf Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 10 Apr 2026 12:04:59 -0400 Subject: [PATCH] src/eval.c (Fdefault_toplevel_value): Improve docstring (bug#80775) --- src/eval.c | 8 ++++++-- 1 file 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) DEFUN ("default-toplevel-value", Fdefault_toplevel_value, Sdefault_toplevel_value, 1, 1, 0, doc: /* Return SYMBOL's toplevel default value. -"Toplevel" means outside of any let binding. */) +"Toplevel" means outside of any let binding. +Signals `void-variable' if there is no such value, which can +happen even if `default-boundp' is non-nil. +Note: In most cases, you'll want to use `default-value' instead. */) (Lisp_Object symbol) { union specbinding *binding = default_toplevel_binding (symbol); @@ -824,7 +827,8 @@ DEFUN ("default-toplevel-value", Fdefault_toplevel_value, Sdefault_toplevel_valu DEFUN ("set-default-toplevel-value", Fset_default_toplevel_value, Sset_default_toplevel_value, 2, 2, 0, doc: /* Set SYMBOL's toplevel default value to VALUE. -"Toplevel" means outside of any let binding. */) +"Toplevel" means outside of any let binding. +Note: In most cases, you'll want to use `set-default' instead. */) (Lisp_Object symbol, Lisp_Object value) { union specbinding *binding = default_toplevel_binding (symbol);