Codec.strs: def of bend-kit-postgres@0.3.0.0
Import: import bend-kit-postgres@0.3.0.0/codec.bend as Codec
Lines 426-436 of bend-kit-postgres@0.3.0.0/codec.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-postgres@0.3.0.0/codec.bend&start_line=426&end_line=436

import Base
import bend-kit-bytes@0.3.3.0/bytes.bend as Bytes

# Each string takes a byte, so fuel of the bytes left is enough.
def strs(f: Nat, s: Loop<Bytes.Bytes, Bytes.Bytes>) -> Cur & List<&1, Bytes.Bytes>:
  match f:
    case 0n:
      loop.end(Bytes.Bytes, Bytes.Bytes, s)
    case 1n+p:
      match s:
        case Go{c, m, acc}:
          strs(p, strs.read(Con{m, acc}, cstr(c)))
        case Stop{c, acc}:
          (c, List.reverse(&1, Bytes.Bytes, acc))

Uses (11):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List.reverse
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  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=bend-kit-bytes@0.3.3.0/bytes.bend&name=Bytes
  https://jend.leeeet.dev/definition.txt?path=bend-kit-postgres@0.3.0.0/codec.bend&name=Cur
  https://jend.leeeet.dev/definition.txt?path=bend-kit-postgres@0.3.0.0/codec.bend&name=Loop
  https://jend.leeeet.dev/definition.txt?path=bend-kit-postgres@0.3.0.0/codec.bend&name=cstr
  https://jend.leeeet.dev/definition.txt?path=bend-kit-postgres@0.3.0.0/codec.bend&name=loop.end
  https://jend.leeeet.dev/definition.txt?path=bend-kit-postgres@0.3.0.0/codec.bend&name=strs.read