Re: master 0f443a1: New library thunk.el

Re: master 0f443a1: New library thunk.el

[Artur Malabarba]

[-- Attachment #1.1: Type: text/plain, Size: 512 bytes --]

> +(defmacro thunk-delay (&rest body)
> +  "Delay the evaluation of BODY."
> +  (declare (debug t))
> +  (let ((forced (make-symbol "forced"))
> +        (val (make-symbol "val")))
> +    `(let (,forced ,val)
> +       (lambda (&optional check)
> +         (if check
> +             ,forced
> +           (unless ,forced
> +             (setf ,val (progn ,@body))
> +             (setf ,forced t)))
> +         ,val))))

Maybe I'm misreading this on my phone, but it looks like this val should be
inside the if.

[-- Attachment #1.2: Type: text/html, Size: 739 bytes --]

Re: [Emacs-diffs] master 0f443a1: New library thunk.el

[Nicolas Petton]

[-- Attachment #1: Type: text/plain, Size: 177 bytes --]

Artur Malabarba <bruce.connor.am@gmail.com> writes:

> Maybe I'm misreading this on my phone, but it looks like this val should be
> inside the if.

You're right, thanks.

Nico

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 512 bytes --]