emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] feature/byte-switch c4316a2: ; bytecomp.el (byte-compile-c


From: Vibhav Pant
Subject: [Emacs-diffs] feature/byte-switch c4316a2: ; bytecomp.el (byte-compile-cond-jump-table): Add TODO note
Date: Mon, 6 Feb 2017 14:03:14 +0000 (UTC)

branch: feature/byte-switch
commit c4316a266185c4adbb8d15a04b9552882b3c34a8
Author: Vibhav Pant <address@hidden>
Commit: Vibhav Pant <address@hidden>

    ; bytecomp.el (byte-compile-cond-jump-table): Add TODO note
---
 lisp/emacs-lisp/bytecomp.el |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index c70e1bf..d5a163e 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -4057,6 +4057,8 @@ Return a list of the form ((TEST . VAR)  ((VALUE BODY) 
...))"
          (cases (cadr table-info))
          jump-table test-obj body tag donetag default-tag default-case)
     (when (and cases (not (= (length cases) 1)))
+      ;; TODO: Once :linear-search is implemented for `make-hash-table'
+      ;; set it to `t' for cond forms with a small number of cases.
       (setq jump-table (make-hash-table :test test
                                         :purecopy t
                                         :size (if (assq 'default cases)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]