[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/lread.c
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/src/lread.c |
Date: |
Tue, 11 Jun 2002 21:51:22 -0400 |
Index: emacs/src/lread.c
diff -c emacs/src/lread.c:1.287 emacs/src/lread.c:1.288
*** emacs/src/lread.c:1.287 Wed May 29 14:58:38 2002
--- emacs/src/lread.c Tue Jun 11 11:13:58 2002
***************
*** 1461,1467 ****
Lisp_Object stream;
{
extern Lisp_Object Fread_minibuffer ();
- Lisp_Object tem;
if (NILP (stream))
stream = Vstandard_input;
if (EQ (stream, Qt))
--- 1461,1466 ----
***************
*** 2513,2519 ****
/* Kind of a hack; this will probably fail if characters
in the symbol name were escaped. Not really a big
deal, though. */
! Fcons (Fcons (result, readchar_count - Flength (Fsymbol_name
(result))),
Vread_symbol_positions_list);
return result;
}
--- 2512,2520 ----
/* Kind of a hack; this will probably fail if characters
in the symbol name were escaped. Not really a big
deal, though. */
! Fcons (Fcons (result,
! make_number (readchar_count
! - XFASTINT (Flength (Fsymbol_name
(result))))),
Vread_symbol_positions_list);
return result;
}