mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-20 13:00:51 -07:00
Code Issues Projects Releases Wiki Activity

(readevalloop): Remove unused var `bpos'. Yet another int/Lisp_Object mixup.

Browse source
This commit is contained in:
Stefan Monnier 2006-07-07 16:16:18 +00:00
parent 4332cf50f7
commit 91fe949656
2 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/ChangeLog
View file

@ -2,6 +2,8 @@
* lread.c (read_filtered_event): Remove `register' qualifier because it
causes compilation problem with gcc-4.0.2-20051125 on amd64.
(readevalloop): Remove unused var `bpos'.
Yet another int/Lisp_Object mixup (YAILOM).
2006-07-07 Eli Zaretskii <eliz@gnu.org>

5
src/lread.c
View file

@ -1369,7 +1369,6 @@ readevalloop (readcharfun, stream, sourcename, evalfun,
int count = SPECPDL_INDEX ();
struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
struct buffer *b = 0;
int bpos;
int continue_reading_p;
/* Nonzero if reading an entire buffer. */
int whole_buffer = 0;
@ -1402,8 +1401,8 @@ readevalloop (readcharfun, stream, sourcename, evalfun,
/* Try to ensure sourcename is a truename, except whilst preloading. */
if (NILP (Vpurify_flag)
&& !NILP (sourcename) && Ffile_name_absolute_p (sourcename)
&& (!NILP (Ffboundp (Qfile_truename))))
&& !NILP (sourcename) && !NILP (Ffile_name_absolute_p (sourcename))
&& !NILP (Ffboundp (Qfile_truename)))
sourcename = call1 (Qfile_truename, sourcename) ;
LOADHIST_ATTACH (sourcename);