def Parse.st.of2
import bend-scanner@0.1.0.0/parse.bend as Parseimport Base
129def Parse.st.of2(+acc: U32, +h: Char, +max: U32, dig: Bool) -> Parse.St:
130 match dig:
131 case False{}:
132 StBad{h}
133 case True{}:
134 Parse.st.ov(
135 acc, (Char.to_u32(h) - Char.to_u32('0') : U32), max,
136 Parse.acc.ok(acc, (Char.to_u32(h) - Char.to_u32('0') : U32), max)
137 )