037 interpreter field types

// Test: Interpreter numeric FieldValue in expressions
// Ensures FieldValue.int_val is propagated to expr bindings (no string reparse)

~import std/runtime
~import std/interpreter
~import std/io

const std = @import("std");

// Event producing an integer field. Two branches: a lone payload branch is a
// bare return by ruling, and the interpreted chain below needs the name.
~pub tor produce-int {}
| value i32
| none

~produce-int => value 12

// Register scope
~std/runtime:register(scope: "test") {
    produce-int
}

const TEST_SOURCE =
    \\produce_int()
    \\| value v |> if(v.num > 10)
    \\    | then |> gt {}
    \\    | else |> lte {}
;

~std/runtime:get-scope(name: "test")
| scope s |> std/interpreter:run(source: TEST_SOURCE, s.dispatcher)
    | result r |> std/io:print.ln("SUCCESS branch={{ r.value.branch:s }}")
    | exhausted e |> std/io:print.ln("EXHAUSTED: {{ e.last_event:s }}")
    | parse-error e |> std/io:print.ln("PARSE ERROR: {{ e.message:s }}")
    | validation-error e |> std/io:print.ln("VALIDATION ERROR: {{ e:s }}")
    | dispatch-error e |> std/io:print.ln("DISPATCH ERROR: {{ e.message:s }}")
| not-found |> std/io:print.ln("SCOPE NOT FOUND")