def be16.head

bend-osdev-bytes@0.1.1.0 · bytes.bend:158

import Base
import bend-osdev-word64@0.1.1.0/word64.bend as W

158def be16.head(xs: List<&2, U32>) -> Maybe<&2, U32>:
159  match xs:
160    case Con{a, Con{b, t}}:
161      Some{U32{W.W64.bits.cat(16n, 16n, W.W64.bits.cat(8n, 8n, bits8(b), bits8(a)), Word.zero(16n))}}
162    case _:
163      None{}