bug#23660: Patch for (edebug doesn't support circular object read syntax)

[npostavs]

tags 23660 patch
quit

Gemini Lasswell <gazally@runbox.com> writes:

> Here's a patch adding support for circular object read syntax to Edebug:

Looks good, I will push to master in a few days.

The main motivation (which I probably should have mentioned in the OP)
is to step in macro expansions, e.g. after doing (setq print-circle t
print-gensym t)

    (pcase '(1 2)
      (`(,a ,b) (+ a b)))

expands to

    (if (consp #1='(1 2))
        (let* ((#5=#:x (car #1#))
               (#2=#:x (cdr #1#)))
          (if (consp #2#)
              (let* ((#4=#:x (car #2#))
                     (#3=#:x (cdr #2#)))
                (if (null #3#)
                    (let ((b #4#)
                          (a #5#))
                      (+ a b))
                  nil))
            nil))
      nil)

With the patch, I can step through the latter nicely.  Thanks!