This looks like a real bug though, unrelated to native compilation

Searched 1/1 files
   passed  19/87  helpful--display-implementations (0.122235 sec)
   passed  20/87  helpful--docstring (0.000044 sec)
Test helpful--docstring-advice backtrace:
  signal(ert-test-failed (((should (equal (helpful--docstring #'test-f
  ert-fail(((should (equal (helpful--docstring #'test-foo-advised t) "
  (if (unwind-protect (setq value-47 (apply fn-45 args-46)) (setq form
  (let (form-description-49) (if (unwind-protect (setq value-47 (apply
  (let ((value-47 'ert-form-evaluation-aborted-48)) (let (form-descrip
  (let* ((fn-45 #'equal) (args-46 (condition-case err (let ((signal-ho
  (let ((lexical-binding t)) (let* ((fn-45 #'equal) (args-46 (conditio
  (closure (t) nil (let ((lexical-binding t)) (let* ((fn-45 #'equal) (
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name helpful--docstring-advice :documentat
  ert-run-or-rerun-test(#s(ert--stats :selector t :tests ... :test-map
  ert-run-tests(t #f(compiled-function (event-type &rest event-args) #
  ert-run-tests-batch(nil)
  ert-run-tests-batch-and-exit()
  command-line-1(("-l" "package" "--eval" "(setq native-compile-target
  command-line()
  normal-top-level()
Test helpful--docstring-advice condition:
    (ert-test-failed
     ((should
       (equal
        (helpful--docstring ... t)
        "Docstring here too."))
      :form
      (equal "Docstring here too.\n\nThis function has :around advice: 
`ad-Advice-test-foo-advised'." "Docstring here too.")
      :value nil :explanation
      (arrays-of-different-length 84 19 "Docstring here too.\n\nThis function 
has :around advice: `ad-Advice-test-foo-advised'." "Docstring here too." 
first-mismatch-at 19)))
   FAILED  21/87  helpful--docstring-advice (0.000165 sec)
   passed  22/87  helpful--docstring-keymap (0.000490 sec)

Reply via email to