`clojure.core/set-error-handler!`¶

Type: function Added: Clojure 1.2 Examples: 2 Runnable: 0

([a handler-fn])

Sets the error-handler of agent a to handler-fn. If an action being run by the agent throws an exception or doesn't pass the validator fn, handler-fn will be called with two arguments: the agent and the exception.

Examples¶

by Claj on 2012-02-16 . May have evaluation errors.

by cloojure on 2017-06-19 . May have evaluation errors.

(deftest t-rstart
  (future (println "running in a thread..."))
  (let [agt (agent 0)

; This doesn't work
        h01 (fn [a e]
              (println :10 "agent error found:" )
              (println :11 "restarting agent...")
              (restart-agent a 100)
              (Thread/sleep 100)
              (println :12 "agent restarted, state=" @a))

; This works. Need to call restart-agent in a separate thread
        h02 (fn [a e]
              (println :20 "agent error found:" )
              (future
                (println :21 "restarting agent...")
                (restart-agent a 200)
                (println :22 "agent restarted, state=" @a))) ;=> 200
  ]
    (set-error-handler! agt h02)
    (send agt inc)
    (Thread/sleep 100) (println :01 @agt)  ;=> 1
    (Thread/sleep 100) (send agt #(/ % 0))
    (Thread/sleep 100) (println :02 @agt)  ;=> 200
    (Thread/sleep 100) (send agt inc)
    (Thread/sleep 100) (println :03 @agt)  ;=> 201
))

; Output
;   running in a thread...
;   :01 1
;   :20 agent error found:
;   :21 restarting agent...
;   :22 agent restarted, state= 200
;   :02 200
;   :03 201

clojure.core/set-error-handler!¶

Examples¶

See also¶

`clojure.core/set-error-handler!`¶