def in.list.set

bend-osdev-acpi@0.1.1.0 · aml_interp.bend:484

import Base
import bend-osdev-acpi@0.1.1.0/aml_value.bend as V

484# xs with element i replaced (padded with Uninitialized up to i)
485def in.list.set(i: Nat, xs: List<&2, V.AmlValue>, v: V.AmlValue) -> List<&2, V.AmlValue>:
486  match i xs:
487    case 0n Nil{}:
488      [v]
489    case 0n Con{h, t}:
490      Con{v, t}
491    case 1n+k Nil{}:
492      Con{V.AmlUninit{}, in.list.set(k, Nil{}, v)}
493    case 1n+k Con{h, t}:
494      Con{h, in.list.set(k, t, v)}