AmlInterp.fl.loop: def of bend-osdev-acpi@0.1.1.0
Import: import bend-osdev-acpi@0.1.1.0/aml_interp.bend as AmlInterp
Lines 2450-2468 of bend-osdev-acpi@0.1.1.0/aml_interp.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-acpi@0.1.1.0/aml_interp.bend&start_line=2450&end_line=2468

import Base
import bend-osdev-acpi@0.1.1.0/error.bend as E

# every element takes at least two bytes, so the list length is enough fuel
def fl.loop(-H: Data, fuel: Nat, +k: AmlFk, r: Result<&2, &2, E.AcpiError, AmlFlNext<H>>) -> Result<&2, &2, E.AcpiError, AmlWorld<H>>:
  match fuel:
    case 0n:
      match r:
        case Fail{e}:
          Fail{e}
        case Done{AmlFlEnd{w}}:
          Done{w}
        case Done{AmlFlMore{st}}:
          Fail{E.AcpiAmlTruncated{}}
    case 1n+p:
      match r:
        case Fail{e}:
          Fail{e}
        case Done{AmlFlEnd{w}}:
          Done{w}
        case Done{AmlFlMore{st}}:
          fl.loop(H, p, k, fl.step(H, k, st))

Uses (7):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Result
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-acpi@0.1.1.0/aml_interp.bend&name=AmlFk
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-acpi@0.1.1.0/aml_interp.bend&name=AmlFlNext
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-acpi@0.1.1.0/aml_interp.bend&name=AmlWorld
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-acpi@0.1.1.0/aml_interp.bend&name=fl.step
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-acpi@0.1.1.0/error.bend&name=AcpiError