From: Steven Tamm Date: Thu, 28 Nov 2002 07:47:34 +0000 (+0000) Subject: fns.c (Frequire): Change nesting allowance from 2 to 3 to cause more X-Git-Tag: ttn-vms-21-2-B4~12250 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f707342d13e34a874c3f27c5998832d5e5934501;p=emacs.git fns.c (Frequire): Change nesting allowance from 2 to 3 to cause more descriptive error output from lread.c:Fload upon most require cycles during bootstrapping --- diff --git a/src/ChangeLog b/src/ChangeLog index 030fe24435d..006422f9d9b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2002-11-27 Steven Tamm + + * fns.c (Frequire): Change nesting allowance from 2 to 3 to cause + more descriptive error output from lread.c:Fload upon most require + cycles during boostrapping. + 2002-11-27 Jason Rumney * fileio.c (Finsert_file_contents): Give a more appropriate error diff --git a/src/fns.c b/src/fns.c index c33df74b464..3774aeb9409 100644 --- a/src/fns.c +++ b/src/fns.c @@ -3269,7 +3269,7 @@ The normal messages at start and end of loading FILENAME are suppressed. */) nesting++; tem = XCDR (tem); } - if (nesting > 2) + if (nesting > 3) error ("Recursive `require' for feature `%s'", SDATA (SYMBOL_NAME (feature)));