def le16.head

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

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

151def le16.head(xs: List<&2, U32>) -> Maybe<&2, U32>:
152  match xs:
153    case Con{a, Con{b, t}}:
154      Some{U32{W.W64.bits.cat(16n, 16n, W.W64.bits.cat(8n, 8n, bits8(a), bits8(b)), Word.zero(16n))}}
155    case _:
156      None{}