[debbugs-tracker] bug#10938: closed (procedure-arguments return differnet output when procedure-property is used)

[GNU bug Tracking System]

Your message dated Mon, 02 Jul 2012 15:11:30 +0200
with message-id <address@hidden>
and subject line Re: bug#10938: patch
has caused the debbugs.gnu.org bug report #10938,
regarding procedure-arguments return differnet output when procedure-property 
is used
to be marked as done.

(If you believe you have received this mail in error, please contact
address@hidden)


-- 
10938: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=10938
GNU Bug Tracking System
Contact address@hidden with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> procedure-arguments return differnet output when procedure-property	is used
>
>
>
>
> Date: 
>
> Sun, 4 Mar 2012 13:15:47 +0100
>
>
>
>
> Typeically in guile
>
> > (procedure-arguments g)
> $3 = ((required x) (optional) (keyword) (allow-other-keys? . #f) (rest . #f))
>
> for a program g. But if we attach a procedure property 'arglist the outpu is acording to (system ice-9 session),
> (define (procedure-arguments proc)
>   "Return an alist describing the arguments that `proc' accepts, or `#f'
> if the information cannot be obtained.
>
> The alist keys that are currently defined are `required', `optional',
> `keyword', and `rest'."
>   (cond
>    ((procedure-property proc 'arglist)
>     => (lambda (arglist)
>          `((required . ,(car arglist))
>            (optional . ,(cadr arglist))
>            (keyword . ,(caddr arglist))
>            (allow-other-keys? . ,(cadddr arglist))
>            (rest . ,(car (cddddr arglist))))))
>    ((procedure-source proc)
>     => cadr)
>    (((@ (system vm program) program?) proc)
>     ((@ (system vm program) program-arguments-alist) proc))
>    (else #f)))
>
> Acording to the description allow-other-keys? is not included, but returned for a program
> but not of prop 'arglist is used, so either
>
> 1. drop allow-other-keys? from the program? version or add it to the proper version and change doc string
>
> Regards
> Stefan
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: bug#10938: patch
>
>
>
>
> Date: 
>
> Mon, 02 Jul 2012 15:11:30 +0200
>
>
>
>
> User-agent: 
>
> Gnus/5.130005 (Ma Gnus v0.5) Emacs/24.1 (gnu/linux)
>
>
>
>
> Hi Stefan,
>
> Thanks, fixed differently in a8215aedad433a15abf87c2310a41c684dfcef97.
>
> In the future, could you please provide a patch with a log and test case
> similar to what’s in the above commit?
>
> Ludo’.
>
>
> --- End Message ---