[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/lread.c
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/src/lread.c |
Date: |
Fri, 12 May 2006 02:08:16 +0000 |
Index: emacs/src/lread.c
diff -u emacs/src/lread.c:1.350 emacs/src/lread.c:1.351
--- emacs/src/lread.c:1.350 Mon Feb 27 02:04:35 2006
+++ emacs/src/lread.c Fri May 12 02:08:16 2006
@@ -1340,7 +1340,9 @@
/* UNIBYTE specifies how to set load_convert_to_unibyte
for this invocation.
READFUN, if non-nil, is used instead of `read'.
- START, END is region in current buffer (from eval-region). */
+
+ START, END specify region to read in current buffer (from eval-region).
+ If the input is not from a buffer, they must be nil. */
static void
readevalloop (readcharfun, stream, sourcename, evalfun,
@@ -1376,6 +1378,10 @@
else if (MARKERP (readcharfun))
b = XMARKER (readcharfun)->buffer;
+ /* We assume START is nil when input is not from a buffer. */
+ if (! NILP (start) && !b)
+ abort ();
+
specbind (Qstandard_input, readcharfun); /* GCPROs readcharfun. */
specbind (Qcurrent_load_list, Qnil);
record_unwind_protect (readevalloop_1, load_convert_to_unibyte ? Qt : Qnil);
- [Emacs-diffs] Changes to emacs/src/lread.c,
Richard M. Stallman <=