Skip to content
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.

Commit 9c01514

Browse files
committedOct 19, 2019
Rename :Continue command to :continue-all, tweak docstring
Update :Continue -> :continue-all in debug-integration-test
1 parent 9443064 commit 9c01514

File tree

2 files changed

+12
-8
lines changed

2 files changed

+12
-8
lines changed
 

‎src/cider/nrepl/middleware/debug.clj

+9-5
Original file line numberDiff line numberDiff line change
@@ -299,7 +299,7 @@ this map (identified by a key), and will `dissoc` it afterwards."}
299299
(def debug-commands
300300
"An unsorted set of commands supported by the debugger."
301301
#{:continue
302-
:Continue
302+
:continue-all
303303
:eval
304304
:here
305305
:in
@@ -317,13 +317,17 @@ this map (identified by a key), and will `dissoc` it afterwards."}
317317
Ask for one of the following debug commands using `read-debug-input`:
318318
319319
next: Return value.
320-
continue: Skip breakpoints for the remainder of this eval session.
320+
continue: Skip the current breakpoint.
321+
continue-all: Skip breakpoints for the remainder of this eval session.
322+
in: Step into a function
321323
out: Skip breakpoints in the current sexp.
322-
inspect: Evaluate an expression and inspect it.
324+
here: Skip all breakpoints up till specified coordinate `coord`
325+
inspect: Prompt for an expression to evaluate and inspect it.
323326
locals: Inspect local variables.
324327
inject: Evaluate an expression and return it.
325328
eval: Evaluate an expression, display result, and prompt again.
326329
stacktrace: Print the current stacktrace, and prompt again.
330+
trace: Continue, printing intermediate expressions and their values.
327331
quit: Abort current eval session.
328332
329333
Response received can be any one of these values. It can also be a map
@@ -355,8 +359,8 @@ this map (identified by a key), and will `dissoc` it afterwards."}
355359
value)
356360
:continue (do (reset! (:skip STATE__) true)
357361
value)
358-
:Continue (do (skip-breaks! :all)
359-
value)
362+
:continue-all (do (skip-breaks! :all)
363+
value)
360364
:out (do (skip-breaks! :deeper (butlast (:coor dbg-state)) (:code dbg-state) force?)
361365
value)
362366
:here (do (skip-breaks! :before coord (:code dbg-state) force?)

‎test/clj/cider/nrepl/middleware/debug_integration_test.clj

+3-3
Original file line numberDiff line numberDiff line change
@@ -96,7 +96,7 @@
9696

9797
(def-debug-op :next)
9898
(def-debug-op :continue)
99-
(def-debug-op :Continue)
99+
(def-debug-op :continue-all)
100100
(def-debug-op :in)
101101

102102
(defmethod debugger-send :out [_ & [force?]]
@@ -261,7 +261,7 @@
261261
(<-- {:debug-value "1" :coor [1 3 1]}) ; a in foo
262262
(--> :continue)
263263
(<-- {:debug-value "2" :coor [1 3 1]}) ; a in foo
264-
(--> :Continue)
264+
(--> :continue-all)
265265
(<-- {:value ":fin"})
266266
(<-- {:status ["done"]})))
267267

@@ -615,6 +615,6 @@
615615
(.startsWith file "jar:file:")
616616
(.endsWith file "/nrepl/server.clj"))
617617

618-
(--> :Continue)
618+
(--> :continue-all)
619619
(<-- {:value "{:transport 23}"})
620620
(<-- {:status ["done"]}))

0 commit comments

Comments
 (0)
Please sign in to comment.