search

purcell / unfill

Functions providing the inverse of Emacs' fill-paragraph and fill-region
78 stars 9 forks source link

toggle tests strangely fail #3

Open dogsleg opened 6 years ago

dogsleg commented 6 years ago

Hi Steve,

toggle tests strangely fail for me. Please find the test log below.

$ LANG=C.UTF-8 emacs -batch -L . -l test.el --eval "(ert-run-tests-batch-and-exit)"
Loading 00debian-vars...
Loading /etc/emacs/site-start.d/50asymptote.el (source)...
Loading /etc/emacs/site-start.d/50auctex.el (source)...
Loading /usr/share/emacs/site-lisp/auctex.el (source)...
Loading /usr/share/emacs/site-lisp/preview-latex.el (source)...
Loading /etc/emacs/site-start.d/50autoconf.el (source)...
Loading /etc/emacs/site-start.d/50coq.el (source)...
Loading /etc/emacs/site-start.d/50dictionaries-common.el (source)...
Loading debian-ispell...
Loading /var/cache/dictionaries-common/emacsen-ispell-default.el (source)...
Loading /var/cache/dictionaries-common/emacsen-ispell-dicts.el (source)...
Loading /etc/emacs/site-start.d/50dpkg-dev-el.el (source)...
Loading /etc/emacs/site-start.d/50figlet.el (source)...
Loading /etc/emacs/site-start.d/50gettext.el (source)...
Loading /etc/emacs/site-start.d/50haskell-mode.el (source)...
Loading /usr/share/emacs25/site-lisp/haskell-mode/haskell-mode-autoloads.el (source)...
Loading /etc/emacs/site-start.d/50latex-cjk-common.el (source)...
Loading cjk-enc...
Loading /etc/emacs/site-start.d/50latex-cjk-thai.el (source)...
Loading /etc/emacs/site-start.d/50mmm-mode.el (source)...
Loading /etc/emacs/site-start.d/50proofgeneral.el (source)...
Loading /usr/share/emacs25/site-lisp/proofgeneral/generic/proof-site.elc...
Loading /etc/emacs/site-start.d/50pymacs.el (source)...
Loading /etc/emacs/site-start.d/50python-docutils.el (source)...
Loading /etc/emacs/site-start.d/50texlive-lang-english.el (source)...
Loading /etc/emacs/site-start.d/51debian-el.el (source)...
Loading /home/dogsleg/freedom/packaging/elpa/unfill-el/unfill.el (source)...
Running 5 tests (2018-04-20 16:50:19+0500)
   passed  1/5  unfill-paragraph-should-work-on-the-current-paragraph-only
   passed  2/5  unfill-region-preserves-paragraphs
   passed  3/5  unfill-region-should-work-on-the-defined-region
Test unfill-toggle-on-paragraph backtrace:
  (if (unwind-protect (setq value-22 (apply fn-20 args-21)) (setq form
  (let (form-description-24) (if (unwind-protect (setq value-22 (apply
  (let ((value-22 (quote ert-form-evaluation-aborted-23))) (let (form-
  (let ((fn-20 (function string=)) (args-21 (list (buffer-string) init
  (let ((initial (apply (quote concat) "blah" (make-list 70 " blah")))
  (progn (let ((initial (apply (quote concat) "blah" (make-list 70 " b
  (unwind-protect (progn (let ((initial (apply (quote concat) "blah" (
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
  (lambda nil (let ((temp-buffer (generate-new-buffer " *temp*"))) (sa
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  ert-run-test([cl-struct-ert-test unfill-toggle-on-paragraph nil (lam
  ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test u
  ert-run-tests(t #[385 "\306\307\"\203G\211\211G\310U\203\211@\20
  ert-run-tests-batch(nil)
  ert-run-tests-batch-and-exit()
  eval((ert-run-tests-batch-and-exit))
  command-line-1(("-L" "." "-l" "test.el" "--eval" "(ert-run-tests-bat
  command-line()
  normal-top-level()
Test unfill-toggle-on-paragraph condition:
    (ert-test-failed
     ((should
       (string=
    (buffer-string)
    initial))
      :form
      (string= "blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah" "blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah")
      :value nil))
   FAILED  4/5  unfill-toggle-on-paragraph
Mark set
Test unfill-toggle-on-region backtrace:
  (if (unwind-protect (setq value-42 (apply fn-40 args-41)) (setq form
  (let (form-description-44) (if (unwind-protect (setq value-42 (apply
  (let ((value-42 (quote ert-form-evaluation-aborted-43))) (let (form-
  (let ((fn-40 (function string=)) (args-41 (list (buffer-string) init
  (let ((initial (concat (apply (quote concat) "blah" (make-list 70 " 
  (progn (let ((initial (concat (apply (quote concat) "blah" (make-lis
  (unwind-protect (progn (let ((initial (concat (apply (quote concat) 
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
  (lambda nil (let ((temp-buffer (generate-new-buffer " *temp*"))) (sa
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  ert-run-test([cl-struct-ert-test unfill-toggle-on-region nil (lambda
  ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test u
  ert-run-tests(t #[385 "\306\307\"\203G\211\211G\310U\203\211@\20
  ert-run-tests-batch(nil)
  ert-run-tests-batch-and-exit()
  eval((ert-run-tests-batch-and-exit))
  command-line-1(("-L" "." "-l" "test.el" "--eval" "(ert-run-tests-bat
  command-line()
  normal-top-level()
Test unfill-toggle-on-region condition:
    (ert-test-failed
     ((should
       (string=
    (buffer-string)
    initial))
      :form
      (string= "blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah blah blah blah blah blah blah blah blah blah blah blah blah blah
blah

Second paragraph goes here" "blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah

Second paragraph goes here")
      :value nil))
   FAILED  5/5  unfill-toggle-on-region

Ran 5 tests, 3 results as expected, 2 unexpected (2018-04-20 16:50:19+0500)

2 unexpected results:
   FAILED  unfill-toggle-on-paragraph
   FAILED  unfill-toggle-on-region
purcell commented 6 years ago

Which which Emacs version?

dogsleg commented 6 years ago

I use GNU Emacs 25.2.1 from the official Debian repository (package version is 25.2+1-6+b1, from testing and unstable).

2018-04-22 6:42 GMT+05:00 Steve Purcell notifications@github.com:

Which which Emacs version?

— You are receiving this because you authored the thread. Reply to this email directly, view it on GitHub https://github.com/purcell/unfill/issues/3#issuecomment-383347920, or mute the thread https://github.com/notifications/unsubscribe-auth/ACM9jyjSfcJjzoX0MPOlujakC3mvWSaeks5tq-AEgaJpZM4TdVie .

purcell commented 6 years ago

Great, thanks. I'll take a look when I have a bit of time. :-)