(readevalloop): Yet another int/Lisp_Object mixup (YAILOM).

This commit is contained in:
Stefan Monnier 2005-11-01 19:46:16 +00:00
parent 93eece9858
commit c1ed1b2039

View file

@ -1416,7 +1416,8 @@ readevalloop (readcharfun, stream, sourcename, evalfun,
}
build_load_history (sourcename,
stream || (start == BEG && end == Z));
stream || (INTEGERP (start) && INTEGERP (end)
&& XINT (start) == BEG && XINT (end) == Z));
UNGCPRO;