changeset 108246:ea6ba19c6edd

* syntax.c (Fchar_syntax): Check the arg is a character.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 05 May 2010 13:51:40 -0400
parents 5425ce334f51
children ea9732b429b6
files src/ChangeLog src/syntax.c
diffstat 2 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog	Wed May 05 08:51:32 2010 -0700
+++ b/src/ChangeLog	Wed May 05 13:51:40 2010 -0400
@@ -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.
--- a/src/syntax.c	Wed May 05 08:51:32 2010 -0700
+++ b/src/syntax.c	Wed May 05 13:51:40 2010 -0400
@@ -858,7 +858,7 @@
      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)]);