Impl.PipeSession.ask: def of bend-pipe-session@0.2.0.0
Import: import bend-pipe-session@0.2.0.0/impl.bend as Impl
Lines 131-141 of bend-pipe-session@0.2.0.0/impl.bend: https://jend.leeeet.dev/read.txt?path=bend-pipe-session@0.2.0.0/impl.bend&start_line=131&end_line=141

import Base
import bend-stdio-pipes@0.2.0.0/impl.bend as Stdio

# Sends lines, then answers the program's lines up to the first that starts with until.
def PipeSession.ask(
  session: PipeSession,
  lines: List<String>,
  +until: String
) -> IO(PipeSession & Result<&1, &1, U32 & String, List<&2, String>>):
  match session:
    case PipeSession{pid, input, out, line_cap}:
      do IO<PipeSession & Result<&1, &1, U32 & String, List<&2, String>>>:
        wrote: File & Result<&1, &1, U32 & String, Unit> <- Stdio.write_lines(input, lines)
        PipeSession.wrote(pid, wrote, out, line_cap, until)

Uses (12):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=File
  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=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Result
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Unit
  https://jend.leeeet.dev/definition.txt?path=bend-pipe-session@0.2.0.0/impl.bend&name=PipeSession
  https://jend.leeeet.dev/definition.txt?path=bend-pipe-session@0.2.0.0/impl.bend&name=PipeSession.wrote
  https://jend.leeeet.dev/definition.txt?path=bend-stdio-pipes@0.2.0.0/impl.bend&name=write_lines