Commit 91fe9496 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

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

parent 4332cf50
......@@ -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>
......
......@@ -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);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment