This commit is contained in:
Michiel Borkent 2020-04-05 11:54:10 +02:00
parent 3242e0dab3
commit 847f872df8

View file

@ -714,19 +714,22 @@ This can be useful for talking to Docker:
Babashka comes with the [nrepl/bencode](https://github.com/nrepl/bencode)
library which allows you to read and write bencode messages to a socket. A
simple example which gets the Clojure version from an nREPL server started with
`lein repl`:
simple example which evaluates a Clojure expression on an nREPL server started
with `lein repl`:
``` clojure
(ns nrepl-client
(:require [bencode.core :as b]))
(let [s (java.net.Socket. "localhost" 65274)
out (.getOutputStream s)
in (java.io.PushbackInputStream. (.getInputStream s))
_ (b/write-bencode out {"op" "describe"})
clojure-version (get-in (b/read-bencode in) ["versions" "clojure" "version-string"])]
(String. clojure-version "UTF-8")) ;;=> "1.10.0"
(defn nrepl-eval [port expr]
(let [s (java.net.Socket. "localhost" port)
out (.getOutputStream s)
in (java.io.PushbackInputStream. (.getInputStream s))
_ (b/write-bencode out {"op" "eval" "code" (pr-str expr)})
value (get (b/read-bencode in) "value")]
(read-string value)))
(nrepl-eval 65274 '(+ 1 2 3)) ;;=> 6
```