def in.incdec.st

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

import Base
import bend-osdev-acpi@0.1.1.0/error.bend as E
import bend-osdev-acpi@0.1.1.0/aml_value.bend as V
import bend-osdev-acpi@0.1.1.0/aml_host.bend as Hs

1123def in.incdec.st(~H: Data, ~io: H -> Hs.AmlHostOp -> Result<&2, &2, E.AcpiError, Hs.AmlHostAns<H>>, r: Result<&2, &2, E.AcpiError, AmlPut<H>>, +l: V.AmlLoc, c: AmlCur, fs: List<&2, AmlFrame>, +w: AmlWorld<H>) -> AmlMachine<H>:
1124  match r:
1125    case Fail{e}:
1126      AmlMachine{AmlMFail{e}, c, fs, w}
1127    case Done{AmlPut{+w2, +v}}:
1128      in.then.give(H, in.store(~H, ~io, l, w2, v), v, c, fs, w2)