'(1 2 3 (4 5 6))))
(should (null (comp-test-copy-insn-f nil))))
-(comp-deftest comp-test-cond-rw-1 ()
+(comp-deftest cond-rw-1 ()
"Check cond-rw does not break target blocks with multiple predecessor."
(should (null (comp-test-cond-rw-1-2-f))))
-(comp-deftest comp-test-not-cons ()
+(comp-deftest not-cons-1 ()
(should-not (comp-test-not-cons-f nil)))
-(comp-deftest comp-test-45576 ()
+(comp-deftest 45576-1 ()
"Functionp satisfies also symbols.
<https://lists.gnu.org/archive/html/bug-gnu-emacs/2021-01/msg00029.html>."
(should (eq (comp-test-45576-f) 'eval)))