Mercurial > emacs
diff src/lread.c @ 1092:c2259db856ee
(Fread_char): Pass new args to read_char.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 11 Sep 1992 23:27:12 +0000 |
parents | bf78b5ea9b3a |
children | 5d0837ebee9c |
line wrap: on
line diff
--- a/src/lread.c Fri Sep 11 09:04:24 1992 +0000 +++ b/src/lread.c Fri Sep 11 23:27:12 1992 +0000 @@ -170,7 +170,7 @@ register Lisp_Object val; #ifndef standalone - val = read_char (0); + val = read_char (0, 0, 0, Qnil, 0); if (XTYPE (val) != Lisp_Int) { unread_command_char = val; @@ -189,7 +189,7 @@ { register Lisp_Object val; - val = read_char (0); + val = read_char (0, 0, 0, Qnil, 0); return val; } @@ -203,7 +203,7 @@ #ifndef standalone do { - val = read_char (0); + val = read_char (0, 0, 0, Qnil, 0); } while (XTYPE (val) != Lisp_Int); #else