mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(CHECK_CHAR_TABLE): Don't accept nil.

Browse Source
This commit is contained in:
Richard M. Stallman 1995-10-31 00:01:29 +00:00
parent f8d35bf3d1
commit a97eb3f351
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/lisp.h
View File

@ -992,7 +992,7 @@ typedef unsigned char UCHAR;
do { if (!SYMBOLP ((x))) x = wrong_type_argument (Qsymbolp, (x)); } while (0)
#define CHECK_CHAR_TABLE(x, i) \
do { if (!CHAR_TABLE_P ((x)) && !NILP (x)) \
do { if (!CHAR_TABLE_P ((x))) \
x = wrong_type_argument (Qchar_table_p, (x)); } while (0)
#define CHECK_VECTOR(x, i) \