aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrea Corallo2022-08-18 23:35:33 +0200
committerAndrea Corallo2022-08-18 23:36:19 +0200
commit715f1ebea303459747765f2c5e08e9c41c97e65b (patch)
tree69a0bec7178b7f17747a8aa1d3264d5846d70a7f
parent869bef892b0211704ba438d37ba6914574835c7e (diff)
downloademacs-715f1ebea303459747765f2c5e08e9c41c97e65b.tar.gz
emacs-715f1ebea303459747765f2c5e08e9c41c97e65b.zip
* lisp/emacs-lisp/comp-cstr.el (comp--all-builtin-types): Remove
-rw-r--r--lisp/emacs-lisp/comp-cstr.el4
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/comp-cstr.el b/lisp/emacs-lisp/comp-cstr.el
index 6451e34c42f..948a2c4f702 100644
--- a/lisp/emacs-lisp/comp-cstr.el
+++ b/lisp/emacs-lisp/comp-cstr.el
@@ -43,10 +43,6 @@
43 ;; TODO can we just add t in `cl--typeof-types'? 43 ;; TODO can we just add t in `cl--typeof-types'?
44 "Like `cl--typeof-types' but with t as common supertype.") 44 "Like `cl--typeof-types' but with t as common supertype.")
45 45
46(defconst comp--all-builtin-types
47 (append cl--all-builtin-types '(t))
48 "Likewise like `cl--all-builtin-types' but with t as common supertype.")
49
50(cl-defstruct (comp-cstr (:constructor comp-type-to-cstr 46(cl-defstruct (comp-cstr (:constructor comp-type-to-cstr
51 (type &aux 47 (type &aux
52 (null (eq type 'null)) 48 (null (eq type 'null))