File tree 1 file changed +0
-45
lines changed
fnl/conjure/client/clojure/nrepl
1 file changed +0
-45
lines changed Original file line number Diff line number Diff line change 18
18
(log.dbg "init-debugger response" msg )))
19
19
nil )
20
20
21
- ;; TODO Highlight :line :column
22
-
23
21
(defn send [opts ]
24
22
(let [key (a.get - in state [:last-request :key])]
25
23
(if key
78
76
(send {:input (.. ":" opts.args )})
79
77
(log.append
80
78
[(.. "; Valid inputs: " (str.join ", " (valid - inputs )))])))
81
-
82
- ; {:code "(defn add
83
- ; \"Hello, World!
84
- ; This is a function.\"
85
- ; [a b]
86
- ; #dbg (+ a b))"
87
- ; :column 1
88
- ; :coor [4 1]
89
- ; :debug-value "1"
90
- ; :file "/home/olical/repos/Olical/conjure/dev/clojure/src/dev/sandbox.cljc"
91
- ; :id "05a0f24c-6575-40fc-a1a7-39937fd07fbb"
92
- ; :input-type ["continue"
93
- ; "locals"
94
- ; "inspect"
95
- ; "trace"
96
- ; "here"
97
- ; "continue-all"
98
- ; "next"
99
- ; "out"
100
- ; "inject"
101
- ; "stacktrace"
102
- ; "inspect-prompt"
103
- ; "quit"
104
- ; "in"
105
- ; "eval"]
106
- ; :inspect "(\"Class\" \": \" (:value \"clojure.lang.PersistentArrayMap\" 0) (:newline) \"Contents: \" (:newline) \" \" (:value \"a\" 1) \" = \" (:value \"1\" 2) (:newline) \" \" (:value \"b\" 3) \" = \" (:value \"2\" 4) (:newline))"
107
- ; :key "45dd9615-340a-49ad-8561-4d4739e15bea"
108
- ; :line 11
109
- ; :locals [["a" "1"] ["b" "2"]]
110
- ; :original-id "64eb18b5-7319-4dac-8954-fc35c410206c"
111
- ; :original-ns "dev.sandbox"
112
- ; :prompt {}
113
- ; :session "8d2503f0-bf45-44fa-b409-c34ab6eea13c"
114
- ; :status ["need-debug-input"]}
115
-
116
- ; (server.send
117
- ; {:op :debug-middleware
118
- ; :code "(+ 1 2)"
119
- ; :file "dev/sandbox.cljc"
120
- ; :ns "dev.sandbox"
121
- ; :point [10 5]}
122
- ; (fn [...]
123
- ; (a.println ...))))
You can’t perform that action at this time.
0 commit comments