Failing tests
Sébastien Willmann
sebastien.willmann at gmail.com
Mon Sep 3 14:20:08 CEST 2012
Hello,
After running make test, it seems that some tests fail on my computer (tests results attached). Are the tests wrong or does it mean that there is some compatibility issues? I use emacs 24.1.1 on fedora 17.
Thanks,
Sébastien Willmann
-------------- next part --------------
emacs --batch -Q -L . -L lib -l evil-tests.el \
--eval "(evil-tests-initialize '() '())"
Running 152 tests (2012-09-03 14:08:53+0200)
-- INSERT --
-- INSERT --
-- INSERT --
passed 1/152 evil-test-ESC-repeat-normal-state
-- INSERT --
-- INSERT --
-- INSERT --
passed 2/152 evil-test-abort-operator-repeat
passed 3/152 evil-test-align
-- INSERT --
passed 4/152 evil-test-append
-- INSERT --
passed 5/152 evil-test-append-line
-- INSERT --
passed 6/152 evil-test-append-line-vcount
-- INSERT --
passed 7/152 evil-test-append-line-with-count
-- INSERT --
passed 8/152 evil-test-append-vcount
-- INSERT --
passed 9/152 evil-test-append-with-count
passed 10/152 evil-test-auxiliary-maps
passed 11/152 evil-test-backward-char
passed 12/152 evil-test-backward-paragraph
passed 13/152 evil-test-backward-sentence
passed 14/152 evil-test-backward-word-begin
passed 15/152 evil-test-backward-word-end
passed 16/152 evil-test-backword-word-begin-cjk
passed 17/152 evil-test-backword-word-end-cjk
passed 18/152 evil-test-beginning-of-line
passed 19/152 evil-test-block-type
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 20/152 evil-test-change
passed 21/152 evil-test-change-states
passed 22/152 evil-test-change-to-previous-state
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 23/152 evil-test-change-word
passed 24/152 evil-test-cmd-replace-char
passed 25/152 evil-test-concat-charsets
passed 26/152 evil-test-concat-lists
passed 27/152 evil-test-delete
Hiding all blocks...
Hiding all blocks...done
Hiding all blocks...
Hiding all blocks...done
passed 28/152 evil-test-delete-folded
passed 29/152 evil-test-delete-line
passed 30/152 evil-test-delimited-arguments
passed 31/152 evil-test-emacs-state-suppress-keymap
Test evil-test-end-of-line backtrace:
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
(block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn
(loop for i from 6 for frame = (backtrace-frame i) while frame colle
ert--record-backtrace()
(let* ((condition (first more-debugger-args)) (type (case (car condi
(cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
(case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
(ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
(let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
(progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
(destructuring-bind (first-debugger-arg &rest more-debugger-args) de
ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
(lambda (G70089 &rest debugger-args) (ert--run-test-debugger (symbol
apply((lambda (G70089 &rest debugger-args) (ert--run-test-debugger (
(lambda (&rest --cl-rest--) (apply (quote (lambda (G70089 &rest debu
signal(ert-test-failed (((should (string= (buffer-substring (max (po
ert-fail(((should (string= (buffer-substring (max (point-min) (- (po
(if (unwind-protect (setq value-3866 (apply fn-3864 args-3865)) (set
(unless (unwind-protect (setq value-3866 (apply fn-3864 args-3865))
(let (form-description-3868) (unless (unwind-protect (setq value-386
(let ((value-3866 (quote ert-form-evaluation-aborted-3867))) (let (f
(let ((fn-3864 (function string=)) (args-3865 (list (buffer-substrin
(should (string= (buffer-substring (max (point-min) (- (point) (leng
(if (functionp before) (setq before-predicate before before nil) (sh
(progn (if (functionp before) (setq before-predicate before before n
(if before (progn (if (functionp before) (setq before-predicate befo
(when before (if (functionp before) (setq before-predicate before be
evil-test-text("Above some line\n" "\nBelow some empty line")
(if (or before-point after-point) (evil-test-text before-point after
(save-current-buffer (set-buffer actual-buffer) (if (or before-point
(with-current-buffer actual-buffer (if (or before-point after-point)
(save-current-buffer (set-buffer marker-buffer) (setq string (buffer
(with-current-buffer marker-buffer (setq string (buffer-string)) (wh
(unwind-protect (with-current-buffer marker-buffer (setq string (buf
(let ((actual-buffer (current-buffer)) (marker-buffer (evil-test-mar
evil-test-buffer-string("Above some line\n[]\nBelow some empty line"
(save-current-buffer (set-buffer buffer) (switch-to-buffer-other-win
(with-current-buffer buffer (switch-to-buffer-other-window (current-
(progn (with-current-buffer buffer (switch-to-buffer-other-window (c
(unwind-protect (progn (with-current-buffer buffer (switch-to-buffer
(let ((wconfig (current-window-configuration))) (unwind-protect (pro
(save-window-excursion (with-current-buffer buffer (switch-to-buffer
(unwind-protect (save-window-excursion (with-current-buffer buffer (
(let ((buffer (evil-test-buffer-from-string "Above some line\n[]\nBe
(evil-test-buffer "Above some line\n[]\nBelow some empty line" ("d$"
(let ((ert--infos (cons (cons "Info: " "Don't delete blank lines") e
(ert-info ("Don't delete blank lines") (evil-test-buffer "Above some
(lambda nil (ert-info ("Simple") (evil-test-buffer ";; [T]his buffer
funcall((lambda nil (ert-info ("Simple") (evil-test-buffer ";; [T]hi
(let ((debugger (list (quote lambda) (quote (&rest --cl-rest--)) (li
(unwind-protect (let ((debugger (list (quote lambda) (quote (&rest -
(let ((wconfig (current-window-configuration))) (unwind-protect (let
(unwind-protect (let ((wconfig (current-window-configuration))) (unw
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (let (
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
(catch (quote ert--pass) (let ((temp-buffer (generate-new-buffer " *
(progn (progn (progn (or (and (vectorp (symbol-value --cl-info--)) (
(let ((--cl-info-- (make-symbol "--info--"))) (setf (symbol-value --
(lexical-let ((info ert-test-execution-info)) (setf (ert--test-execu
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
(let ((ert--should-execution-observer (list (quote lambda) (quote (&
(unwind-protect (let ((ert--should-execution-observer (list (quote l
(let ((--cl-info-- (make-symbol "--info--")) (--cl-should-form-accu-
(unwind-protect (let ((--cl-info-- (make-symbol "--info--")) (--cl-s
(let ((--cl-begin-marker-- (make-symbol "--begin-marker--"))) (setf
(lexical-let ((begin-marker (with-current-buffer (get-buffer-create
(catch (quote --cl-block-error--) (lexical-let ((begin-marker (with-
(cl-block-wrapper (catch (quote --cl-block-error--) (lexical-let ((b
(block error (lexical-let ((begin-marker (with-current-buffer (get-b
ert-run-test([cl-struct-ert-test evil-test-end-of-line "Test `evil-e
(unwind-protect (ert-run-test test) (setf (aref (ert--stats-test-end
(let ((ert--current-run-stats stats) (pos (ert--stats-test-pos stats
ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test e
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
(while (consp --cl-var--) (setq test (car --cl-var--)) (ert-run-or-r
(let* ((--cl-var-- tests) (test nil)) (while (consp --cl-var--) (set
(catch (quote --cl-block-nil--) (let* ((--cl-var-- tests) (test nil)
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((--cl-var--
(block nil (let* ((--cl-var-- tests) (test nil)) (while (consp --cl-
(loop for test in tests do (ert-run-or-rerun-test stats test listene
(progn (loop for test in tests do (ert-run-or-rerun-test stats test
(unwind-protect (progn (loop for test in tests do (ert-run-or-rerun-
(let ((ert--current-run-stats stats)) (force-mode-line-update) (unwi
(unwind-protect (let ((ert--current-run-stats stats)) (force-mode-li
(let ((abortedp t)) (unwind-protect (let ((ert--current-run-stats st
(let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats
ert-run-tests(t (lambda (event-type &rest event-args) (ecase event-t
ert-run-tests-batch(t)
(let ((stats (ert-run-tests-batch selector))) (kill-emacs (if (zerop
(unwind-protect (let ((stats (ert-run-tests-batch selector))) (kill-
ert-run-tests-batch-and-exit(t)
(cond (interactive (ert-run-tests-interactively tests) (when evil-te
(let ((elp-use-standard-output (not interactive))) (setq tests (or (
evil-tests-run(nil)
(if interactive (if (y-or-n-p-with-timeout "Run tests? " 2 t) (evil-
evil-tests-initialize(nil nil)
eval((evil-tests-initialize (quote nil) (quote nil)))
command-line-1(("-L" "." "-L" "lib" "-l" "evil-tests.el" "--eval" "(
command-line()
normal-top-level()
Test evil-test-end-of-line condition:
Info: Don't delete blank lines
(ert-test-failed
((should
(string=
(buffer-substring ... ...)
before))
:form
(string= "" "Above some line\n")
:value nil))
FAILED 32/152 evil-test-end-of-line
passed 33/152 evil-test-enter-normal-state-disabled
passed 34/152 evil-test-esc-count
-- INSERT --
-- EMACS --
passed 35/152 evil-test-eval-last-sexp
passed 36/152 evil-test-ex-goto-line
passed 37/152 evil-test-ex-parse
passed 38/152 evil-test-ex-parse-ranges
passed 39/152 evil-test-ex-regex-case
passed 40/152 evil-test-ex-regex-without-case
Replaced 2 occurrences
Replaced 2 occurrences
Replaced 2 occurrences
Replaced 2 occurrences
Replaced 1 occurrence
Replaced 1 occurrence
Replaced 1 occurrence
passed 41/152 evil-test-ex-repeat
Replaced 1 occurrence
Replaced 1 occurrence
Replaced 1 occurrence
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 3 occurrences
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 3 occurrences
Replaced 3 occurrences
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 3 occurrences
Replaced 3 occurrences
passed 42/152 evil-test-ex-repeat-substitute-replacement
passed 43/152 evil-test-ex-search
passed 44/152 evil-test-ex-search-offset
passed 45/152 evil-test-ex-search-pattern-offset
passed 46/152 evil-test-ex-search-repeat
Search wrapped
passed 47/152 evil-test-ex-search-symbol
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 1 occurrence
Replaced 3 occurrences
Replaced 2 occurrences
Replaced 6 occurrences
Query replacing BC with XYZ: (? for help)
Query replacing BC with XYZ: (? for help)
Query replacing BC with XYZ: (? for help)
Replaced 2 occurrences
Query replacing BC with XYZ: (y, n, !, ., q, or C-h) Query replacing BC with XYZ: (y, n, !, ., q, or C-h) yQuery replacing BC with XYZ: (y, n, !, ., q, or C-h) Query replacing BC with XYZ: (y, n, !, ., q, or C-h) nReplaced 1 occurrence
Replaced 6 occurrences
Replaced 12 occurrences
Replaced 1 occurrence
passed 48/152 evil-test-ex-substitute
Replaced 1 occurrence
Query replacing foo with Foo: (y, n, !, ., q, or C-h) Query replacing foo with Foo: (y, n, !, ., q, or C-h) yReplaced 1 occurrence
Replaced 6 occurrences
Query replacing \(foo\|bar\) with Foo: (? for help)
Query replacing \(foo\|bar\) with Bar: (? for help)
Query replacing \(foo\|bar\) with Foo: (? for help)
Query replacing \(foo\|bar\) with Bar: (? for help)
Query replacing \(foo\|bar\) with Foo: (? for help)
Query replacing \(foo\|bar\) with Bar: (? for help)
Replaced 4 occurrences
Replaced 1 occurrence
Query replacing foo BAR with bar_FOO: (y, n, !, ., q, or C-h) Query replacing foo BAR with bar_FOO: (y, n, !, ., q, or C-h) yReplaced 1 occurrence
Replaced 3 occurrences
Query replacing \(f[[:alpha:]]*\>\)\s-*\(b[[:alpha:]]*\>\) with bar_FOO: (? for help)
Query replacing \(f[[:alpha:]]*\>\)\s-*\(b[[:alpha:]]*\>\) with bar_FOO: (? for help)
Query replacing \(f[[:alpha:]]*\>\)\s-*\(b[[:alpha:]]*\>\) with bar_FOO: (? for help)
Replaced 2 occurrences
Replaced 3 occurrences
passed 49/152 evil-test-ex-substitute-replacement
passed 50/152 evil-test-exclusive-type
passed 51/152 evil-test-exit-normal-state
passed 52/152 evil-test-extract-count
passed 53/152 evil-test-filter-list
passed 54/152 evil-test-find-char
passed 55/152 evil-test-find-char-backward
passed 56/152 evil-test-find-char-to
passed 57/152 evil-test-find-char-to-backward
passed 58/152 evil-test-first-non-blank
passed 59/152 evil-test-forward-char
passed 60/152 evil-test-forward-paragraph
passed 61/152 evil-test-forward-sentence
passed 62/152 evil-test-forward-word-begin
passed 63/152 evil-test-forward-word-begin-cjk
passed 64/152 evil-test-forward-word-end
passed 65/152 evil-test-forward-word-end-cjk
Replaced 0 occurrences
Replaced 0 occurrences
Replaced 1 occurrence
Replaced 1 occurrence
Replaced 1 occurrence
Replaced 0 occurrences
passed 66/152 evil-test-global
passed 67/152 evil-test-goto-first-line
passed 68/152 evil-test-goto-line
passed 69/152 evil-test-inclusive-type
-- INSERT --
passed 70/152 evil-test-insert
-- INSERT --
-- INSERT --
passed 71/152 evil-test-insert-digraph
-- INSERT --
passed 72/152 evil-test-insert-line
-- INSERT --
passed 73/152 evil-test-insert-line-vcount
-- INSERT --
passed 74/152 evil-test-insert-line-with-count
-- INSERT --
-- INSERT --
passed 75/152 evil-test-insert-repeat-info
-- INSERT --
passed 76/152 evil-test-insert-vcount
-- INSERT --
passed 77/152 evil-test-insert-with-count
passed 78/152 evil-test-invert-char
passed 79/152 evil-test-join
passed 80/152 evil-test-jump-item
passed 81/152 evil-test-keypress-parser
passed 82/152 evil-test-last-non-blank
passed 83/152 evil-test-line-type
passed 84/152 evil-test-move-chars
passed 85/152 evil-test-move-paragraph
passed 86/152 evil-test-next-line
passed 87/152 evil-test-normal-repeat-info-char-command
passed 88/152 evil-test-normal-repeat-info-simple-command
passed 89/152 evil-test-normal-state-suppress-keymap
passed 90/152 evil-test-normalize-repeat-info
-- INSERT --
-- INSERT --
-- INSERT --
passed 91/152 evil-test-open-above
-- INSERT --
passed 92/152 evil-test-open-above-with-count
-- INSERT --
-- INSERT --
-- INSERT --
Test evil-test-open-below backtrace:
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
(block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn
(loop for i from 6 for frame = (backtrace-frame i) while frame colle
ert--record-backtrace()
(let* ((condition (first more-debugger-args)) (type (case (car condi
(cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
(case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
(ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
(let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
(progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
(destructuring-bind (first-debugger-arg &rest more-debugger-args) de
ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
(lambda (G71317 &rest debugger-args) (ert--run-test-debugger (symbol
apply((lambda (G71317 &rest debugger-args) (ert--run-test-debugger (
(lambda (&rest --cl-rest--) (apply (quote (lambda (G71317 &rest debu
signal(ert-test-failed (((should (string= (buffer-substring (max (po
ert-fail(((should (string= (buffer-substring (max (point-min) (- (po
(if (unwind-protect (setq value-8838 (apply fn-8836 args-8837)) (set
(unless (unwind-protect (setq value-8838 (apply fn-8836 args-8837))
(let (form-description-8840) (unless (unwind-protect (setq value-883
(let ((value-8838 (quote ert-form-evaluation-aborted-8839))) (let (f
(let ((fn-8836 (function string=)) (args-8837 (list (buffer-substrin
(should (string= (buffer-substring (max (point-min) (- (point) (leng
(if (functionp before) (setq before-predicate before before nil) (sh
(progn (if (functionp before) (setq before-predicate before before n
(if before (progn (if (functionp before) (setq before-predicate befo
(when before (if (functionp before) (setq before-predicate before be
evil-test-text("(let (var)\n do-i" "t\n test)\n")
(if (or before-point after-point) (evil-test-text before-point after
(save-current-buffer (set-buffer actual-buffer) (if (or before-point
(with-current-buffer actual-buffer (if (or before-point after-point)
(save-current-buffer (set-buffer marker-buffer) (setq string (buffer
(with-current-buffer marker-buffer (setq string (buffer-string)) (wh
(unwind-protect (with-current-buffer marker-buffer (setq string (buf
(let ((actual-buffer (current-buffer)) (marker-buffer (evil-test-mar
evil-test-buffer-string("(let (var)\n do-i[t]\n test)\n" nil nil n
(save-current-buffer (set-buffer buffer) (switch-to-buffer-other-win
(with-current-buffer buffer (switch-to-buffer-other-window (current-
(progn (with-current-buffer buffer (switch-to-buffer-other-window (c
(unwind-protect (progn (with-current-buffer buffer (switch-to-buffer
(let ((wconfig (current-window-configuration))) (unwind-protect (pro
(save-window-excursion (with-current-buffer buffer (switch-to-buffer
(unwind-protect (save-window-excursion (with-current-buffer buffer (
(let ((buffer (evil-test-buffer-from-string "[(]let (var)\n test)\n
(evil-test-buffer "[(]let (var)\n test)\n" (emacs-lisp-mode) ("odo-
(let ((ert--infos (cons (cons "Info: " "Open non-empty line") ert--i
(ert-info ("Open non-empty line") (evil-test-buffer "[(]let (var)\n
(lambda nil (evil-test-buffer "[;]; This buffer is for notes you don
funcall((lambda nil (evil-test-buffer "[;]; This buffer is for notes
(let ((debugger (list (quote lambda) (quote (&rest --cl-rest--)) (li
(unwind-protect (let ((debugger (list (quote lambda) (quote (&rest -
(let ((wconfig (current-window-configuration))) (unwind-protect (let
(unwind-protect (let ((wconfig (current-window-configuration))) (unw
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (let (
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
(catch (quote ert--pass) (let ((temp-buffer (generate-new-buffer " *
(progn (progn (progn (or (and (vectorp (symbol-value --cl-info--)) (
(let ((--cl-info-- (make-symbol "--info--"))) (setf (symbol-value --
(lexical-let ((info ert-test-execution-info)) (setf (ert--test-execu
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
(let ((ert--should-execution-observer (list (quote lambda) (quote (&
(unwind-protect (let ((ert--should-execution-observer (list (quote l
(let ((--cl-info-- (make-symbol "--info--")) (--cl-should-form-accu-
(unwind-protect (let ((--cl-info-- (make-symbol "--info--")) (--cl-s
(let ((--cl-begin-marker-- (make-symbol "--begin-marker--"))) (setf
(lexical-let ((begin-marker (with-current-buffer (get-buffer-create
(catch (quote --cl-block-error--) (lexical-let ((begin-marker (with-
(cl-block-wrapper (catch (quote --cl-block-error--) (lexical-let ((b
(block error (lexical-let ((begin-marker (with-current-buffer (get-b
ert-run-test([cl-struct-ert-test evil-test-open-below "Test `evil-op
(unwind-protect (ert-run-test test) (setf (aref (ert--stats-test-end
(let ((ert--current-run-stats stats) (pos (ert--stats-test-pos stats
ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test e
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
(while (consp --cl-var--) (setq test (car --cl-var--)) (ert-run-or-r
(let* ((--cl-var-- tests) (test nil)) (while (consp --cl-var--) (set
(catch (quote --cl-block-nil--) (let* ((--cl-var-- tests) (test nil)
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((--cl-var--
(block nil (let* ((--cl-var-- tests) (test nil)) (while (consp --cl-
(loop for test in tests do (ert-run-or-rerun-test stats test listene
(progn (loop for test in tests do (ert-run-or-rerun-test stats test
(unwind-protect (progn (loop for test in tests do (ert-run-or-rerun-
(let ((ert--current-run-stats stats)) (force-mode-line-update) (unwi
(unwind-protect (let ((ert--current-run-stats stats)) (force-mode-li
(let ((abortedp t)) (unwind-protect (let ((ert--current-run-stats st
(let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats
ert-run-tests(t (lambda (event-type &rest event-args) (ecase event-t
ert-run-tests-batch(t)
(let ((stats (ert-run-tests-batch selector))) (kill-emacs (if (zerop
(unwind-protect (let ((stats (ert-run-tests-batch selector))) (kill-
ert-run-tests-batch-and-exit(t)
(cond (interactive (ert-run-tests-interactively tests) (when evil-te
(let ((elp-use-standard-output (not interactive))) (setq tests (or (
evil-tests-run(nil)
(if interactive (if (y-or-n-p-with-timeout "Run tests? " 2 t) (evil-
evil-tests-initialize(nil nil)
eval((evil-tests-initialize (quote nil) (quote nil)))
command-line-1(("-L" "." "-L" "lib" "-l" "evil-tests.el" "--eval" "(
command-line()
normal-top-level()
Test evil-test-open-below condition:
Info: Open non-empty line
(ert-test-failed
((should
(string=
(buffer-substring ... ...)
before))
:form
(string= "var)\n test)\ndo-i" "(let (var)\n do-i")
:value nil))
FAILED 93/152 evil-test-open-below
Hiding all blocks...
Hiding all blocks...done
-- INSERT --
passed 94/152 evil-test-open-below-folded
-- INSERT --
passed 95/152 evil-test-open-below-with-count
passed 96/152 evil-test-operator-0
passed 97/152 evil-test-operator-delete
passed 98/152 evil-test-operator-state-shortcut-keymap
passed 99/152 evil-test-operator-state-suppress-keymap
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
passed 100/152 evil-test-paragraph-objects
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
passed 101/152 evil-test-paren-objects
passed 102/152 evil-test-paren-range
passed 103/152 evil-test-parser
passed 104/152 evil-test-paste-after
passed 105/152 evil-test-paste-before
Undo!
Undo!
Undo!
Undo!
Undo!
Undo!
Test evil-test-paste-pop-after backtrace:
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
(block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn
(loop for i from 6 for frame = (backtrace-frame i) while frame colle
ert--record-backtrace()
(let* ((condition (first more-debugger-args)) (type (case (car condi
(cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
(case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
(ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
(let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
(progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
(destructuring-bind (first-debugger-arg &rest more-debugger-args) de
ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
(lambda (G71732 &rest debugger-args) (ert--run-test-debugger (symbol
apply((lambda (G71732 &rest debugger-args) (ert--run-test-debugger (
(lambda (&rest --cl-rest--) (apply (quote (lambda (G71732 &rest debu
signal(ert-test-failed (((should (string= (buffer-substring (max (po
ert-fail(((should (string= (buffer-substring (max (point-min) (- (po
(if (unwind-protect (setq value-10679 (apply fn-10677 args-10678)) (
(unless (unwind-protect (setq value-10679 (apply fn-10677 args-10678
(let (form-description-10681) (unless (unwind-protect (setq value-10
(let ((value-10679 (quote ert-form-evaluation-aborted-10680))) (let
(let ((fn-10677 (function string=)) (args-10678 (list (buffer-substr
(should (string= (buffer-substring (max (point-min) (- (point) (leng
(if (functionp before) (setq before-predicate before before nil) (sh
(progn (if (functionp before) (setq before-predicate before before n
(if before (progn (if (functionp before) (setq before-predicate befo
(when before (if (functionp before) (setq before-predicate before be
evil-test-text(";; This buffer is for notes you don't want to save.\
(if (or before-point after-point) (evil-test-text before-point after
(save-current-buffer (set-buffer actual-buffer) (if (or before-point
(with-current-buffer actual-buffer (if (or before-point after-point)
(save-current-buffer (set-buffer marker-buffer) (setq string (buffer
(with-current-buffer marker-buffer (setq string (buffer-string)) (wh
(unwind-protect (with-current-buffer marker-buffer (setq string (buf
(let ((actual-buffer (current-buffer)) (marker-buffer (evil-test-mar
evil-test-buffer-string(";; This buffer is for notes you don't want
(save-current-buffer (set-buffer buffer) (switch-to-buffer-other-win
(with-current-buffer buffer (switch-to-buffer-other-window (current-
(progn (with-current-buffer buffer (switch-to-buffer-other-window (c
(unwind-protect (progn (with-current-buffer buffer (switch-to-buffer
(let ((wconfig (current-window-configuration))) (unwind-protect (pro
(save-window-excursion (with-current-buffer buffer (switch-to-buffer
(unwind-protect (save-window-excursion (with-current-buffer buffer (
(let ((buffer (evil-test-buffer-from-string "[;]; This buffer is for
(evil-test-buffer "[;]; This buffer is for notes you don't want to s
(let ((ert--infos (cons (cons "Info: " "Single pop-next") ert--infos
(ert-info ("Single pop-next") (evil-test-buffer "[;]; This buffer is
(lambda nil (ert-info ("Paste") (evil-test-buffer "[;]; This buffer
funcall((lambda nil (ert-info ("Paste") (evil-test-buffer "[;]; This
(let ((debugger (list (quote lambda) (quote (&rest --cl-rest--)) (li
(unwind-protect (let ((debugger (list (quote lambda) (quote (&rest -
(let ((wconfig (current-window-configuration))) (unwind-protect (let
(unwind-protect (let ((wconfig (current-window-configuration))) (unw
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (let (
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
(catch (quote ert--pass) (let ((temp-buffer (generate-new-buffer " *
(progn (progn (progn (or (and (vectorp (symbol-value --cl-info--)) (
(let ((--cl-info-- (make-symbol "--info--"))) (setf (symbol-value --
(lexical-let ((info ert-test-execution-info)) (setf (ert--test-execu
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
(let ((ert--should-execution-observer (list (quote lambda) (quote (&
(unwind-protect (let ((ert--should-execution-observer (list (quote l
(let ((--cl-info-- (make-symbol "--info--")) (--cl-should-form-accu-
(unwind-protect (let ((--cl-info-- (make-symbol "--info--")) (--cl-s
(let ((--cl-begin-marker-- (make-symbol "--begin-marker--"))) (setf
(lexical-let ((begin-marker (with-current-buffer (get-buffer-create
(catch (quote --cl-block-error--) (lexical-let ((begin-marker (with-
(cl-block-wrapper (catch (quote --cl-block-error--) (lexical-let ((b
(block error (lexical-let ((begin-marker (with-current-buffer (get-b
ert-run-test([cl-struct-ert-test evil-test-paste-pop-after "Test `ev
(unwind-protect (ert-run-test test) (setf (aref (ert--stats-test-end
(let ((ert--current-run-stats stats) (pos (ert--stats-test-pos stats
ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test e
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
(while (consp --cl-var--) (setq test (car --cl-var--)) (ert-run-or-r
(let* ((--cl-var-- tests) (test nil)) (while (consp --cl-var--) (set
(catch (quote --cl-block-nil--) (let* ((--cl-var-- tests) (test nil)
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((--cl-var--
(block nil (let* ((--cl-var-- tests) (test nil)) (while (consp --cl-
(loop for test in tests do (ert-run-or-rerun-test stats test listene
(progn (loop for test in tests do (ert-run-or-rerun-test stats test
(unwind-protect (progn (loop for test in tests do (ert-run-or-rerun-
(let ((ert--current-run-stats stats)) (force-mode-line-update) (unwi
(unwind-protect (let ((ert--current-run-stats stats)) (force-mode-li
(let ((abortedp t)) (unwind-protect (let ((ert--current-run-stats st
(let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats
ert-run-tests(t (lambda (event-type &rest event-args) (ecase event-t
ert-run-tests-batch(t)
(let ((stats (ert-run-tests-batch selector))) (kill-emacs (if (zerop
(unwind-protect (let ((stats (ert-run-tests-batch selector))) (kill-
ert-run-tests-batch-and-exit(t)
(cond (interactive (ert-run-tests-interactively tests) (when evil-te
(let ((elp-use-standard-output (not interactive))) (setq tests (or (
evil-tests-run(nil)
(if interactive (if (y-or-n-p-with-timeout "Run tests? " 2 t) (evil-
evil-tests-initialize(nil nil)
eval((evil-tests-initialize (quote nil) (quote nil)))
command-line-1(("-L" "." "-L" "lib" "-l" "evil-tests.el" "--eval" "(
command-line()
normal-top-level()
Test evil-test-paste-pop-after condition:
Info: Single pop-next
(ert-test-failed
((should
(string=
(buffer-substring ... ...)
before))
:form
(string= ".\n;; If you want to create a file, visit that file with C-x C-f,\n;; then enter the text in that file's own buffer.\n" ";; This buffer is for notes you don't want to save.\n;; If you want to create a file, visit that file with C-x C-f,\n")
:value nil))
FAILED 106/152 evil-test-paste-pop-after
Undo!
Undo!
Undo!
Undo!
Undo!
Undo!
Undo!
Undo!
Undo!
passed 107/152 evil-test-paste-pop-before
Undo!
Undo!
Undo!
passed 108/152 evil-test-paste-pop-without-undo
passed 109/152 evil-test-previous-line
passed 110/152 evil-test-properties
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
passed 111/152 evil-test-quote-objects
passed 112/152 evil-test-read
passed 113/152 evil-test-read-key
passed 114/152 evil-test-regexp-range
passed 115/152 evil-test-register
-- INSERT --
-- INSERT --
passed 116/152 evil-test-repeat
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 117/152 evil-test-repeat-append
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 118/152 evil-test-repeat-append-line
-- INSERT --
-- INSERT --
passed 119/152 evil-test-repeat-by-change
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 120/152 evil-test-repeat-insert
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 121/152 evil-test-repeat-insert-line
passed 122/152 evil-test-repeat-kill-buffer
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 123/152 evil-test-repeat-open-above
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
passed 124/152 evil-test-repeat-open-below
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
Undo!
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
Undo!
-- INSERT --
Undo!
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
-- INSERT --
Undo!
-- INSERT --
-- INSERT --
passed 125/152 evil-test-repeat-pop
-- VISUAL BLOCK --
passed 126/152 evil-test-repeat-visual-block
-- VISUAL --
-- INSERT --
-- INSERT --
-- VISUAL --
passed 127/152 evil-test-repeat-visual-char
-- VISUAL LINE --
-- INSERT --
-- INSERT --
passed 128/152 evil-test-repeat-visual-line
passed 129/152 evil-test-rot13
passed 130/152 evil-test-rot13-repeat
passed 131/152 evil-test-rot13-repeat-with-count
passed 132/152 evil-test-rot13-with-count
-- VISUAL LINE --
-- VISUAL --
-- VISUAL LINE --
-- VISUAL LINE --
passed 133/152 evil-test-shift
passed 134/152 evil-test-sort
-- INSERT --
-- INSERT --
Test evil-test-substitute backtrace:
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
(block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn
(loop for i from 6 for frame = (backtrace-frame i) while frame colle
ert--record-backtrace()
(let* ((condition (first more-debugger-args)) (type (case (car condi
(cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
(case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
(ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
(let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
(progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
(destructuring-bind (first-debugger-arg &rest more-debugger-args) de
ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
(lambda (G72182 &rest debugger-args) (ert--run-test-debugger (symbol
apply((lambda (G72182 &rest debugger-args) (ert--run-test-debugger (
(lambda (&rest --cl-rest--) (apply (quote (lambda (G72182 &rest debu
signal(ert-test-failed (((should (string= (buffer-substring (point)
ert-fail(((should (string= (buffer-substring (point) (min (point-max
(if (unwind-protect (setq value-12320 (apply fn-12318 args-12319)) (
(unless (unwind-protect (setq value-12320 (apply fn-12318 args-12319
(let (form-description-12322) (unless (unwind-protect (setq value-12
(let ((value-12320 (quote ert-form-evaluation-aborted-12321))) (let
(let ((fn-12318 (function string=)) (args-12319 (list (buffer-substr
(should (string= (buffer-substring (point) (min (point-max) (+ (poin
(if (functionp after) (setq after-predicate after after nil) (should
(progn (if (functionp after) (setq after-predicate after after nil)
(if after (progn (if (functionp after) (setq after-predicate after a
(when after (if (functionp after) (setq after-predicate after after
evil-test-text("Above some line\nAB" "C\nBelow some empty line")
(if (or before-point after-point) (evil-test-text before-point after
(save-current-buffer (set-buffer actual-buffer) (if (or before-point
(with-current-buffer actual-buffer (if (or before-point after-point)
(save-current-buffer (set-buffer marker-buffer) (setq string (buffer
(with-current-buffer marker-buffer (setq string (buffer-string)) (wh
(unwind-protect (with-current-buffer marker-buffer (setq string (buf
(let ((actual-buffer (current-buffer)) (marker-buffer (evil-test-mar
evil-test-buffer-string("Above some line\nAB[C]\nBelow some empty li
(save-current-buffer (set-buffer buffer) (switch-to-buffer-other-win
(with-current-buffer buffer (switch-to-buffer-other-window (current-
(progn (with-current-buffer buffer (switch-to-buffer-other-window (c
(unwind-protect (progn (with-current-buffer buffer (switch-to-buffer
(let ((wconfig (current-window-configuration))) (unwind-protect (pro
(save-window-excursion (with-current-buffer buffer (switch-to-buffer
(unwind-protect (save-window-excursion (with-current-buffer buffer (
(let ((buffer (evil-test-buffer-from-string "Above some line\n[]\nBe
(evil-test-buffer "Above some line\n[]\nBelow some empty line" ("5sA
(let ((ert--infos (cons (cons "Info: " "On empty line") ert--infos))
(ert-info ("On empty line") (evil-test-buffer "Above some line\n[]\n
(lambda nil (ert-info ("Simple") (evil-test-buffer ";; [T]his buffer
funcall((lambda nil (ert-info ("Simple") (evil-test-buffer ";; [T]hi
(let ((debugger (list (quote lambda) (quote (&rest --cl-rest--)) (li
(unwind-protect (let ((debugger (list (quote lambda) (quote (&rest -
(let ((wconfig (current-window-configuration))) (unwind-protect (let
(unwind-protect (let ((wconfig (current-window-configuration))) (unw
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (let (
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
(catch (quote ert--pass) (let ((temp-buffer (generate-new-buffer " *
(progn (progn (progn (or (and (vectorp (symbol-value --cl-info--)) (
(let ((--cl-info-- (make-symbol "--info--"))) (setf (symbol-value --
(lexical-let ((info ert-test-execution-info)) (setf (ert--test-execu
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
(let ((ert--should-execution-observer (list (quote lambda) (quote (&
(unwind-protect (let ((ert--should-execution-observer (list (quote l
(let ((--cl-info-- (make-symbol "--info--")) (--cl-should-form-accu-
(unwind-protect (let ((--cl-info-- (make-symbol "--info--")) (--cl-s
(let ((--cl-begin-marker-- (make-symbol "--begin-marker--"))) (setf
(lexical-let ((begin-marker (with-current-buffer (get-buffer-create
(catch (quote --cl-block-error--) (lexical-let ((begin-marker (with-
(cl-block-wrapper (catch (quote --cl-block-error--) (lexical-let ((b
(block error (lexical-let ((begin-marker (with-current-buffer (get-b
ert-run-test([cl-struct-ert-test evil-test-substitute "Test `evil-su
(unwind-protect (ert-run-test test) (setf (aref (ert--stats-test-end
(let ((ert--current-run-stats stats) (pos (ert--stats-test-pos stats
ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test e
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
(while (consp --cl-var--) (setq test (car --cl-var--)) (ert-run-or-r
(let* ((--cl-var-- tests) (test nil)) (while (consp --cl-var--) (set
(catch (quote --cl-block-nil--) (let* ((--cl-var-- tests) (test nil)
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((--cl-var--
(block nil (let* ((--cl-var-- tests) (test nil)) (while (consp --cl-
(loop for test in tests do (ert-run-or-rerun-test stats test listene
(progn (loop for test in tests do (ert-run-or-rerun-test stats test
(unwind-protect (progn (loop for test in tests do (ert-run-or-rerun-
(let ((ert--current-run-stats stats)) (force-mode-line-update) (unwi
(unwind-protect (let ((ert--current-run-stats stats)) (force-mode-li
(let ((abortedp t)) (unwind-protect (let ((ert--current-run-stats st
(let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats
ert-run-tests(t (lambda (event-type &rest event-args) (ecase event-t
ert-run-tests-batch(t)
(let ((stats (ert-run-tests-batch selector))) (kill-emacs (if (zerop
(unwind-protect (let ((stats (ert-run-tests-batch selector))) (kill-
ert-run-tests-batch-and-exit(t)
(cond (interactive (ert-run-tests-interactively tests) (when evil-te
(let ((elp-use-standard-output (not interactive))) (setq tests (or (
evil-tests-run(nil)
(if interactive (if (y-or-n-p-with-timeout "Run tests? " 2 t) (evil-
evil-tests-initialize(nil nil)
eval((evil-tests-initialize (quote nil) (quote nil)))
command-line-1(("-L" "." "-L" "lib" "-l" "evil-tests.el" "--eval" "(
command-line()
normal-top-level()
Test evil-test-substitute condition:
Info: On empty line
(ert-test-failed
((should
(string=
(buffer-substring ... ...)
after))
:form
(string= "Cw some empty line" "C\nBelow some empty line")
:value nil))
FAILED 135/152 evil-test-substitute
-- VISUAL --
-- VISUAL --
-- VISUAL --
passed 136/152 evil-test-tag-objects
passed 137/152 evil-test-text-object
passed 138/152 evil-test-toggle-local-mode
passed 139/152 evil-test-type-modifiers
passed 140/152 evil-test-type-transform
passed 141/152 evil-test-unmatched-paren
passed 142/152 evil-test-visual-block
-- VISUAL --
-- VISUAL LINE --
Test evil-test-visual-char backtrace:
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
(block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn
(loop for i from 6 for frame = (backtrace-frame i) while frame colle
ert--record-backtrace()
(let* ((condition (first more-debugger-args)) (type (case (car condi
(cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
(case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
(ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
(let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
(progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
(destructuring-bind (first-debugger-arg &rest more-debugger-args) de
ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
(lambda (G72336 &rest debugger-args) (ert--run-test-debugger (symbol
apply((lambda (G72336 &rest debugger-args) (ert--run-test-debugger (
(lambda (&rest --cl-rest--) (apply (quote (lambda (G72336 &rest debu
signal(ert-test-failed (((should (string= (buffer-substring (max (po
ert-fail(((should (string= (buffer-substring (max (point-min) (- (po
(if (unwind-protect (setq value-13024 (apply fn-13022 args-13023)) (
(unless (unwind-protect (setq value-13024 (apply fn-13022 args-13023
(let (form-description-13026) (unless (unwind-protect (setq value-13
(let ((value-13024 (quote ert-form-evaluation-aborted-13025))) (let
(let ((fn-13022 (function string=)) (args-13023 (list (buffer-substr
(should (string= (buffer-substring (max (point-min) (- (point) (leng
(if (functionp before) (setq before-predicate before before nil) (sh
(progn (if (functionp before) (setq before-predicate before before n
(if before (progn (if (functionp before) (setq before-predicate befo
(when before (if (functionp before) (setq before-predicate before be
evil-test-text(";; buffer is for notes you don't want to save,\n" n
(save-excursion (goto-char (or evil-visual-end (region-end))) (evil-
(progn (save-excursion (goto-char (or evil-visual-beginning (region-
(evil-test-selection selection)
(progn (evil-test-selection selection))
(if selection (progn (evil-test-selection selection)))
(when selection (evil-test-selection selection))
(save-current-buffer (set-buffer actual-buffer) (if (or before-point
(with-current-buffer actual-buffer (if (or before-point after-point)
(save-current-buffer (set-buffer marker-buffer) (setq string (buffer
(with-current-buffer marker-buffer (setq string (buffer-string)) (wh
(unwind-protect (with-current-buffer marker-buffer (setq string (buf
(let ((actual-buffer (current-buffer)) (marker-buffer (evil-test-mar
evil-test-buffer-string("<;; [ ]buffer is for notes you don't want t
(save-current-buffer (set-buffer buffer) (switch-to-buffer-other-win
(with-current-buffer buffer (switch-to-buffer-other-window (current-
(progn (with-current-buffer buffer (switch-to-buffer-other-window (c
(unwind-protect (progn (with-current-buffer buffer (switch-to-buffer
(let ((wconfig (current-window-configuration))) (unwind-protect (pro
(save-window-excursion (with-current-buffer buffer (switch-to-buffer
(unwind-protect (save-window-excursion (with-current-buffer buffer (
(let ((buffer (evil-test-buffer-from-string ";; [T]his buffer is for
(evil-test-buffer ";; [T]his buffer is for notes you don't want to s
(lambda nil (evil-test-buffer ";; [T]his buffer is for notes you don
funcall((lambda nil (evil-test-buffer ";; [T]his buffer is for notes
(let ((debugger (list (quote lambda) (quote (&rest --cl-rest--)) (li
(unwind-protect (let ((debugger (list (quote lambda) (quote (&rest -
(let ((wconfig (current-window-configuration))) (unwind-protect (let
(unwind-protect (let ((wconfig (current-window-configuration))) (unw
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (let (
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
(catch (quote ert--pass) (let ((temp-buffer (generate-new-buffer " *
(progn (progn (progn (or (and (vectorp (symbol-value --cl-info--)) (
(let ((--cl-info-- (make-symbol "--info--"))) (setf (symbol-value --
(lexical-let ((info ert-test-execution-info)) (setf (ert--test-execu
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
(let ((ert--should-execution-observer (list (quote lambda) (quote (&
(unwind-protect (let ((ert--should-execution-observer (list (quote l
(let ((--cl-info-- (make-symbol "--info--")) (--cl-should-form-accu-
(unwind-protect (let ((--cl-info-- (make-symbol "--info--")) (--cl-s
(let ((--cl-begin-marker-- (make-symbol "--begin-marker--"))) (setf
(lexical-let ((begin-marker (with-current-buffer (get-buffer-create
(catch (quote --cl-block-error--) (lexical-let ((begin-marker (with-
(cl-block-wrapper (catch (quote --cl-block-error--) (lexical-let ((b
(block error (lexical-let ((begin-marker (with-current-buffer (get-b
ert-run-test([cl-struct-ert-test evil-test-visual-char "Test Visual
(unwind-protect (ert-run-test test) (setf (aref (ert--stats-test-end
(let ((ert--current-run-stats stats) (pos (ert--stats-test-pos stats
ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test e
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
(while (consp --cl-var--) (setq test (car --cl-var--)) (ert-run-or-r
(let* ((--cl-var-- tests) (test nil)) (while (consp --cl-var--) (set
(catch (quote --cl-block-nil--) (let* ((--cl-var-- tests) (test nil)
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((--cl-var--
(block nil (let* ((--cl-var-- tests) (test nil)) (while (consp --cl-
(loop for test in tests do (ert-run-or-rerun-test stats test listene
(progn (loop for test in tests do (ert-run-or-rerun-test stats test
(unwind-protect (progn (loop for test in tests do (ert-run-or-rerun-
(let ((ert--current-run-stats stats)) (force-mode-line-update) (unwi
(unwind-protect (let ((ert--current-run-stats stats)) (force-mode-li
(let ((abortedp t)) (unwind-protect (let ((ert--current-run-stats st
(let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats
ert-run-tests(t (lambda (event-type &rest event-args) (ecase event-t
ert-run-tests-batch(t)
(let ((stats (ert-run-tests-batch selector))) (kill-emacs (if (zerop
(unwind-protect (let ((stats (ert-run-tests-batch selector))) (kill-
ert-run-tests-batch-and-exit(t)
(cond (interactive (ert-run-tests-interactively tests) (when evil-te
(let ((elp-use-standard-output (not interactive))) (setq tests (or (
evil-tests-run(nil)
(if interactive (if (y-or-n-p-with-timeout "Run tests? " 2 t) (evil-
evil-tests-initialize(nil nil)
eval((evil-tests-initialize (quote nil) (quote nil)))
command-line-1(("-L" "." "-L" "lib" "-l" "evil-tests.el" "--eval" "(
command-line()
normal-top-level()
Test evil-test-visual-char condition:
(ert-test-failed
((should
(string=
(buffer-substring ... ...)
before))
:form
(string= " don't want to save,\n;; and for Lisp evaluation." ";; buffer is for notes you don't want to save,\n")
:value nil))
FAILED 143/152 evil-test-visual-char
passed 144/152 evil-test-visual-exchange
passed 145/152 evil-test-visual-line
-- VISUAL LINE --
Test evil-test-visual-paste backtrace:
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
(block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn
(loop for i from 6 for frame = (backtrace-frame i) while frame colle
ert--record-backtrace()
(let* ((condition (first more-debugger-args)) (type (case (car condi
(cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
(case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
(ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
(let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
(progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
(destructuring-bind (first-debugger-arg &rest more-debugger-args) de
ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
(lambda (G72397 &rest debugger-args) (ert--run-test-debugger (symbol
apply((lambda (G72397 &rest debugger-args) (ert--run-test-debugger (
(lambda (&rest --cl-rest--) (apply (quote (lambda (G72397 &rest debu
signal(ert-test-failed (((should (string= (buffer-substring (point)
ert-fail(((should (string= (buffer-substring (point) (min (point-max
(if (unwind-protect (setq value-13169 (apply fn-13167 args-13168)) (
(unless (unwind-protect (setq value-13169 (apply fn-13167 args-13168
(let (form-description-13171) (unless (unwind-protect (setq value-13
(let ((value-13169 (quote ert-form-evaluation-aborted-13170))) (let
(let ((fn-13167 (function string=)) (args-13168 (list (buffer-substr
(should (string= (buffer-substring (point) (min (point-max) (+ (poin
(if (functionp after) (setq after-predicate after after nil) (should
(progn (if (functionp after) (setq after-predicate after after nil)
(if after (progn (if (functionp after) (setq after-predicate after a
(when after (if (functionp after) (setq after-predicate after after
evil-test-text("" ";; If you want to create a file, visit that file
(if (or before-point after-point) (evil-test-text before-point after
(save-current-buffer (set-buffer actual-buffer) (if (or before-point
(with-current-buffer actual-buffer (if (or before-point after-point)
(save-current-buffer (set-buffer marker-buffer) (setq string (buffer
(with-current-buffer marker-buffer (setq string (buffer-string)) (wh
(unwind-protect (with-current-buffer marker-buffer (setq string (buf
(let ((actual-buffer (current-buffer)) (marker-buffer (evil-test-mar
evil-test-buffer-string("[;]; If you want to create a file, visit th
(save-current-buffer (set-buffer buffer) (switch-to-buffer-other-win
(with-current-buffer buffer (switch-to-buffer-other-window (current-
(progn (with-current-buffer buffer (switch-to-buffer-other-window (c
(unwind-protect (progn (with-current-buffer buffer (switch-to-buffer
(let ((wconfig (current-window-configuration))) (unwind-protect (pro
(save-window-excursion (with-current-buffer buffer (switch-to-buffer
(unwind-protect (save-window-excursion (with-current-buffer buffer (
(let ((buffer (evil-test-buffer-from-string ";; This buffer is for n
(evil-test-buffer ";; This buffer is for notes you don't want to sav
(lambda nil (evil-test-buffer ";; This buffer is for notes you don't
funcall((lambda nil (evil-test-buffer ";; This buffer is for notes y
(let ((debugger (list (quote lambda) (quote (&rest --cl-rest--)) (li
(unwind-protect (let ((debugger (list (quote lambda) (quote (&rest -
(let ((wconfig (current-window-configuration))) (unwind-protect (let
(unwind-protect (let ((wconfig (current-window-configuration))) (unw
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (let (
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
(catch (quote ert--pass) (let ((temp-buffer (generate-new-buffer " *
(progn (progn (progn (or (and (vectorp (symbol-value --cl-info--)) (
(let ((--cl-info-- (make-symbol "--info--"))) (setf (symbol-value --
(lexical-let ((info ert-test-execution-info)) (setf (ert--test-execu
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
(let ((ert--should-execution-observer (list (quote lambda) (quote (&
(unwind-protect (let ((ert--should-execution-observer (list (quote l
(let ((--cl-info-- (make-symbol "--info--")) (--cl-should-form-accu-
(unwind-protect (let ((--cl-info-- (make-symbol "--info--")) (--cl-s
(let ((--cl-begin-marker-- (make-symbol "--begin-marker--"))) (setf
(lexical-let ((begin-marker (with-current-buffer (get-buffer-create
(catch (quote --cl-block-error--) (lexical-let ((begin-marker (with-
(cl-block-wrapper (catch (quote --cl-block-error--) (lexical-let ((b
(block error (lexical-let ((begin-marker (with-current-buffer (get-b
ert-run-test([cl-struct-ert-test evil-test-visual-paste "Test `evil-
(unwind-protect (ert-run-test test) (setf (aref (ert--stats-test-end
(let ((ert--current-run-stats stats) (pos (ert--stats-test-pos stats
ert-run-or-rerun-test([cl-struct-ert--stats t [[cl-struct-ert-test e
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
#^^[3 0 set-mark-command move-beginning-of-line backward-char mode-spe
(while (consp --cl-var--) (setq test (car --cl-var--)) (ert-run-or-r
(let* ((--cl-var-- tests) (test nil)) (while (consp --cl-var--) (set
(catch (quote --cl-block-nil--) (let* ((--cl-var-- tests) (test nil)
(cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((--cl-var--
(block nil (let* ((--cl-var-- tests) (test nil)) (while (consp --cl-
(loop for test in tests do (ert-run-or-rerun-test stats test listene
(progn (loop for test in tests do (ert-run-or-rerun-test stats test
(unwind-protect (progn (loop for test in tests do (ert-run-or-rerun-
(let ((ert--current-run-stats stats)) (force-mode-line-update) (unwi
(unwind-protect (let ((ert--current-run-stats stats)) (force-mode-li
(let ((abortedp t)) (unwind-protect (let ((ert--current-run-stats st
(let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats
ert-run-tests(t (lambda (event-type &rest event-args) (ecase event-t
ert-run-tests-batch(t)
(let ((stats (ert-run-tests-batch selector))) (kill-emacs (if (zerop
(unwind-protect (let ((stats (ert-run-tests-batch selector))) (kill-
ert-run-tests-batch-and-exit(t)
(cond (interactive (ert-run-tests-interactively tests) (when evil-te
(let ((elp-use-standard-output (not interactive))) (setq tests (or (
evil-tests-run(nil)
(if interactive (if (y-or-n-p-with-timeout "Run tests? " 2 t) (evil-
evil-tests-initialize(nil nil)
eval((evil-tests-initialize (quote nil) (quote nil)))
command-line-1(("-L" "." "-L" "lib" "-l" "evil-tests.el" "--eval" "(
command-line()
normal-top-level()
Test evil-test-visual-paste condition:
(ert-test-failed
((should
(string=
(buffer-substring ... ...)
after))
:form
(string= ";; If you want to create a file, visit that file with C-x C-f.\n" ";; If you want to create a file, visit that file with C-x C-f.\n;; If you want to create a file, visit that file with C-x C-f.")
:value nil))
FAILED 146/152 evil-test-visual-paste
passed 147/152 evil-test-visual-refresh
-- VISUAL --
-- VISUAL LINE --
-- VISUAL BLOCK --
passed 148/152 evil-test-visual-restore
-- VISUAL --
-- VISUAL --
passed 149/152 evil-test-word-objects
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
-- VISUAL --
passed 150/152 evil-test-word-objects-cjk
passed 151/152 evil-test-yank
passed 152/152 evil-transform-vim-style-regexp
Ran 152 tests, 146 results as expected, 6 unexpected (2012-09-03 14:09:07+0200)
6 unexpected results:
FAILED evil-test-end-of-line
FAILED evil-test-open-below
FAILED evil-test-paste-pop-after
FAILED evil-test-substitute
FAILED evil-test-visual-char
FAILED evil-test-visual-paste
make: *** [test] Erreur 1
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 490 bytes
Desc: not available
Url : https://lists.ourproject.org/pipermail/implementations-list/attachments/20120903/9f5f11de/attachment-0001.pgp
More information about the implementations-list
mailing list