diff options
| author | Paul Eggert | 2014-05-19 12:19:05 -0700 |
|---|---|---|
| committer | Paul Eggert | 2014-05-19 12:19:05 -0700 |
| commit | 2f1205e0848f7f6ed4578a36c656106a9ba69a8e (patch) | |
| tree | fb23d42169db84a5fb81730489281ce57475960d /src/data.c | |
| parent | 427de5355f3c70e60ddc65324f1270d533fca0c2 (diff) | |
| download | emacs-2f1205e0848f7f6ed4578a36c656106a9ba69a8e.tar.gz emacs-2f1205e0848f7f6ed4578a36c656106a9ba69a8e.zip | |
Allow any non-nil value to count as true in bool-vector.
Likewise for xd_signature in dbusbind.c.
This is more consistent with the usual practice in Emacs, which is
that any non-nil value counts as true.
* doc/lispref/sequences.texi (Bool-Vectors): Coalesce discussion of how to
print them. bool-vector's args need not be t or nil.
* src/alloc.c (Fbool_vector): Don't require args to be t or nil.
* src/dbusbind.c (xd_signature): Likewise, for booleans.
* src/data.c, lisp.h (Qbooleanp):
* src/lisp.h (CHECK_BOOLEAN): Remove. All uses removed.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c index 4061311e7ba..bf863aaed79 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -54,7 +54,7 @@ Lisp_Object Qend_of_file, Qarith_error, Qmark_inactive; | |||
| 54 | Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; | 54 | Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; |
| 55 | Lisp_Object Qtext_read_only; | 55 | Lisp_Object Qtext_read_only; |
| 56 | 56 | ||
| 57 | Lisp_Object Qintegerp, Qwholenump, Qsymbolp, Qlistp, Qconsp, Qbooleanp; | 57 | Lisp_Object Qintegerp, Qwholenump, Qsymbolp, Qlistp, Qconsp; |
| 58 | static Lisp_Object Qnatnump; | 58 | static Lisp_Object Qnatnump; |
| 59 | Lisp_Object Qstringp, Qarrayp, Qsequencep, Qbufferp; | 59 | Lisp_Object Qstringp, Qarrayp, Qsequencep, Qbufferp; |
| 60 | Lisp_Object Qchar_or_string_p, Qmarkerp, Qinteger_or_marker_p, Qvectorp; | 60 | Lisp_Object Qchar_or_string_p, Qmarkerp, Qinteger_or_marker_p, Qvectorp; |
| @@ -3442,7 +3442,6 @@ syms_of_data (void) | |||
| 3442 | 3442 | ||
| 3443 | DEFSYM (Qlistp, "listp"); | 3443 | DEFSYM (Qlistp, "listp"); |
| 3444 | DEFSYM (Qconsp, "consp"); | 3444 | DEFSYM (Qconsp, "consp"); |
| 3445 | DEFSYM (Qbooleanp, "booleanp"); | ||
| 3446 | DEFSYM (Qsymbolp, "symbolp"); | 3445 | DEFSYM (Qsymbolp, "symbolp"); |
| 3447 | DEFSYM (Qkeywordp, "keywordp"); | 3446 | DEFSYM (Qkeywordp, "keywordp"); |
| 3448 | DEFSYM (Qintegerp, "integerp"); | 3447 | DEFSYM (Qintegerp, "integerp"); |