Runner.budget.of: def of bend-kit-runner@0.13.0.1
Import: import bend-kit-runner@0.13.0.1/runner.bend as Runner
Lines 366-374 of bend-kit-runner@0.13.0.1/runner.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-runner@0.13.0.1/runner.bend&start_line=366&end_line=374

import Base
import bend-kit-retry@0.3.0.0/retry.bend as Retry

# The budget left for ticket i: the policy's attempts less its failures, until its start plus the policy deadline.
def budget.of(+attempts: Nat, t: Maybe<&2, Try>, d: Maybe<&2, Nat>) -> Retry.Budget:
  match t d:
    case None{} m:
      Retry.Budget{attempts, None{}}
    case Some{Try{f, st}} None{}:
      Retry.Budget{Nat.sub(attempts, f), None{}}
    case Some{Try{f, +st}} Some{ms}:
      Retry.Budget{Nat.sub(attempts, f), Some{Nat.add(st, ms)}}

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.add
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.sub
  https://jend.leeeet.dev/definition.txt?path=bend-kit-retry@0.3.0.0/retry.bend&name=Budget
  https://jend.leeeet.dev/definition.txt?path=bend-kit-runner@0.13.0.1/runner.bend&name=Try