~/jendhub

def step.head

bend-kit-cbor@0.3.0.0 · cbor.bend:675

import bend-kit-cbor@0.3.0.0/cbor.bend as Cbor
import Base

675def step.head(stack: List<&1, Frame>, +len: U32, r: Array<U32> & Maybe<&2, Hd>) -> Array<U32> & St:
676  (a, h) = r
677  match h:
678    case Some{Hd{+major, +ai, +arg, +i}}:
679      item.hd(U32.is_eq(ai, 31), major, ai, arg, i, a, len, stack)
680    case None{}:
681      (a, SFail{})

Uses (11)

Used by (1)