486 |
Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared |
Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared |
487 |
against each key in each KEYLIST; the corresponding BODY is evaluated. |
against each key in each KEYLIST; the corresponding BODY is evaluated. |
488 |
If no clause succeeds, case returns nil. A single atom may be used in |
If no clause succeeds, case returns nil. A single atom may be used in |
489 |
place of a KEYLIST of one atom. A KEYLIST of `t' or `otherwise' is |
place of a KEYLIST of one atom. A KEYLIST of t or `otherwise' is |
490 |
allowed only in the final clause, and matches if no other keys match. |
allowed only in the final clause, and matches if no other keys match. |
491 |
Key values are compared by `eql'." |
Key values are compared by `eql'." |
492 |
(let* ((temp (if (cl-simple-expr-p expr 3) expr (gensym))) |
(let* ((temp (if (cl-simple-expr-p expr 3) expr (gensym))) |
523 |
"Evals EXPR, chooses from CLAUSES on that value. |
"Evals EXPR, chooses from CLAUSES on that value. |
524 |
Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it |
Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it |
525 |
satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds, |
satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds, |
526 |
typecase returns nil. A TYPE of `t' or `otherwise' is allowed only in the |
typecase returns nil. A TYPE of t or `otherwise' is allowed only in the |
527 |
final clause, and matches if no other keys match." |
final clause, and matches if no other keys match." |
528 |
(let* ((temp (if (cl-simple-expr-p expr 3) expr (gensym))) |
(let* ((temp (if (cl-simple-expr-p expr 3) expr (gensym))) |
529 |
(type-list nil) |
(type-list nil) |