| commit | 1f0816b69dfdbda486bf0329bbfb2e8ccee63d39 | |
| author | Stefan Monnier <monnier@iro.umontreal.ca> | |
| Sun, 27 Feb 2011 02:50:38 +0000 (26 21:50 -0500) | ||
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | |
| Sun, 27 Feb 2011 02:50:38 +0000 (26 21:50 -0500) | ||
| tree | c6ed9cdc04df06eea3d23aa98d06c45f86647445 | treesnapshot (tar.gz zip) |
| parent | 53f963cf73d93a7d1dca07d4c338acd5b6c8cb2f | commitdiff |
* lisp/emacs-lisp/pcase.el (pcase--if): Try to invert test to reduce depth.
(pcase-mutually-exclusive-predicates): New var.
(pcase--split-consp, pcase--split-pred): Use it.
(pcase--split-equal, pcase--split-member): When splitting against
a pure predicate, run it to know the outcome.
(pcase--u1): Mark vars that are actually used.
(pcase--q1): Avoid introducing unused vars.
(pcase-mutually-exclusive-predicates): New var.
(pcase--split-consp, pcase--split-pred): Use it.
(pcase--split-equal, pcase--split-member): When splitting against
a pure predicate, run it to know the outcome.
(pcase--u1): Mark vars that are actually used.
(pcase--q1): Avoid introducing unused vars.
| lisp/ChangeLog | diffblobblamehistory | |
| lisp/emacs-lisp/pcase.el | diffblobblamehistory |