1
Fork 0
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:
Mattias Engdegård 2024-05-30 18:10:02 +02:00
parent 523d246d66
commit 319e16550d

View file

@ -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);