Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

[Andrea Corallo]

Stephen Berman via Mailing list for Emacs changes <emacs-diffs@gnu.org>
writes:

> branch: emacs-30
> commit 6bca138d60e47d0fbab4faf8e83c5b9b319f260d
> Author: Stephen Berman <stephen.berman@gmx.net>
> Commit: Stephen Berman <stephen.berman@gmx.net>
>
>     Fix latest test for dabbrev-expand
>
>     * test/lisp/dabbrev-tests.el (dabbrev-expand-after-killing-buffer):
>     Fix typo in a 'should' test, use part of return value of 'should-error'
>     test, and remove mistaken and unfounded FIXME comment.

Hello Stephen,

this commit is introducing in my test-bed the following three failures
in emacs-30: dabbrev-expand-test-other-buffer-4,
dabbrev-expand-test-other-buffer-3, dabbrev-expand-after-killing-buffer.
Could you please have a look?

  Andrea

Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

[Stephen Berman]

On Mon, 02 Dec 2024 15:45:23 -0500 Andrea Corallo <acorallo@gnu.org> wrote:

> Stephen Berman via Mailing list for Emacs changes <emacs-diffs@gnu.org>
> writes:
>
>> branch: emacs-30
>> commit 6bca138d60e47d0fbab4faf8e83c5b9b319f260d
>> Author: Stephen Berman <stephen.berman@gmx.net>
>> Commit: Stephen Berman <stephen.berman@gmx.net>
>>
>>     Fix latest test for dabbrev-expand
>>
>>     * test/lisp/dabbrev-tests.el (dabbrev-expand-after-killing-buffer):
>>     Fix typo in a 'should' test, use part of return value of 'should-error'
>>     test, and remove mistaken and unfounded FIXME comment.
>
> Hello Stephen,
>
> this commit is introducing in my test-bed the following three failures
> in emacs-30: dabbrev-expand-test-other-buffer-4,
> dabbrev-expand-test-other-buffer-3, dabbrev-expand-after-killing-buffer.
> Could you please have a look?
>
>   Andrea

How does your testbed run the tests?  When I invoke `emacs-30 -batch -l
~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el -f
ert-run-tests-batch-and-exit' from the shell, all tests pass.  Likewise,
when I start emacs-30 -Q, then `M-x load-file
~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el', then kill all
non-hidden buffers except *scratch*, and then run `M-x ert', all tests
pass.  Since the batch run is also used by `make check', I've assumed
that, since the tests succeed (at least for me) in this mode, they are
valid regression tests.

