Re: master 1f5b4ed: * test/lisp/emacs-lisp/cl-lib-tests.el (cl-lib-symbol-macrolet): New test.

[Lars Brinkhoff]

Stefan Monnier wrote:
> +(ert-deftest cl-lib-symbol-macrolet ()
> +  (should (equal (cl-flet ((f (x) (+ x 5)))
> +                   (let ((x 5))
> +                     (f (+ x 6))))
> +                 (cl-symbol-macrolet ((f (+ x 6)))
> +                   (cl-flet ((f (x) (+ x 5)))
> +                     (let ((x 5))
> +                       (f f)))))))

I get errors from this:

Eager macro-expansion failure: (wrong-type-argument listp #[128
"address@hidden@       \300\242D\207\302\300\242BB\207"
[(--cl-f--)cl--labels-magic funcall] 4 " (fn &rest ARGS)"])