[Top][All Lists]

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

Re: [Emacs-diffs] /srv/bzr/emacs/trunk r111086: gmm-utils.el (gmm-flet,

From: Katsumi Yamaoka
Subject: Re: [Emacs-diffs] /srv/bzr/emacs/trunk r111086: gmm-utils.el (gmm-flet, gmm-labels): New macros.
Date: Wed, 05 Dec 2012 07:39:19 +0900
User-agent: Gnus/5.130006 (真 Gnus v0.6) Emacs/24.3.50 (i686-pc-cygwin)

Stefan Monnier wrote:
>> +;; `flet' and `labels' got obsolete since Emacs 24.3.
>> +(defmacro gmm-flet (bindings &rest body)
> Nooooooooooooooo!!!!!!!!!
> Please don't!
> Same for gmm-labels!

Ok, I'll replace both so as to use cl-flet and cl-labels soon.

IIRC I didn't see neither cl-flet nor cl-letf wasn't usable as
an analogue to flet (I tried them right after flet was marked
obsolete).  But now I confirmed it:

(progn (pp (macroexpand
'(cl-flet ((message (&rest args) (concat "X " (apply #'format args))))
   (message "Hello"))
 )) nil)
(let ((--cl-message--
        (lambda (&rest args)
          (concat "X " (apply #'format args))))))
  (funcall --cl-message-- "Hello"))

OTHO, as for gmm-labels I was already using cl-labels in the
same way as you suggested for flet.  But why I tried it so as
not to depend on cl was to try to reduce the ugliness of the way
cl handles the #'FUNC cases in a labels form.

reply via email to

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