mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-11 05:51:21 -08:00
Remove unused Fget_file_char
* src/lread.c (Fget_file_char): Remove. It is unused, undocumented and we actively tell users not to call it.
This commit is contained in:
parent
523d246d66
commit
319e16550d
1 changed files with 0 additions and 11 deletions
11
src/lread.c
11
src/lread.c
|
|
@ -984,16 +984,6 @@ If `inhibit-interaction' is non-nil, this function will signal an
|
|||
: make_fixnum (char_resolve_modifier_mask (XFIXNUM (val))));
|
||||
}
|
||||
|
||||
DEFUN ("get-file-char", Fget_file_char, Sget_file_char, 0, 0, 0,
|
||||
doc: /* Don't use this yourself. */)
|
||||
(void)
|
||||
{
|
||||
if (!infile)
|
||||
error ("get-file-char misused");
|
||||
return make_fixnum (readbyte_from_stdio ());
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
typedef enum {
|
||||
|
|
@ -5832,7 +5822,6 @@ syms_of_lread (void)
|
|||
defsubr (&Sread_char);
|
||||
defsubr (&Sread_char_exclusive);
|
||||
defsubr (&Sread_event);
|
||||
defsubr (&Sget_file_char);
|
||||
defsubr (&Smapatoms);
|
||||
defsubr (&Slocate_file_internal);
|
||||
defsubr (&Sinternal__obarray_buckets);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue