procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(do_autoload): Preserve match data.

Browse source
This commit is contained in:
Richard M. Stallman 1999-04-09 19:21:52 +00:00
parent abc9d9597c
commit f87740dccb
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/eval.c
View file

@ -1649,12 +1649,15 @@ do_autoload (fundef, funname)
CHECK_SYMBOL (funname, 0);
GCPRO3 (fun, funname, fundef);
/* Value saved here is to be restored into Vautoload_queue */
/* Preserve the match data. */
record_unwind_protect (Fset_match_data, Fmatch_data (Qnil, Qnil));
/* Value saved here is to be restored into Vautoload_queue. */
record_unwind_protect (un_autoload, Vautoload_queue);
Vautoload_queue = Qt;
Fload (Fcar (Fcdr (fundef)), Qnil, noninteractive ? Qt : Qnil, Qnil, Qt);
/* Save the old autoloads, in case we ever do an unload. */
/* Save the old autoloads, in case we ever do an unload. */
queue = Vautoload_queue;
while (CONSP (queue))
{
@ -1664,7 +1667,7 @@ do_autoload (fundef, funname)
/* Note: This test is subtle. The cdr of an autoload-queue entry
may be an atom if the autoload entry was generated by a defalias
or fset. */
or fset. */
if (CONSP (second))
Fput (first, Qautoload, (Fcdr (second)));