duplicate bindings in let*

[Bill Schottstaedt]

I think in the current CVS guile, there's a bug in let*:

/home/bil/cl/ ../test/bin/guile-config --version
guile-config - Guile version 1.4.1
/home/bil/cl/ ../test/bin/guile-config link
ERROR: In procedure let*:
ERROR: duplicate bindings

perhaps caused by the two "flags" in build-link?


guile> (main (list "guile-config" "link"))
guile-config:143:3: In procedure let* in expression (let* (# #)  
(display-separated flags) ...):
guile-config:143:3: duplicate bindings
ABORT: (misc-error)
guile> (backtrace)

Backtrace:
0* [main ("guile-config" "link")]
1  (let ((args #)) (cond (# # #) (# => #) (#t # #)))
   ...
2  (let* ((flags #) (flags #)) (display-separated flags) (newline))

Type "(debug-enable 'backtrace)" if you would like a backtrace
automatically if an error occurs in the future.


guile> (let* ((a 3) (a 4)) a)
standard input:4:1: In procedure let* in expression (let* (# #) a):
standard input:4:1: duplicate bindings
ABORT: (misc-error)