procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Revert "Prevent name clashes between CL structures and builtin types"

Browse source 
This reverts commit 151496a4b9.
That commit breaks bootstrap builds due to a cyclic dependency.
This commit is contained in:
Philipp Stephani 2018-01-07 14:14:38 +01:00
parent 6735df4443
commit 610dad1102
5 changed files with 0 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/cl-macs.el
View file

@ -43,7 +43,6 @@
;;; Code:
(require 'cl-generic)
(require 'cl-lib)
(require 'macroexp)
;; `gv' is required here because cl-macs can be loaded before loaddefs.el.
@ -2664,9 +2663,6 @@ non-nil value, that slot cannot be set via `setf'.
(forms nil)
(docstring (if (stringp (car descs)) (pop descs)))
pred-form pred-check)
;; Can't use `cl-check-type' yet.
(unless (cl--struct-name-p name)
(signal 'wrong-type-argument (list 'cl-struct-name-p name 'name)))
(setq descs (cons '(cl-tag-slot)
(mapcar (function (lambda (x) (if (consp x) x (list x))))
descs)))