Free Clojure course. Sign Up for tracking progress →

Clojure: Агенты

Теперь поговорим про агентов. Что их отличает от атомов? Дело в том, что любое изменение состояния атома является синхронным, в то время как состояние агента меняется асинхронно. В остальном агенты похожи на атомы, в них можно добавлять валидации, настраивать обработку ошибок.

Рассмотрим несколько примеров:

(def my-agent (agent 0))

@my-agent ; => 0

(send my-agent inc)
#object[clojure.lang.Agent 0x59c25f30 {:status :ready, :val 1}]

@my-agent ; => 1

(send my-agent dec)
#object[clojure.lang.Agent 0x59c25f30 {:status :ready, :val 1}]

@my-agent ; => 0

Как видно из в последнем примере, при попытке уменьшить значение агента на единицу, вернулось состояние агента с неизмененным значением, затем мы извлекли состояние агента вручную, однако в нем уже хранился 0, почему? Как упоминалось выше, изменения к состоянию агента применяются асинхронно, важно помнить эту особенность, при работе с ними. Если же нужно получить значение агента после обновления, то можно использовать функции await и await-for.

Рассмотрим еще пару примеров с обработкой ошибок в агентах:

(def broken-agent (agent 0))

(send broken-agent (fn  [_] (throw
  (Exception. "Houston we have a problem!"))))
#object[clojure.lang.Agent 0xd76bd8c {:status :ready, :val 0}]

(send broken-agent inc)
Execution error at user/eval2175$fn (REPL:1).
Houston we have a problem!

; Теперь настроим агента так, чтобы при возникновении ошибок процесс изменения не прерывался

(def not-broken-agent (agent 0 :error-mode :continue))

(send not-broken-agent (fn  [_] (throw
  (Exception. "Houston we have one more problem!!!"))))
#object[clojure.lang.Agent 0x44b27f64 {:status :ready, :val 0}]

(send not-broken-agent inc)
#object[clojure.lang.Agent 0x44b27f64 {:status :ready, :val 0}]

; ошибки не возникло!
@not-broken-agent ; => 1

Instructions

Реализуйте функцию transit, которая ведет себя так же, как в упражнении с атомами, только с помощью агентов. Функция принимает два агента. Агенты представляют счета в банках и число денег, которое нужно перевести с первого на второй аккаунт, в результате выполнения функции, верните счета в виде вектора (помните, изменения в агентах применяются асинхронно!).

(transit (agent 100) (agent 20) 20)
; => [80 40]
(transit (agent 50) (agent 30) 50)
; => [0 80]
The exercise doesn't pass checking. What to do? 😶

If you've reached a deadlock it's time to ask your question in the «Discussions». How ask a question correctly:

  • Be sure to attach the test output, without it it's almost impossible to figure out what went wrong, even if you show your code. It's complicated for developers to execute code in their heads, but having a mistake before their eyes most probably will be helpful.
In my environment the code works, but not here 🤨

Tests are designed so that they test the solution in different ways and against different data. Often the solution works with one kind of input data but doesn't work with others. Check the «Tests» tab to figure this out, you can find hints at the error output.

My code is different from the teacher's one 🤔

It's fine. 🙆 One task in programming can be solved in many different ways. If your code passed all tests, it complies with the task conditions.

In some rare cases, the solution may be adjusted to the tests, but this can be seen immediately.

I've read the lessons but nothing is clear 🙄

It's hard to make educational materials that will suit everyone. We do our best but there is always something to improve. If you see a material that is not clear to you, describe the problem in “Discussions”. It will be great if you'll write unclear points in the question form. Usually, we need a few days for corrections.

By the way, you can participate in courses improvement. There is a link below to the lessons course code which you can edit right in your browser.

If you got stuck and don't know what to do, you can ask a question in our huge and friendly community