all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* bogus change(s) in cl-macs.el
@ 2004-11-19  3:06 Katsumi Yamaoka
  2004-11-19  3:41 ` Luc Teirlinck
                   ` (2 more replies)
  0 siblings, 3 replies; 14+ messages in thread
From: Katsumi Yamaoka @ 2004-11-19  3:06 UTC (permalink / raw)
  Cc: emacs-w3m

Hello,

There are many changes made in the version 1.46 of cl-macs.el.

revision 1.46
date: 2004/11/16 04:05:29;  author: monnier;  state: Exp;  lines: +219 -225
Use make-symbol rather than gensym.
(loop, cl-parse-loop-clause, defsetf): Use backquote.

First of all, I protest strongly that such a big change has not
been recorded on the ChangeLog file.  Second, the change at least
to the `labels' macro breaks emacs-w3m.  Emacs-w3m uses some cl
macros including `labels' in order to work together with the
external w3m command asynchronously.  The patch below should be
applied.  Third, I'm not sure whether a problem is limited only
to it.

*** cl-macs.el~	Tue Nov 16 21:54:14 2004
--- cl-macs.el	Fri Nov 19 01:30:39 2004
***************
*** 1314,1320 ****
  \(fn ((FUNC ARGLIST BODY...) ...) FORM...)"
    (let ((vars nil) (sets nil) (cl-macro-environment cl-macro-environment))
      (while bindings
!       (let ((var (make-symbol "--cl-var--")))
  	(push var vars)
  	(push (list 'function* (cons 'lambda (cdar bindings))) sets)
  	(push var sets)
--- 1314,1320 ----
  \(fn ((FUNC ARGLIST BODY...) ...) FORM...)"
    (let ((vars nil) (sets nil) (cl-macro-environment cl-macro-environment))
      (while bindings
!       (let ((var (gensym)))
  	(push var vars)
  	(push (list 'function* (cons 'lambda (cdar bindings))) sets)
  	(push var sets)

Regards,

^ permalink raw reply	[flat|nested] 14+ messages in thread

end of thread, other threads:[~2004-11-26 23:51 UTC | newest]

Thread overview: 14+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-11-19  3:06 bogus change(s) in cl-macs.el Katsumi Yamaoka
2004-11-19  3:41 ` Luc Teirlinck
2004-11-19  3:51   ` Miles Bader
2004-11-19  4:21     ` Luc Teirlinck
2004-11-19  3:48 ` Miles Bader
2004-11-19  3:59   ` Katsumi Yamaoka
2004-11-19  5:55     ` [emacs-w3m:07185] " Katsumi Yamaoka
2004-11-19  7:10       ` Stefan Monnier
2004-11-19 20:04         ` Richard Stallman
2004-11-26  2:17         ` Katsumi Yamaoka
2004-11-26  4:03           ` Stefan Monnier
2004-11-26  5:18             ` Katsumi Yamaoka
2004-11-26 23:51         ` Stefan Monnier
2004-11-19  5:40 ` Stefan Monnier

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.