002 budget exhaustion

// Test: Budget exhaustion mid-flow
// When budget runs out, return exhausted branch with what was used

~import std/runtime
~import std/io

const std = @import("std");

// Two branches: a lone branch is outlawed (PARSE003), and the interpreted
// chain below needs the branch name to continue on.
~pub tor expensive { data: string }
| processed
| failed

~proc expensive|zig {
    _ = data;
    return .processed;
}

// Register with high cost
~std/runtime:register(scope: "test") {
    expensive(50)  // costs 50 tokens per call
}

const TEST_SOURCE = "expensive(data: \"a\")\n| processed |> expensive(data: \"b\")\n| processed |> result { status: \"done\" }";

// Run with budget of 75 - second call should exhaust
~std/runtime:run(source: TEST_SOURCE, scope: "test", budget: 75)
| result _ |> std/io:print.ln("FAIL: should have exhausted")
| exhausted e |> std/io:print.ln("PASS: exhausted after {{ e.used:d }} tokens, last event: {{ e.last_event:s }}")
| parse-error _ |> std/io:print.ln("PARSE ERROR")
| validation-error _ |> std/io:print.ln("VALIDATION ERROR")
| shape-error _ |> std/io:print.ln("SHAPE ERROR")
| event-denied _ |> std/io:print.ln("EVENT DENIED")
| dispatch-error _ |> std/io:print.ln("DISPATCH ERROR")
| scope-not-found _ |> std/io:print.ln("SCOPE NOT FOUND")