(let*
[c__2961__auto__
(clojure.core.async/chan 1)
captured-bindings__2962__auto__
(clojure.lang.Var/getThreadBindingFrame)]
(clojure.core.async.impl.dispatch/run
(clojure.core/fn
[]
(clojure.core/let
[f__2963__auto__
(clojure.core/fn
state-machine__2826__auto__
([]
(clojure.core.async.impl.ioc-macros/aset-all!
(java.util.concurrent.atomic.AtomicReferenceArray. 13)
0
state-machine__2826__auto__
1
1))
([state_4692]
(clojure.core/let
[old-frame__2827__auto__
(clojure.lang.Var/getThreadBindingFrame)
ret-value__2828__auto__
(try
(clojure.lang.Var/resetThreadBindingFrame
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
3))
(clojure.core/loop
[]
(clojure.core/let
[result__2829__auto__
(clojure.core/case
(clojure.core/int
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
1))
1
(clojure.core/let
[inst_4645
client
state_4692
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
7
inst_4645)]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
2)
:recur))
2
(clojure.core/let
[inst_4645
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
7)
inst_4648
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
8)
inst_4647
(:write-ch inst_4645)
inst_4648
(<!! inst_4647)
inst_4649
(instance? Stop inst_4648)
state_4692
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
8
inst_4648)]
(do
(if
inst_4649
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
4)
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
5))
:recur))
3
(clojure.core/let
[inst_4690
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
state_4692
state_4692]
(clojure.core.async.impl.ioc-macros/return-chan
state_4692
inst_4690))
4
(clojure.core/let
[state_4692 state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
6)
:recur))
5
(clojure.core/let
[inst_4648
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
8)
inst_4652
(instance? Reconnected inst_4648)
state_4692
state_4692]
(do
(if
inst_4652
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
7)
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
8))
:recur))
6
(clojure.core/let
[inst_4688
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
state_4692
state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
inst_4688
1
3)
:recur))
7
(clojure.core/let
[inst_4648
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
8)
inst_4654
(:client inst_4648)
inst_4655
(error
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
Writer
received
reconnected
inst_4654)
inst_4656
(:client inst_4648)
inst_4645
inst_4656
state_4692
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
7
inst_4645
9
inst_4655)]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
2)
:recur))
8
(clojure.core/let
[inst_4648
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
8)
inst_4659
(instance? Pause inst_4648)
state_4692
state_4692]
(do
(if
inst_4659
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
10)
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
11))
:recur))
9
(clojure.core/let
[inst_4686
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
state_4692
state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
inst_4686
1
6)
:recur))
10
(clojure.core/let
[inst_4648
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
8)
inst_4661
(:time inst_4648)
inst_4662
(timeout inst_4661)
state_4692
state_4692]
(clojure.core.async.impl.ioc-macros/take!
state_4692
13
inst_4662))
11
(clojure.core/let
[state_4692 state_4692]
(do
(if
:else
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
14)
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
1
15))
:recur))
12
(clojure.core/let
[inst_4684
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
state_4692
state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
inst_4684
1
9)
:recur))
13
(clojure.core/let
[inst_4645
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
7)
inst_4664
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
tmp4693
inst_4645
inst_4645
tmp4693
state_4692
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
10
inst_4664
7
inst_4645)]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
2)
:recur))
14
(clojure.core/let
[state_4692 state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
19)
:recur))
15
(clojure.core/let
[state_4692 state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
16)
:recur))
16
(clojure.core/let
[inst_4682
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
state_4692
state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
inst_4682
1
12)
:recur))
17
(clojure.core/let
[inst_4645
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
7)
inst_4678
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
tmp4694
inst_4645
inst_4645
tmp4694
state_4692
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
7
inst_4645
11
inst_4678)]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
2
nil
1
2)
:recur))
18
(clojure.core/let
[inst_4668
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
2)
inst_4669
(error !!!!! Error while writing inst_4668)
inst_4670
(clojure.core/vector inst_4668 1)
inst_4671
(>!! internal-error-ch inst_4670)
inst_4672
(thread inst_4671)
state_4692
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
12
inst_4669)]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
clojure.core.async.impl.ioc-macros/VALUE-IDX
inst_4672)
(clojure.core.async.impl.ioc-macros/process-exception
state_4692)
:recur))
19
(clojure.core/let
[inst_4645
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
7)
inst_4648
(clojure.core.async.impl.ioc-macros/aget-object
state_4692
8)
_
(clojure.core.async.impl.ioc-macros/add-exception-frame
state_4692
18
Exception
nil
17)
inst_4676
(do-write inst_4645 nil inst_4648 false conf)
state_4692
state_4692]
(do
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
clojure.core.async.impl.ioc-macros/VALUE-IDX
inst_4676)
(clojure.core.async.impl.ioc-macros/process-exception
state_4692)
:recur)))]
(if
(clojure.core/identical? result__2829__auto__ :recur)
(recur)
result__2829__auto__)))
(catch
java.lang.Throwable
ex__2830__auto__
(clojure.core.async.impl.ioc-macros/aset-all!
state_4692
clojure.core.async.impl.ioc-macros/CURRENT-EXCEPTION
ex__2830__auto__)
(clojure.core.async.impl.ioc-macros/process-exception
state_4692)
:recur)
(finally
(clojure.lang.Var/resetThreadBindingFrame
old-frame__2827__auto__)))]
(if
(clojure.core/identical? ret-value__2828__auto__ :recur)
(recur state_4692)
ret-value__2828__auto__))))
state__2964__auto__
(clojure.core/->
(f__2963__auto__)
(clojure.core.async.impl.ioc-macros/aset-all!
clojure.core.async.impl.ioc-macros/USER-START-IDX
c__2961__auto__
clojure.core.async.impl.ioc-macros/BINDINGS-IDX
captured-bindings__2962__auto__))]
(clojure.core.async.impl.ioc-macros/run-state-machine-wrapped
state__2964__auto__))))
c__2961__auto__)