patch 8.2.3002: Vim doesn't abort on a fatal Tcl error

dpelle · brammool · commit affd0bc62656 · 2021-06-15T19:09:43.000+02:00
Problem:    Vim doesn't abort on a fatal Tcl error.
Solution:   Change emsg() to iemsg(). (Dominique Pellé, closes #8383)
diff --git a/src/if_tcl.c b/src/if_tcl.c
@@ -1531,7 +1531,7 @@ tclsetdelcmd(
 	reflist = reflist->next;
     }
     // This should never happen.  Famous last word?
-    emsg(_("E280: TCL FATAL ERROR: reflist corrupt!? Please report this to vim-dev@vim.org"));
+    iemsg(_("E280: TCL FATAL ERROR: reflist corrupt!? Please report this to vim-dev@vim.org"));
     Tcl_SetResult(interp, _("cannot register callback command: buffer/window reference not found"), TCL_STATIC);
     return TCL_ERROR;
 }
diff --git a/src/version.c b/src/version.c
@@ -750,6 +750,8 @@ static char *(features[]) =
 
 static int included_patches[] =
 {   /* Add new patch number below this line */
+/**/
+    3002,
 /**/
     3001,
 /**/

Original file line number	Diff line number	Diff line change
`@@ -1531,7 +1531,7 @@ tclsetdelcmd(`
`1531`	`1531`	`reflist = reflist->next;`
`1532`	`1532`	`}`
`1533`	`1533`	`// This should never happen. Famous last word?`
`1534`		`- emsg(_("E280: TCL FATAL ERROR: reflist corrupt!? Please report this to [email protected]"));`
	`1534`	`+ iemsg(_("E280: TCL FATAL ERROR: reflist corrupt!? Please report this to [email protected]"));`
`1535`	`1535`	`Tcl_SetResult(interp, _("cannot register callback command: buffer/window reference not found"), TCL_STATIC);`
`1536`	`1536`	`return TCL_ERROR;`
`1537`	`1537`	`}`