def arg_text_go

cli@0.2.0.0 · cli.bend:7978

import Base

7978# step's char, then bytes as text once step's other bytes are skipped.
7979def arg_text_go(bytes: List<&2, U32>, step: ArgChar) -> String:
7980  match bytes step:
7981    case Nil{} ArgChar{c, more}: SCon{c, SNil{}}
7982    case Con{b, rest} ArgChar{c, 1n+m}: arg_text_go(rest, ArgChar{c, m})
7983    case Con{b, +rest} ArgChar{c, 0n}:
7984      SCon{c, arg_text_go(rest, arg_char(b, rest))}