[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 9278d90: * lisp/emacs-lisp/pcase.el (pcase): Commen
From: |
Noam Postavsky |
Subject: |
[Emacs-diffs] master 9278d90: * lisp/emacs-lisp/pcase.el (pcase): Comment debug message (Bug#26177). |
Date: |
Sat, 25 Mar 2017 19:28:05 -0400 (EDT) |
branch: master
commit 9278d904af13c3c083defdcbf5fa21260d4457c3
Author: Paul Pogonyshev <address@hidden>
Commit: Noam Postavsky <address@hidden>
* lisp/emacs-lisp/pcase.el (pcase): Comment debug message (Bug#26177).
---
lisp/emacs-lisp/pcase.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el
index 289265a..fc5474e 100644
--- a/lisp/emacs-lisp/pcase.el
+++ b/lisp/emacs-lisp/pcase.el
@@ -175,8 +175,8 @@ Emacs Lisp manual for more information and examples."
;; (when (gethash (car cases) pcase--memoize-2)
;; (message "pcase-memoize failed because of eq test on %S"
;; (car cases)))
- (when data
- (message "pcase-memoize: equal first branch, yet different"))
+ ;; (when data
+ ;; (message "pcase-memoize: equal first branch, yet different"))
(let ((expansion (pcase--expand exp cases)))
(puthash (car cases) `(,exp ,cases ,@expansion) pcase--memoize)
;; (puthash (car cases) `(,exp ,cases ,@expansion) pcase--memoize-1)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 9278d90: * lisp/emacs-lisp/pcase.el (pcase): Comment debug message (Bug#26177).,
Noam Postavsky <=