Скал-стрим tcp `echo` приложение не работает

Question

Я пишу эхо-приложение, которое send а также receive'\0' завершенная строка

https://gist.github.com/jilen/10a664cd588af10b7d09

object Foo {

  implicit val S = scalaz.concurrent.Strategy.DefaultStrategy
  implicit val AG = tcp.DefaultAsynchronousChannelGroup
  ...

  def runServer() {
    def writeStr(str: String) = tcp.write(ByteVector(str.getBytes))
    val echoServer = (readStr |> serverLog("[Server] Receiving")).flatMap(writeStr)
    val server = tcp.server(addr, concurrentRequests = 1)(echoServer.repeat)
    server.flatMap(_.drain).run.run
  }

  def runClient() {
    val topic = async.topic[String]()
    val echoClient = (topic.subscribe |> clientLog("[Client] Inputing")).map { str =>
      tcp.write(ByteVector(str.getBytes) ++ Delimiter) ++ (readStr |> clientLog("[Client] Receiving"))
    }
    val client = tcp.connect(addr)(tcp.lift(echoClient))
    client.run.runAsync(println)
    io.stdInLines.to(topic.publish).run.run
  }
}

я бегу Foo.runServer() а также Foo.runClient() на другом терминале

И введите номера 1 2 3 ... с клиентской консоли, но клиент не получает ответа.

Что не так с моим эхо-приложением?

Answer 1

Наконец я переписываю клиента как

val echoClient = tcp.subscribe.map(str => ByteVector(str.getBytes) ++ Delimiter)

val client = tcp.connect(addr)(tcp.writes(echoClient))

И это работает