compiler bug: let with name clash

Try to compile the code below. 'mysum' gets macro-expanded
by the compiler where it shouldn't.

ralf


(dm mysum (_ . args)
   `(+ ,@args) )

(defun some-func ()
   (let ((mysum 0))
     ((-double-) mysum)
     ;; calculate
     mysum))

(dhc-make ()
 	  some-func)




-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems?  Stop!  Download the new AJAX search engine that makes
searching your log files as easy as surfing the  web.  DOWNLOAD SPLUNK!
http://ads.osdn.com/?ad_id=7637&alloc_id=16865&op=click