clojure / pathom + timeouts

pathom.clj

(pc/defresolver res-with-timeout [_ _]
  {::pc/output [:foo]}
  (async/go
    (let [timeout-ch (async/timeout 3000)
          [ch res] (async/alts!! [(async/go
                                    (do-my-operation-here))
                                  timeout-ch] :priority true)]
      (if (= ch timeout-ch)
        (throw (ex-info "Resolver timeout" {:timeout 3000}))
        res))))

(comment
  "but this is less cool way to do it, better options are implementing as a resolver-transform
 (https://wilkerlucio.github.io/pathom/#connect-transform) or as plugin (https://wilkerlucio.github.)")