In contrast, when I start emacs -Q, visit
~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el, evaluate the buffer and
run `M-x ert', then I get five test failures:
dabbrev-expand-test-other-buffer-{1,2,3,4} and
dabbrev-expand-after-killing-buffer.  The latter fails because
dabbrev-expand finds an expansion in the test file buffer (but succeeds
when there is no such buffer, as in the previous run starting with -Q).
The four other tests fail possibly for the same reason; however, these
four tests fail in this way since being introduced in commit 8113b5c562
(see
https://lists.gnu.org/archive/html/bug-gnu-emacs/2024-10/msg01752.html),
so it puzzles me that you only see just two of those failures and only
after my latest commit.  (However, I did get the same three failures you
reported when I ran ert on the test file from commit bd8a6f70fb,
i.e. the one prior to the above commit, but only after uncommenting the
code lines that are commented out in that commit.  Could it be that you
accidentally tested using that previous commit with those code lines
uncommented?)

Steve Berman

Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

[Andrea Corallo]

Stephen Berman <stephen.berman@gmx.net> writes:

> On Mon, 02 Dec 2024 15:45:23 -0500 Andrea Corallo <acorallo@gnu.org> wrote:
>
>> Stephen Berman via Mailing list for Emacs changes <emacs-diffs@gnu.org>
>> writes:
>>
>>> branch: emacs-30
>>> commit 6bca138d60e47d0fbab4faf8e83c5b9b319f260d
>>> Author: Stephen Berman <stephen.berman@gmx.net>
>>> Commit: Stephen Berman <stephen.berman@gmx.net>
>>>
>>>     Fix latest test for dabbrev-expand
>>>
>>>     * test/lisp/dabbrev-tests.el (dabbrev-expand-after-killing-buffer):
>>>     Fix typo in a 'should' test, use part of return value of 'should-error'
>>>     test, and remove mistaken and unfounded FIXME comment.
>>
>> Hello Stephen,
>>
>> this commit is introducing in my test-bed the following three failures
>> in emacs-30: dabbrev-expand-test-other-buffer-4,
>> dabbrev-expand-test-other-buffer-3, dabbrev-expand-after-killing-buffer.
>> Could you please have a look?
>>
>>   Andrea
>
> How does your testbed run the tests?  When I invoke `emacs-30 -batch -l
> ~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el -f
> ert-run-tests-batch-and-exit' from the shell, all tests pass.  Likewise,
> when I start emacs-30 -Q, then `M-x load-file
> ~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el', then kill all
> non-hidden buffers except *scratch*, and then run `M-x ert', all tests
> pass.  Since the batch run is also used by `make check', I've assumed
> that, since the tests succeed (at least for me) in this mode, they are
> valid regression tests.
>
> In contrast, when I start emacs -Q, visit
> ~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el, evaluate the buffer and
> run `M-x ert', then I get five test failures:
> dabbrev-expand-test-other-buffer-{1,2,3,4} and
> dabbrev-expand-after-killing-buffer.  The latter fails because
> dabbrev-expand finds an expansion in the test file buffer (but succeeds
> when there is no such buffer, as in the previous run starting with -Q).
> The four other tests fail possibly for the same reason; however, these
> four tests fail in this way since being introduced in commit 8113b5c562
> (see
> https://lists.gnu.org/archive/html/bug-gnu-emacs/2024-10/msg01752.html),
> so it puzzles me that you only see just two of those failures and only
> after my latest commit.  (However, I did get the same three failures you
> reported when I ran ert on the test file from commit bd8a6f70fb,
> i.e. the one prior to the above commit, but only after uncommenting the
> code lines that are commented out in that commit.  Could it be that you
> accidentally tested using that previous commit with those code lines
> uncommented?)
>
> Steve Berman

Hi Steve,

my testbench is running "make check -j24" on a fresh checkout on
x86_64-pc-linux-gnu for few different configurations.  For instance I
can see the failures on the latest emacs-30
e618d5ae941d005e9da6d5d5cba68cc0ecade0e5 configured with
"--with-native-compilation=no --with-x-toolkit=no".

Test dabbrev-expand-test-other-buffer-3 backtrace:
  signal(ert-test-failed (((should (string= (buffer-string) "Indic and
  ert-fail(((should (string= (buffer-string) "Indic and")) :form (stri
  #f(compiled-function () #<bytecode 0x15984b7a4b7dc916>)()
  #f(compiled-function () #<bytecode 0x1ea04fa01345ba2a>)()
  handler-bind-1(#f(compiled-function () #<bytecode 0x1ea04fa01345ba2a
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name dabbrev-expand-test-other-buffer-3 :d
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (or (tag :expensive-test) (tag :unstable))) #f(co
  ert-run-tests-batch((not (or (tag :expensive-test) (tag :unstable)))
  ert-run-tests-batch-and-exit((not (or (tag :expensive-test) (tag :un
  eval((ert-run-tests-batch-and-exit '(not (or (tag :expensive-test) (
  command-line-1(("-L" ":." "-l" "ert" "--eval" "(setq treesit-extra-l
  command-line()
  normal-top-level()
Test dabbrev-expand-test-other-buffer-3 condition:
    (ert-test-failed
     ((should (string= (buffer-string) "Indic and")) :form
      (string= "Indic\")) (execute-kbd-macro" "Indic and") :value nil
      :explanation
      (arrays-of-different-length 27 9 "Indic\")) (execute-kbd-macro"
                                  "Indic and" first-mismatch-at 5)))
   FAILED  11/16  dabbrev-expand-test-other-buffer-3 (0.042668 sec) at lisp/dabbrev-tests.el:175


Test dabbrev-expand-test-other-buffer-4 backtrace:
  user-error("No%s dynamic expansion for `%s' found" "" "execute-kbd-m
  dabbrev-expand(nil)
  funcall-interactively(dabbrev-expand nil)
  command-execute(dabbrev-expand)
  execute-kbd-macro([73 110 100 134217775])
  #f(compiled-function () #<bytecode -0x15ea54be0ab851ac>)()
  #f(compiled-function () #<bytecode 0x1ea04fa01345ba2a>)()
  handler-bind-1(#f(compiled-function () #<bytecode 0x1ea04fa01345ba2a
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name dabbrev-expand-test-other-buffer-4 :d
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (or (tag :expensive-test) (tag :unstable))) #f(co
  ert-run-tests-batch((not (or (tag :expensive-test) (tag :unstable)))
  ert-run-tests-batch-and-exit((not (or (tag :expensive-test) (tag :un
  eval((ert-run-tests-batch-and-exit '(not (or (tag :expensive-test) (
  command-line-1(("-L" ":." "-l" "ert" "--eval" "(setq treesit-extra-l
  command-line()
  normal-top-level()
Test dabbrev-expand-test-other-buffer-4 condition:
    (user-error "No dynamic expansion for `execute-kbd-macroInd' found")
   FAILED  12/16  dabbrev-expand-test-other-buffer-4 (0.021285 sec) at lisp/dabbrev-tests.el:194


Test dabbrev-expand-after-killing-buffer backtrace:
  signal(ert-test-failed (((should (string= msg "No further dynamic ex
  ert-fail(((should (string= msg "No further dynamic expansion for ‘ab
  #f(compiled-function () #<bytecode 0x18257815d6a0b741>)()
  #f(compiled-function () #<bytecode 0x1ea04fa01345ba2a>)()
  handler-bind-1(#f(compiled-function () #<bytecode 0x1ea04fa01345ba2a
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name dabbrev-expand-after-killing-buffer :
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (or (tag :expensive-test) (tag :unstable))) #f(co
  ert-run-tests-batch((not (or (tag :expensive-test) (tag :unstable)))
  ert-run-tests-batch-and-exit((not (or (tag :expensive-test) (tag :un
  eval((ert-run-tests-batch-and-exit '(not (or (tag :expensive-test) (
  command-line-1(("-L" ":." "-l" "ert" "--eval" "(setq treesit-extra-l
  command-line()
  normal-top-level()
Test dabbrev-expand-after-killing-buffer condition:
    (ert-test-failed
     ((should (string= msg "No further dynamic expansion for ‘ab’ found"))
      :form
      (string= "No further dynamic expansion for `ab' found"
               "No further dynamic expansion for ‘ab’ found")
      :value nil :explanation
      (array-elt 33
                 (different-atoms (96 "#x60" "?`") (8216 "#x2018" "?‘")))))
   FAILED   3/16  dabbrev-expand-after-killing-buffer (0.001730 sec) at lisp/dabbrev-tests.el:278

Thanks

  Andrea

Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

[Stephen Berman]

On Tue, 03 Dec 2024 03:14:26 -0500 Andrea Corallo <acorallo@gnu.org> wrote:

> Stephen Berman <stephen.berman@gmx.net> writes:
>
>> On Mon, 02 Dec 2024 15:45:23 -0500 Andrea Corallo <acorallo@gnu.org> wrote:
>>
>>> Stephen Berman via Mailing list for Emacs changes <emacs-diffs@gnu.org>
>>> writes:
>>>
>>>> branch: emacs-30
>>>> commit 6bca138d60e47d0fbab4faf8e83c5b9b319f260d
>>>> Author: Stephen Berman <stephen.berman@gmx.net>
>>>> Commit: Stephen Berman <stephen.berman@gmx.net>
>>>>
>>>>     Fix latest test for dabbrev-expand
>>>>
>>>>     * test/lisp/dabbrev-tests.el (dabbrev-expand-after-killing-buffer):
>>>>     Fix typo in a 'should' test, use part of return value of 'should-error'
>>>>     test, and remove mistaken and unfounded FIXME comment.
>>>
>>> Hello Stephen,
>>>
>>> this commit is introducing in my test-bed the following three failures
>>> in emacs-30: dabbrev-expand-test-other-buffer-4,
>>> dabbrev-expand-test-other-buffer-3, dabbrev-expand-after-killing-buffer.
>>> Could you please have a look?
>>>
>>>   Andrea
>>
>> How does your testbed run the tests?  When I invoke `emacs-30 -batch -l
>> ~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el -f
>> ert-run-tests-batch-and-exit' from the shell, all tests pass.  Likewise,
[...]
> my testbench is running "make check -j24" on a fresh checkout on
[...]

On Tue, 03 Dec 2024 09:19:46 +0100 Michael Albinus <michael.albinus@gmx.de> wrote:

[...]
> dabbrev-tests.el is broken in the emacs-30 branch. Running 'make -C test
> dabbrev-tests.log' yields the appended log file.

It seems that substitute-command-keys applies to user-error messages in
ert batch runs but not when executing `make check'.  I missed the latter
because when I committed that patch, the emacs-30 build was broken due
to the librsvg version issue, so I couldn't run `make check'.  But since
`make check' had succeeded with my previous commit, I wrongly assumed it
would also succeed this change; I should have waited.  I've now pushed a
workaround (commit 7b8d12e95de to emacs-30) with which both batch runs
and `make check' succeed for me.  Hopefully they do for everyone else
too!

Steve Berman

Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

[Andrea Corallo]

Stephen Berman <stephen.berman@gmx.net> writes:

> On Tue, 03 Dec 2024 03:14:26 -0500 Andrea Corallo <acorallo@gnu.org> wrote:
>
>> Stephen Berman <stephen.berman@gmx.net> writes:
>>
>>> On Mon, 02 Dec 2024 15:45:23 -0500 Andrea Corallo <acorallo@gnu.org> wrote:
>>>
>>>> Stephen Berman via Mailing list for Emacs changes <emacs-diffs@gnu.org>
>>>> writes:
>>>>
>>>>> branch: emacs-30
>>>>> commit 6bca138d60e47d0fbab4faf8e83c5b9b319f260d
>>>>> Author: Stephen Berman <stephen.berman@gmx.net>
>>>>> Commit: Stephen Berman <stephen.berman@gmx.net>
>>>>>
>>>>>     Fix latest test for dabbrev-expand
>>>>>
>>>>>     * test/lisp/dabbrev-tests.el (dabbrev-expand-after-killing-buffer):
>>>>>     Fix typo in a 'should' test, use part of return value of 'should-error'
>>>>>     test, and remove mistaken and unfounded FIXME comment.
>>>>
>>>> Hello Stephen,
>>>>
>>>> this commit is introducing in my test-bed the following three failures
>>>> in emacs-30: dabbrev-expand-test-other-buffer-4,
>>>> dabbrev-expand-test-other-buffer-3, dabbrev-expand-after-killing-buffer.
>>>> Could you please have a look?
>>>>
>>>>   Andrea
>>>
>>> How does your testbed run the tests?  When I invoke `emacs-30 -batch -l
>>> ~/src/emacs/emacs-30/test/lisp/dabbrev-tests.el -f
>>> ert-run-tests-batch-and-exit' from the shell, all tests pass.  Likewise,
> [...]
>> my testbench is running "make check -j24" on a fresh checkout on
> [...]
>
> On Tue, 03 Dec 2024 09:19:46 +0100 Michael Albinus <michael.albinus@gmx.de> wrote:
>
> [...]
>> dabbrev-tests.el is broken in the emacs-30 branch. Running 'make -C test
>> dabbrev-tests.log' yields the appended log file.
>
> It seems that substitute-command-keys applies to user-error messages in
> ert batch runs but not when executing `make check'.  I missed the latter
> because when I committed that patch, the emacs-30 build was broken due
> to the librsvg version issue, so I couldn't run `make check'.  But since
> `make check' had succeeded with my previous commit, I wrongly assumed it
> would also succeed this change; I should have waited.  I've now pushed a
> workaround (commit 7b8d12e95de to emacs-30) with which both batch runs
> and `make check' succeed for me.  Hopefully they do for everyone else
> too!

The build looks clean here thanks.

  Andrea

Re: emacs-30 6bca138d60e: Fix latest test for dabbrev-expand

[Michael Albinus]

[-- Attachment #1: Type: text/plain, Size: 872 bytes --]

Stephen Berman via Mailing list for Emacs changes <emacs-diffs@gnu.org>
writes:

Hi Stephen,

> branch: emacs-30
> commit 6bca138d60e47d0fbab4faf8e83c5b9b319f260d
> Author: Stephen Berman <stephen.berman@gmx.net>
> Commit: Stephen Berman <stephen.berman@gmx.net>
>
>     Fix latest test for dabbrev-expand
>
>     * test/lisp/dabbrev-tests.el (dabbrev-expand-after-killing-buffer):
>     Fix typo in a 'should' test, use part of return value of 'should-error'
>     test, and remove mistaken and unfounded FIXME comment.
> ---
>  test/lisp/dabbrev-tests.el | 20 ++++++--------------
>  1 file changed, 6 insertions(+), 14 deletions(-)

I'm not sure whether it was this commit, or a previous one. But
dabbrev-tests.el is broken in the emacs-30 branch. Running 'make -C test
dabbrev-tests.log' yields the appended log file.

Best regards, Michael.


[-- Attachment #2: dabbrev-tests.log --]
[-- Type: text/plain, Size: 9151 bytes --]

Running 16 tests (2024-12-03 09:13:26+0100, selector `(not (tag :unstable))')
Scanning for dabbrevs... 
Scanning for dabbrevs...done
   passed   1/16  dabbrev-completion-test (0.000245 sec)
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Scanning for dabbrevs...done
Making completion list...

   passed   2/16  dabbrev-completion-test-with-argument (0.016201 sec)
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `*Completions*'


Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `foo'

Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Test dabbrev-expand-after-killing-buffer backtrace:
  signal(ert-test-failed (((should (string= msg "No further dynamic ex
  ert-fail(((should (string= msg "No further dynamic expansion for ‘ab
  (if (unwind-protect (setq value-179 (apply fn-177 args-178)) (setq f
  (let (form-description-181) (if (unwind-protect (setq value-179 (app
  (let ((value-179 'ert-form-evaluation-aborted-180)) (let (form-descr
  (let* ((fn-177 #'string=) (args-178 (condition-case err (list msg "N
  (let ((msg (car (cdr (let* ((fn-165 ...) (args-166 ...)) (let (...) 
  (progn (save-current-buffer (set-buffer (get-buffer-create "foo")) (
  (unwind-protect (progn (save-current-buffer (set-buffer (get-buffer-
  (let* ((abbreviated-home-dir nil) (process-environment (cons (format
  (progn (let* ((abbreviated-home-dir nil) (process-environment (cons 
  (unwind-protect (progn (let* ((abbreviated-home-dir nil) (process-en
  (let* ((coding-system-for-write nil) (temp-file (file-name-as-direct
  #f(lambda () [t] (let* ((coding-system-for-write nil) (temp-file (fi
  #f(compiled-function () #<bytecode 0x89f25f780a416fe>)()
  handler-bind-1(#f(compiled-function () #<bytecode 0x89f25f780a416fe>
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name dabbrev-expand-after-killing-buffer :
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (tag :unstable)) #f(compiled-function (event-type
  ert-run-tests-batch((not (tag :unstable)))
  ert-run-tests-batch-and-exit((not (tag :unstable)))
  eval((ert-run-tests-batch-and-exit '(not (tag :unstable))) t)
  command-line-1(("-L" ":." "-l" "ert" "--eval" "(setq treesit-extra-l
  command-line()
  normal-top-level()
Test dabbrev-expand-after-killing-buffer condition:
    (ert-test-failed
     ((should (string= msg "No further dynamic expansion for ‘ab’ found"))
      :form
      (string= "No further dynamic expansion for `ab' found"
	       "No further dynamic expansion for ‘ab’ found")
      :value nil :explanation
      (array-elt 33
		 (different-atoms (96 "#x60" "?`") (8216 "#x2018" "?‘")))))
   FAILED   3/16  dabbrev-expand-after-killing-buffer (0.005580 sec) at lisp/dabbrev-tests.el:278



   passed   4/16  dabbrev-expand-test (0.000275 sec)
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'

   passed   5/16  dabbrev-expand-test-minibuffer-1 (0.267578 sec)
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'

   passed   6/16  dabbrev-expand-test-minibuffer-2 (0.308566 sec)
Scanning for dabbrevs...99% 
Scanning for dabbrevs...done
Expansion found in `dabbrev-expand.el'
Scanning for dabbrevs...99% 
Scanning for dabbrevs...done
Expansion found in `dabbrev-expand.el'
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'
Scanning for dabbrevs...99% 
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'
   passed   7/16  dabbrev-expand-test-minibuffer-3 (0.562288 sec)
I-search: I
I-search: In
I-search: Ind
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'

   passed   8/16  dabbrev-expand-test-minibuffer-4 (0.278303 sec)
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'

   passed   9/16  dabbrev-expand-test-other-buffer-1 (0.274776 sec)
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Expansion found in `INSTALL_BEGIN'

   passed  10/16  dabbrev-expand-test-other-buffer-2 (0.300569 sec)
Scanning for dabbrevs...99% 
Scanning for dabbrevs...done
Expansion found in `dabbrev-expand.el'
Scanning for dabbrevs...99% 
Scanning for dabbrevs...done
Expansion found in `dabbrev-expand.el'
Scanning for dabbrevs...done
Expansion found in `dabbrev-tests.el'

Test dabbrev-expand-test-other-buffer-3 backtrace:
  signal(ert-test-failed (((should (string= (buffer-string) "Indic and
  ert-fail(((should (string= (buffer-string) "Indic and")) :form (stri
  (if (unwind-protect (setq value-92 (apply fn-90 args-91)) (setq form
  (let (form-description-94) (if (unwind-protect (setq value-92 (apply
  (let ((value-92 'ert-form-evaluation-aborted-93)) (let (form-descrip
  (let* ((fn-90 #'string=) (args-91 (condition-case err (list (buffer-
  (progn (find-file (expand-file-name "INSTALL_BEGIN" (let* ((testfile
  (unwind-protect (progn (find-file (expand-file-name "INSTALL_BEGIN" 
  (let* ((abbreviated-home-dir nil) (process-environment (cons (format
  (progn (let* ((abbreviated-home-dir nil) (process-environment (cons 
  (unwind-protect (progn (let* ((abbreviated-home-dir nil) (process-en
  (let* ((coding-system-for-write nil) (temp-file (file-name-as-direct
  #f(lambda () [t] (let* ((coding-system-for-write nil) (temp-file (fi
  #f(compiled-function () #<bytecode 0x89f25f780a416fe>)()
  handler-bind-1(#f(compiled-function () #<bytecode 0x89f25f780a416fe>
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name dabbrev-expand-test-other-buffer-3 :d
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (tag :unstable)) #f(compiled-function (event-type
  ert-run-tests-batch((not (tag :unstable)))
  ert-run-tests-batch-and-exit((not (tag :unstable)))
  eval((ert-run-tests-batch-and-exit '(not (tag :unstable))) t)
  command-line-1(("-L" ":." "-l" "ert" "--eval" "(setq treesit-extra-l
  command-line()
  normal-top-level()
Test dabbrev-expand-test-other-buffer-3 condition:
    (ert-test-failed
     ((should (string= (buffer-string) "Indic and")) :form
      (string= "Indic\")) (execute-kbd-macro" "Indic and") :value nil
      :explanation
      (arrays-of-different-length 27 9 "Indic\")) (execute-kbd-macro"
				  "Indic and" first-mismatch-at 5)))
   FAILED  11/16  dabbrev-expand-test-other-buffer-3 (0.561430 sec) at lisp/dabbrev-tests.el:175
I-search: I
I-search: In
I-search: Ind
Scanning for dabbrevs...100% 
Scanning for dabbrevs...done
Test dabbrev-expand-test-other-buffer-4 backtrace:
  user-error("No%s dynamic expansion for `%s' found" "" "execute-kbd-m
  dabbrev-expand(nil)
  funcall-interactively(dabbrev-expand nil)
  command-execute(dabbrev-expand)
  execute-kbd-macro([73 110 100 134217775])
  (let (disabled-command-function) (find-file (expand-file-name "INSTA
  (progn (let (disabled-command-function) (find-file (expand-file-name
  (unwind-protect (progn (let (disabled-command-function) (find-file (
  (let* ((abbreviated-home-dir nil) (process-environment (cons (format
  (progn (let* ((abbreviated-home-dir nil) (process-environment (cons 
  (unwind-protect (progn (let* ((abbreviated-home-dir nil) (process-en
  (let* ((coding-system-for-write nil) (temp-file (file-name-as-direct
  #f(lambda () [t] (let* ((coding-system-for-write nil) (temp-file (fi
  #f(compiled-function () #<bytecode 0x89f25f780a416fe>)()
  handler-bind-1(#f(compiled-function () #<bytecode 0x89f25f780a416fe>
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name dabbrev-expand-test-other-buffer-4 :d
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (tag :unstable)) #f(compiled-function (event-type
  ert-run-tests-batch((not (tag :unstable)))
  ert-run-tests-batch-and-exit((not (tag :unstable)))
  eval((ert-run-tests-batch-and-exit '(not (tag :unstable))) t)
  command-line-1(("-L" ":." "-l" "ert" "--eval" "(setq treesit-extra-l
  command-line()
  normal-top-level()
Test dabbrev-expand-test-other-buffer-4 condition:
    (user-error "No dynamic expansion for `execute-kbd-macroInd' found")
   FAILED  12/16  dabbrev-expand-test-other-buffer-4 (0.291485 sec) at lisp/dabbrev-tests.el:194



   passed  13/16  dabbrev-expand-test-same-buffer-1 (0.297619 sec)



   passed  14/16  dabbrev-expand-test-same-buffer-2 (0.290400 sec)





   passed  15/16  dabbrev-expand-test-same-buffer-3 (0.271752 sec)
I-search: I
I-search: In
I-search: Ind



   passed  16/16  dabbrev-expand-test-same-buffer-4 (0.283636 sec)

Ran 16 tests, 13 results as expected, 3 unexpected (2024-12-03 09:13:32+0100, 5.467870 sec)

3 unexpected results:
   FAILED  dabbrev-expand-after-killing-buffer
   FAILED  dabbrev-expand-test-other-buffer-3
   FAILED  dabbrev-expand-test-other-buffer-4