~/jendhub

def hp.pairs

emerging-ezaudio@0.4.0.0 · src/mp3_enc.bend:557

import emerging-ezaudio@0.4.0.0/src/mp3_enc.bend as Mp3Enc
import Base

557def hp.pairs(
558  xs: List<&2, U32>, got: Hs, +tab: U32, +lins: List<&2, U32>
559) -> Array<U32> & Hp:
560  match xs got:
561    case Nil{} Hs{codes, hp}:
562      (codes, hp)
563    case +aa <> +bb <> tl Hs{codes, hp}:
564      hp.pairs(tl, hs.of(hp.pair(hp, tab, aa, bb, codes, lins)), tab, lins)
565    case _ Hs{codes, _hp}:
566      (codes, Hp{[], 0, 0})

Uses (9)

Used by (1)