Compare commits

..

No commits in common. "38f424614558e0dd2816e005114f3d368071d112" and "f9041f9563f68aae6fd5eb5af282aa64e7d69731" have entirely different histories.

2 changed files with 7 additions and 6 deletions

View file

@ -220,14 +220,14 @@
(if (or common-attrs trace-attrs) (if (or common-attrs trace-attrs)
(let [ab (Attributes/builder)] (let [ab (Attributes/builder)]
(when-let [ns (get signal :ns)] (.put ab "ns" (str ns))) (when-let [ns (get signal :ns)] (.put ab "ns" (str ns)))
(when-let [line (enc/get-in* signal [:coords 0])] (.put ab "line" (long line))) (when-let [line (get signal :line)] (.put ab "line" (long line)))
(when-let [attrs common-attrs] (put-attrs! ab attrs)) (when-let [attrs common-attrs] (put-attrs! ab attrs))
(when-let [attrs trace-attrs] (put-attrs! ab attrs)) (when-let [attrs trace-attrs] (put-attrs! ab attrs))
(.build ab)) (.build ab))
;; Common case ;; Common case
(when-let [ns (get signal :ns)] (when-let [ns (get signal :ns)]
(if-let [line (enc/get-in* signal [:coords 0])] (if-let [line (get signal :line)]
(Attributes/of ak-ns ns, ak-line (long line)) (Attributes/of ak-ns ns, ak-line (long line))
(Attributes/of ak-ns ns))))))) (Attributes/of ak-ns ns)))))))

View file

@ -200,8 +200,9 @@
:ctx+ context :ctx+ context
:ns ?ns-str :ns ?ns-str
:coords (when ?line [?line ?column]) :file ?file
:file ?file ; Non-standard, goes to kvs :line ?line
:column ?column
:error ?err :error ?err
:msg (force output_)})))}) :msg (force output_)})))})