Wrong values with symbol-macrolet

[vlad]

Case I

(symbol-macrolet ((x 'foo) (y (list x)))
  (values
   (list x (let ((x 'bar)) x))
   (list x y)) )

=> (FOO BAR)

Case II

(symbol-macrolet () (values 'a 'b 'c 'd 'e))
=> a