mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-26 07:11:34 -08:00
Code Issues Projects Releases Wiki Activity

(read_filtered_event, intern): Use assignment instead of initialization.

Browse source
This commit is contained in:
Karl Heuer 1994-03-23 22:55:01 +00:00
parent e9b6dfb0d1
commit 153a17b788
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/lread.c
View file

@ -213,8 +213,9 @@ read_filtered_event (no_switch_frame, ascii_required, error_nonascii)
#ifdef standalone
return make_number (getchar ());
#else
register Lisp_Object val;
register Lisp_Object delayed_switch_frame = Qnil;
register Lisp_Object val, delayed_switch_frame;
delayed_switch_frame = Qnil;
/* Read until we get an acceptable event. */
retry:
@ -1520,8 +1521,9 @@ intern (str)
{
Lisp_Object tem;
int len = strlen (str);
Lisp_Object obarray = Vobarray;
Lisp_Object obarray;
obarray = Vobarray;
if (XTYPE (obarray) != Lisp_Vector || XVECTOR (obarray)->size == 0)
obarray = check_obarray (obarray);
tem = oblookup (obarray, str, len);