Http.talk.completed.connection: def of bend-kit-http@0.38.2.0
Import: import bend-kit-http@0.38.2.0/http.bend as Http
Lines 5961-5975 of bend-kit-http@0.38.2.0/http.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-http@0.38.2.0/http.bend&start_line=5961&end_line=5975

import Base
import bend-kit-http@0.38.2.0/completion.bend as Completion

def talk.completed.connection(outcome: Completion.Outcome, next: Socket & Turn) -> IO(Maybe<&1, Socket & Turn>):
  match outcome:
    case Completion.HostAccepted{}:
      (socket, turn) = next
      IO.pure(Maybe<&1, Socket & Turn>, Some{(socket, turn)})
    case Completion.WriteFailed{code, message}:
      (socket, turn) = next
      do IO<Maybe<&1, Socket & Turn>>:
        Socket.close(socket)
        return None{}
    case Completion.IncompleteResponse{}:
      (socket, turn) = next
      do IO<Maybe<&1, Socket & Turn>>:
        Socket.close(socket)
        return None{}

Uses (11):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=IO
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=IO.bind
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=IO.pure
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Sigma
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Socket
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Socket.close
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Unit
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/completion.bend&name=Outcome
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/http.bend&name=Turn