def utf.more
import emerging-ezhttp@0.21.0.0/src/qs.bend as Qsimport Base
237# a continuation byte that fits: the character ends, or more are needed
238def utf.more(+cp: U32, left: Nat, +b: U32, k: Utf -> String) -> String:
239 match left:
240 case 0n:
241 SCon{Chr{utf.add(cp, b)}, k(Idle{})}
242 case 1n+l:
243 k(Need{utf.add(cp, b), l, 128, 191})