     (when (empty? (connections-available repl-env))
       (Thread/sleep 500)
       (recur))))
-
-
-
-
 
 (defn send-for-eval [{:keys [focus-session-name ;; just here for consideration
                              broadcast] :as repl-env} connections js]

          (.addEventListener goog.net.WebSocket.EventType.OPENED
                             (fn [e]
                               (swap! state assoc :connection {:websocket websocket})
                               (hook-repl-printing-output! {:websocket websocket})
                               (js/console.log "OPENED")
                               (js/console.log e)))
          (.open url))))))

;; -----------------------------------------------------------
;; HTTP simple and long polling
;; -----------------------------------------------------------

(defn http-get [url]
  (Promise.
   (fn [succ err]
     (xhrio/send
      url
      (fn [e]
        (let [xhr (gobj/get e "target")]
          (if (.isSuccess xhr)
            (succ (.getResponseJson xhr))
            (err xhr))))))))

(declare http-connect http-connect*)


                                             (dynload %2)))
              :arg "string"
              :doc "Ring Handler for default REPL server EX. \"example.server/handler\" "}}}}
        main-fn    (assoc :cljs.cli/main @main-fn))))
  cljs.repl/IParseStacktrace
  (-parse-stacktrace [this st err opts]
    (cljs.stacktrace/parse-stacktrace this st err opts)))
