Improve Finternal__define_uninitialized_variable erroring

* src/eval.c (Finternal__define_uninitialized_variable): Say what
symbol we're bugging out on for easier debugging.

diff --git a/src/eval.c b/src/eval.c
index 25ac8e452966c77082c407150b0adef62e52229f..08e2dce61e4cafc5bde8446c8a510a90474f16eb 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -741,7 +741,9 @@ value.  */)
        and where the `foo` package only gets loaded when <foo-function>
        is called, so the outer `let` incorrectly made the binding lexical
        because the <foo-var> wasn't yet declared as dynamic at that point.  */
-    error ("Defining as dynamic an already lexical var");
+    xsignal2 (Qerror,
+             build_string ("Defining as dynamic an already lexical var"),
+             symbol);
 
   XSYMBOL (symbol)->u.s.declared_special = true;
   if (!NILP (doc))