def pop_word

bend-collections@1.0.0.0 · src/containers/bitlist.bend:168

import Base
import bend-collections@1.0.0.0/src/containers/bitset.bend as B
import bend-collections@1.0.0.0/src/containers/dynamic_array.bend as D
import bend-collections@1.0.0.0/src/containers/types/dynamic_array.bend as DE
import bend-collections@1.0.0.0/src/containers/types/bitlist.bend as E

168def pop_word(+lim: Maybe<&2, Nat>, +m: Nat, r: D.DynArray<&2, U32> & Result<&2, &2, DE.Error, U32>) -> Bitlist & Result<&2, &2, E.Error, Bool>:
169  match r:
170    case Tuple{w, Done{+x}}:
171      pop_bit(lim, m, w, x, B.word_get(x, B.bitix(m)))
172    case Tuple{w, Fail{e}}:
173      (BL{lim, m, w}, Fail{E.Empty{}})