aboutsummaryrefslogtreecommitdiffstats
path: root/src/keymap.c
diff options
context:
space:
mode:
authorPavel Janík2001-11-02 20:46:55 +0000
committerPavel Janík2001-11-02 20:46:55 +0000
commitb78265036088d5d0eac2a03b929adb50aa59b45c (patch)
treede99fe733144deb926fd31ee7bdff95cb1bc5073 /src/keymap.c
parent00a2cef7d11a1b193891eb3d28274ef7fc7c3fe4 (diff)
downloademacs-b78265036088d5d0eac2a03b929adb50aa59b45c.tar.gz
emacs-b78265036088d5d0eac2a03b929adb50aa59b45c.zip
Update usage of CHECK_ macros (remove unused second argument).
Diffstat (limited to 'src/keymap.c')
-rw-r--r--src/keymap.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/keymap.c b/src/keymap.c
index 802c1413c75..018e1ea1eb9 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1958,7 +1958,7 @@ around function keys and event symbols.")
1958 /* Handle a generic character. */ 1958 /* Handle a generic character. */
1959 Lisp_Object name; 1959 Lisp_Object name;
1960 name = CHARSET_TABLE_INFO (charset, CHARSET_LONG_NAME_IDX); 1960 name = CHARSET_TABLE_INFO (charset, CHARSET_LONG_NAME_IDX);
1961 CHECK_STRING (name, 0); 1961 CHECK_STRING (name);
1962 return concat2 (build_string ("Character set "), name); 1962 return concat2 (build_string ("Character set "), name);
1963 } 1963 }
1964 else 1964 else
@@ -2037,7 +2037,7 @@ Control characters turn into \"^char\", etc.")
2037 unsigned char str[6]; 2037 unsigned char str[6];
2038 int c; 2038 int c;
2039 2039
2040 CHECK_NUMBER (character, 0); 2040 CHECK_NUMBER (character);
2041 2041
2042 c = XINT (character); 2042 c = XINT (character);
2043 if (!SINGLE_BYTE_CHAR_P (c)) 2043 if (!SINGLE_BYTE_CHAR_P (c))
@@ -2941,7 +2941,7 @@ This is text showing the elements of vector matched against indices.")
2941 int count = specpdl_ptr - specpdl; 2941 int count = specpdl_ptr - specpdl;
2942 2942
2943 specbind (Qstandard_output, Fcurrent_buffer ()); 2943 specbind (Qstandard_output, Fcurrent_buffer ());
2944 CHECK_VECTOR_OR_CHAR_TABLE (vector, 0); 2944 CHECK_VECTOR_OR_CHAR_TABLE (vector);
2945 describe_vector (vector, Qnil, describe_vector_princ, 0, 2945 describe_vector (vector, Qnil, describe_vector_princ, 0,
2946 Qnil, Qnil, (int *)0, 0); 2946 Qnil, Qnil, (int *)0, 0);
2947 2947
@@ -3306,7 +3306,7 @@ Return list of symbols found.")
3306 Lisp_Object regexp, predicate; 3306 Lisp_Object regexp, predicate;
3307{ 3307{
3308 struct gcpro gcpro1, gcpro2; 3308 struct gcpro gcpro1, gcpro2;
3309 CHECK_STRING (regexp, 0); 3309 CHECK_STRING (regexp);
3310 apropos_predicate = predicate; 3310 apropos_predicate = predicate;
3311 GCPRO2 (apropos_predicate, apropos_accumulate); 3311 GCPRO2 (apropos_predicate, apropos_accumulate);
3312 apropos_accumulate = Qnil; 3312 apropos_accumulate = Qnil;