   (stop-tool-watcher)
   (stop-job-watcher)
   (stop-server))
+
+#_(start! 7070)
+#_(stop-server)
 
 
 

    (update-adb :chan ch
                :idfn [idfn]
                :connfn [connfn])
    (start-job-watcher)
    (start-tool-watcher)
    (go-loop [msg (<! ch)]
      (let [{:keys [op payload]} msg]
        (future (server-dispatch ch op payload))



(defn connfn [data] data)


(defn start! [port]
