diff options
| author | Pavel Janík | 2001-11-02 20:46:55 +0000 |
|---|---|---|
| committer | Pavel Janík | 2001-11-02 20:46:55 +0000 |
| commit | b78265036088d5d0eac2a03b929adb50aa59b45c (patch) | |
| tree | de99fe733144deb926fd31ee7bdff95cb1bc5073 /src/keymap.c | |
| parent | 00a2cef7d11a1b193891eb3d28274ef7fc7c3fe4 (diff) | |
| download | emacs-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.c | 8 |
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; |