From c1ed1b2039ea2aa2e6f5d63c2a4f13afb3320844 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 1 Nov 2005 19:46:16 +0000 Subject: [PATCH] (readevalloop): Yet another int/Lisp_Object mixup (YAILOM). --- src/lread.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/lread.c b/src/lread.c index 3097a6b7c3e..bac5ad4f161 100644 --- a/src/lread.c +++ b/src/lread.c @@ -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; -- 2.39.2