Skip to content

Commit

Permalink
Change stopped strategy
Browse files Browse the repository at this point in the history
  • Loading branch information
svaante committed Jan 1, 2024
1 parent dcd6593 commit 1e9587b
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions dape-tests.el
Original file line number Diff line number Diff line change
Expand Up @@ -111,7 +111,6 @@ Helper for `dape-test--with-files'."
(dape-test--should
(not (process-list)))
(advice-remove 'yes-or-no-p 'always-yes)
(setq dape--state nil)
;; clean up buffers
(dolist (buffer buffers)
(kill-buffer buffer))
Expand Down Expand Up @@ -542,7 +541,7 @@ Expects line with string \"breakpoint\" in source."
(with-current-buffer main-buffer
(dape-test--should (= (line-number-at-pos)
(dape-test--line-at-regex "breakpoint"))))
(dape-test--should (eq dape--state 'stopped))
(dape-test--should (dape--stopped-threads))
(dape-test--should (get-buffer "*dape-repl*"))
(pop-to-buffer "*dape-repl*")
(insert "next")
Expand All @@ -553,7 +552,7 @@ Expects line with string \"breakpoint\" in source."
(dape-test--should (eq dape--state 'stopped))
(insert "next")
(comint-send-input)
(dape-test--should (eq dape--state 'stopped))
(dape-test--should (dape--stopped-threads))
(with-current-buffer main-buffer
(dape-test--should (= (line-number-at-pos) (dape-test--line-at-regex "third line"))))
(insert "a = 99")
Expand Down

0 comments on commit 1e9587b

Please sign in to comment.