* syntax.c (Fchar_syntax): Check the arg is a character.

Fixes: debbugs:6080
This commit is contained in:
Stefan Monnier 2010-05-05 13:51:40 -04:00
parent 4ab9284288
commit 774b9a602e
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2010-05-05 Stefan Monnier <monnier@iro.umontreal.ca>
* syntax.c (Fchar_syntax): Check the arg is a character (bug#6080).
2010-05-05 Lawrence Mitchell <wence@gmx.li>
* m/sparc.h: Fix typo in earlier change.

View file

@ -858,7 +858,7 @@ are listed in the documentation of `modify-syntax-entry'. */)
Lisp_Object character;
{
int char_int;
CHECK_NUMBER (character);
CHECK_CHARACTER (character);
char_int = XINT (character);
SETUP_BUFFER_SYNTAX_TABLE ();
return make_number (syntax_code_spec[(int) SYNTAX (char_int)]);