diff options
| author | Po Lu <luangruo@yahoo.com> | 2023-06-04 08:33:30 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2023-06-04 08:33:30 +0800 |
| commit | c389df992a9f054f9aced4f9a267730b2221e03a (patch) | |
| tree | 3843d10e0b04570bd8653482a7766d9f436cfb4c /src/lread.c | |
| parent | a4bf3ad95869771afb4b8c64d14fa145348e4d2b (diff) | |
| parent | 6847c01568ef09764ee603fda5e20505453e1e10 (diff) | |
| download | emacs-c389df992a9f054f9aced4f9a267730b2221e03a.tar.gz | |
Merge remote-tracking branch 'origin/master' into feature/android
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lread.c b/src/lread.c index 43fa23003ca..eb52329f5a8 100644 --- a/src/lread.c +++ b/src/lread.c @@ -3647,7 +3647,7 @@ read_bool_vector (Lisp_Object readcharfun) /* Skip (and optionally remember) a lazily-loaded string preceded by "#@". Return true if this was a normal skip, - false if we read #@00 (which skips to EOB). */ + false if we read #@00 (which skips to EOB/EOF). */ static bool skip_lazy_string (Lisp_Object readcharfun) { @@ -4184,7 +4184,7 @@ read0 (Lisp_Object readcharfun, bool locate_syms) and function definitions that can be loaded lazily. */ if (skip_lazy_string (readcharfun)) goto read_obj; - obj = Qnil; /* #@00 skips to EOB and yields nil. */ + obj = Qnil; /* #@00 skips to EOB/EOF and yields nil. */ break; case '$': |