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

* lisp/emacs-lisp/cl-lib.el (cl-declaim): Paren typo.

Browse source
This commit is contained in:
Stefan Monnier 2012-12-09 20:32:36 -05:00
parent 8d1a544c11
commit bad162fd1b
2 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/ChangeLog
View file

@ -1,17 +1,20 @@
2012-12-10 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/cl-lib.el (cl-declaim): Paren typo.
2012-12-09 Eli Zaretskii <eliz@gnu.org> 2012-12-09 Eli Zaretskii <eliz@gnu.org>
Parallelize byte compilation on MS-Windows. Parallelize byte compilation on MS-Windows.
* makefile.w32-in (WINS_BASIC1, WINS_BASIC2, WINS_BASIC3) * makefile.w32-in (WINS_BASIC1, WINS_BASIC2, WINS_BASIC3)
(WINS_BASIC4): New variables, subdivide subdirectories into 4 (WINS_BASIC4): New variables, subdivide subdirectories into 4 parts.
parts.
(WINS_BASIC): Define as concatenation of the above. (WINS_BASIC): Define as concatenation of the above.
(compile): Subdivide into 4 separate and independent jobs that can (compile): Subdivide into 4 separate and independent jobs that can
be run in parallel. be run in parallel.
(compile0-CMD, compile0-SH): New targets for compiling (compile0-CMD, compile0-SH): New targets for compiling
COMPILE_FIRST files, which are prerequisites for the rest of the COMPILE_FIRST files, which are prerequisites for the rest of the
byte-compilation. byte-compilation.
(compile1-CMD, compile2-CMD, compile3-CMD, compile4-CMD): New (compile1-CMD, compile2-CMD, compile3-CMD, compile4-CMD):
targets for parallel compilation with cmd.exe. New targets for parallel compilation with cmd.exe.
(compile1-SH, compile2-SH, compile3-SH, compile4-SH): Ditto for (compile1-SH, compile2-SH, compile3-SH, compile4-SH): Ditto for
compiling under a Unixy shell. compiling under a Unixy shell.

2
lisp/emacs-lisp/cl-lib.el
View file

@ -260,7 +260,7 @@ one value.
"Like `cl-proclaim', but takes any number of unevaluated, unquoted arguments. "Like `cl-proclaim', but takes any number of unevaluated, unquoted arguments.
Puts `(cl-eval-when (compile load eval) ...)' around the declarations Puts `(cl-eval-when (compile load eval) ...)' around the declarations
so that they are registered at compile-time as well as run-time." so that they are registered at compile-time as well as run-time."
(let ((body (mapcar (lambda (x) `(cl-proclaim ',x) specs)))) (let ((body (mapcar (lambda (x) `(cl-proclaim ',x)) specs)))
(if (cl--compiling-file) `(cl-eval-when (compile load eval) ,@body) (if (cl--compiling-file) `(cl-eval-when (compile load eval) ,@body)
`(progn ,@body)))) ; Avoid loading cl-macs.el for cl-eval-when. `(progn ,@body)))) ; Avoid loading cl-macs.el for cl-eval-when.