fix: better error handling/reporting

src/k16/gx/beta/core.cljc

@@ -401,9 +401,10 @@
   [processor arg-map]
   (try
     [nil (processor arg-map)]
-    (catch #?(:clj Exception :cljs js/Error) e
+    (catch #?(:clj Throwable :cljs js/Error) e
       [(gx.err/gx-err-data "Signal processor error"
                            {:ex-message (impl/error-message e)
+                            :ex (or (ex-data e) e)
                             :args arg-map})
        nil])))
 

src/k16/gx/beta/errors.cljc

@@ -93,9 +93,8 @@
 (defmethod humanize :node-signal
   [{:keys [internal-data] :as error}]
   (humanize-error
-   error (when-let [{:keys [ex-message args dep-node-keys]} internal-data]
+   error (when-let [{:keys [ex-message dep-node-keys]} internal-data]
            (tokenize "error = " ex-message
-                     "args = " args
                      "deps-nodes = " dep-node-keys))))
 
 (comment

src/k16/gx/beta/system.clj

@@ -38,7 +38,7 @@
   (when-let [gx-map (get @registry* system-name)]
     (node-props gx-map :gx/value)))
 
-(defn failures
+(defn node-failures
   [system-name]
   (when-let [gx-map (get @registry* system-name)]
     (let [{:keys [components static]} (node-props gx-map :gx/failure)
@@ -48,6 +48,11 @@
         (seq failed-comps) (assoc :components failed-comps)
         (seq failed-static) (assoc :static failed-static)))))
 
+(defn failures
+  [system-name]
+  (when-let [gx-map (get @registry* system-name)]
+    (:failures gx-map)))
+
 (defn failures-humanized
   [system-name]
   (when-let [gx-map (get @registry* system-name)]