Subject: Re: bug#49149: [PATCH 0/7] Add deb format for guix pack.

From: Maxim Cournoyer <[email-masked]>
Date: Sat, 26 Jun 2021 01:03:30 -0400

Hi,

Maxim Cournoyer <[email-masked]> writes:

[...]

> +(define-syntax-rule (define-with-source (variable args ...) body body* ...)
> +  "Bind VARIABLE to a procedure accepting ARGS defined as BODY, also setting
> +its source property."
> +  (begin
> +    (define (variable args ...)
> +      body)

Some typo slipped here.  It should have been body body* ..., as in the template.

> +    (eval-when (load eval)
> +      (set-procedure-property! variable 'source
> +                               '(define (variable args ...) body body* ...)))))
> +

Thanks,

Maxim