We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c1fdbd5 commit 3004728Copy full SHA for 3004728
Clojure/Clojure.Source/clojure/core_print.clj
@@ -515,12 +515,14 @@
515
(defmethod print-method clojure.lang.IDeref [o ^System.IO.TextWriter w]
516
(print-tagged-object o (deref-as-map o) w))
517
518
-;;; DM:Added
+;;; DM:Added
519
(defn- stack-frame-info [^System.Diagnostics.StackFrame sf]
520
(if (nil? sf)
521
nil
522
(if-let [m (.GetMethod sf)]
523
- [(symbol (.FullName (.DeclaringType m)))
+ [(symbol (if-let [declaring-type (.DeclaringType m)]
524
+ (.FullName (.DeclaringType m))
525
+ "<Unknown type>"))
526
(symbol (.Name m))
527
(or (.GetFileName sf) "NO_FILE")
528
(.GetFileLineNumber sf)]
0 commit comments