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

[Tino Calancha]

Lars Brinkhoff <address@hidden> writes:

> 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)"])
Commit 0d112c00ba0ec14bd3014efcd3430b9ddcfe1fc1
(Bug#26068)