✓
Passing This code compiles and runs correctly.
Code
// PINS: the serialize workload hand-rolled at ecs_bench_suite scale — 1,000
// rows dumped to ONE text artifact and parsed back into a second store, the
// values crossing as TEXT, not as projections. Serialize: per row,
// std/string:from-int renders each i64, append builds the dump in an
// owned-string buffer row ("id hp id hp ..."). Deserialize: ONE flat split
// (a nested field split trips 690_191), each token re-parsed with
// from-page + parse-int, a staging singleton pairs alternating tokens into
// insert(dst) rows — the pending id crosses through an echo tor because an
// insert literal cannot read a cell path (690_192).
//
// The oracle: dump byte length (8890 = 2890 id digits + 4000 hp digits +
// 2000 separators — digit-exact), then row count, sum(id), sum(hp), and the
// pairing sum sum(id*hp) over the REBUILT store, so a value that failed to
// survive the text, a dropped row, or a repaired pairing all break it.
//
// There is no whole-store save/load verb (the gauntlet-2 hole); this program
// is the floor a verb must beat — 40 lines of hand-rolled envelope for two
// i64 columns, and no float column can cross at all (std/string has
// parse-int/from-int only; no float mirror).
import std/io
import std/string
import std/store
import std/fmt
tor echo { v: i64 } -> i64
echo -> v
std/store:new(src, capacity: 1000) { id: i64, hp: i64 }
std/store:new(dst, capacity: 1000) { id: i64, hp: i64 }
std/store:new(buf, capacity: 2) { text: *std/string:String<instance!> }
std/store:new(pstate) { have: 0[i64], pid: 0[i64] }
std/store:new(check) { rows: 0[i64], ids: 0[i64], hps: 0[i64], pair: 0[i64] }
for(0..1000)
! each i |> std/store:insert(src) { id: @as(i64, @intCast(i)), hp: 1000 + @as(i64, @intCast(i)) }
std/string:from-page(text: "")
| ok s |> std/string:take(s): m |> std/store:insert(buf) { text: m }
| row _ |> _
| err _ |> _
std/store:query(src)
! query r |> std/store:query(buf)
! query b |> std/string:from-int(n: r.id)
| ok t1 |> std/fmt:ln("{{ t1:S }}"): k1 |> std/string:append(s: b.text, k1.text)
| ok |> std/string:append(s: b.text, text: " ")
| ok |> std/string:from-int(n: r.hp)
| ok t2 |> std/fmt:ln("{{ t2:S }}"): k2 |> std/string:append(s: b.text, k2.text)
| ok |> std/string:append(s: b.text, text: " ")
| ok |> _
| err _ |> _
| err _ |> _
| err _ |> _
| err _ |> _
| err _ |> _
| err _ |> _
std/store:query(buf)
! query b |> std/string:len(s: b.text): n |> std/io:print.ln("dump bytes {{ n:d }}")
std/store:query(buf)
! query b |> std/fmt:fmt.blk {
{{ b.text:S }}
}: dump |> std/string:split(s: dump, sep: " ")
! piece tok |> std/string:from-page(text: tok)
| ok h |> std/string:parse-int(s: h)
| ok n |> if(pstate.have == 0)
| then |> std/store:stored { pstate.pid: n, pstate.have: 1 }
| else |> echo(v: pstate.pid): pv |> std/store:insert(dst) { id: pv, hp: n }
| row _ |> std/store:stored { pstate.have: 0 }
| err _ |> _
| err _ |> _
| done _ |> _
std/store:query(dst)
! query d |> std/store:stored { check.rows: check.rows + 1, check.ids: check.ids + d.id, check.hps: check.hps + d.hp, check.pair: check.pair + d.id * d.hp }
if(check.rows > 0)
| then |> std/io:print.ln("rows {{ check.rows:d }} ids {{ check.ids:d }} hps {{ check.hps:d }} pair {{ check.pair:d }}")
Actual
dump bytes 8890
rows 1000 ids 499500 hps 1499500 pair 832333500
Expected output
✓ Zig✓ C#dump bytes 8890
rows 1000 ids 499500 hps 1499500 pair 832333500
Emitted Zig source
// Access compiler flags via the per-user compiler_env module
const CompilerEnv = @import("compiler_env").CompilerEnv;
pub const panic = if (@import("builtin").mode == .Debug)
@import("std").debug.FullPanic(@import("std").debug.defaultPanic)
else
@import("std").debug.simple_panic;
const __koru_bare = struct {
extern fn posix_memalign(memptr: *?*anyopaque, alignment: usize, size: usize) c_int;
extern fn free(ptr: ?*anyopaque) void;
fn bareAlloc(_: *anyopaque, len: usize, alignment: @import("std").mem.Alignment, _: usize) ?[*]u8 {
var p: ?*anyopaque = null;
const a = @max(alignment.toByteUnits(), @sizeOf(usize));
if (posix_memalign(&p, a, len) != 0) return null;
return @ptrCast(p);
}
fn bareResize(_: *anyopaque, _: []u8, _: @import("std").mem.Alignment, _: usize, _: usize) bool { return false; }
fn bareRemap(_: *anyopaque, _: []u8, _: @import("std").mem.Alignment, _: usize, _: usize) ?[*]u8 { return null; }
fn bareFree(_: *anyopaque, memory: []u8, _: @import("std").mem.Alignment, _: usize) void { free(@ptrCast(memory.ptr)); }
const vtable = @import("std").mem.Allocator.VTable{ .alloc = bareAlloc, .resize = bareResize, .remap = bareRemap, .free = bareFree };
const allocator = @import("std").mem.Allocator{ .ptr = undefined, .vtable = &vtable };
};
const __koru_backing = if (@import("builtin").link_libc) @import("std").heap.c_allocator else if (@import("builtin").os.tag == .freestanding) __koru_bare.allocator else @import("std").heap.page_allocator;
var __koru_leak_count: usize = 0;
fn __koru_alloc(ctx: *anyopaque, len: usize, alignment: @import("std").mem.Alignment, ret_addr: usize) ?[*]u8 {
_ = ctx;
const r = __koru_backing.rawAlloc(len, alignment, ret_addr);
if (comptime @import("builtin").mode == .Debug) {
if (r != null) __koru_leak_count += 1;
}
return r;
}
fn __koru_resize(ctx: *anyopaque, memory: []u8, alignment: @import("std").mem.Alignment, new_len: usize, ret_addr: usize) bool {
_ = ctx;
return __koru_backing.rawResize(memory, alignment, new_len, ret_addr);
}
fn __koru_remap(ctx: *anyopaque, memory: []u8, alignment: @import("std").mem.Alignment, new_len: usize, ret_addr: usize) ?[*]u8 {
_ = ctx;
return __koru_backing.rawRemap(memory, alignment, new_len, ret_addr);
}
fn __koru_free(ctx: *anyopaque, memory: []u8, alignment: @import("std").mem.Alignment, ret_addr: usize) void {
_ = ctx;
__koru_backing.rawFree(memory, alignment, ret_addr);
if (comptime @import("builtin").mode == .Debug) {
__koru_leak_count -= 1;
}
}
const __koru_vtable = @import("std").mem.Allocator.VTable{ .alloc = __koru_alloc, .resize = __koru_resize, .remap = __koru_remap, .free = __koru_free };
pub fn koru_allocator() @import("std").mem.Allocator {
return .{ .ptr = undefined, .vtable = &__koru_vtable };
}
pub inline fn __koru_intcast(comptime T: type, x: anytype) T {
if (comptime (@import("builtin").mode == .Debug or @import("builtin").mode == .ReleaseSafe))
return @as(T, @intCast(x));
const dst = @typeInfo(T);
const src = @typeInfo(@TypeOf(x));
if (comptime (dst == .int and src == .int and dst.int.bits == src.int.bits and dst.int.signedness != src.int.signedness))
return @as(T, @bitCast(x));
return @as(T, @intCast(x));
}
pub fn koru_leak_check() void {
if (comptime @import("builtin").mode != .Debug) return;
if (__koru_leak_count == 0) return;
if (comptime @import("builtin").target.os.tag == .freestanding) {
if (comptime @import("builtin").cpu.arch == .wasm32 or @import("builtin").cpu.arch == .wasm64) {
@panic("KORU LEAK CHECK FAILED: the produced program leaked");
} else {
const __klc = struct { extern var stdout: ?*anyopaque; extern fn fputs(__s: [*:0]const u8, __st: ?*anyopaque) c_int; };
var __lb: [128]u8 = undefined;
const __lm = "KORU LEAK CHECK FAILED: allocations still outstanding at end of run: ";
@memcpy(__lb[0..__lm.len], __lm);
var __ln: usize = __lm.len;
var __lv = __koru_leak_count;
var __ld: [20]u8 = undefined;
var __lk: usize = 0;
while (__lv > 0) : (__lk += 1) { __ld[__lk] = @intCast('0' + __lv % 10); __lv /= 10; }
for (0..__lk) |__li| { __lb[__ln] = __ld[__lk - 1 - __li]; __ln += 1; }
__lb[__ln] = '\n'; __ln += 1; __lb[__ln] = 0;
_ = __klc.fputs(@as([*:0]const u8, @ptrCast(&__lb)), __klc.stdout);
@trap();
}
} else {
@import("std").debug.print("KORU LEAK CHECK FAILED: the produced program leaked (trace above)\n", .{});
@import("std").process.exit(1);
}
}
pub const main_module = struct {
pub const echo_event = struct {
pub const Input = struct {
v: i64,
};
pub const Output = i64;
pub inline fn handler(__koru_event_input: @This().Input) @This().Output {
return __koru_handler_impl(__koru_event_input.v);
}
fn __koru_handler_impl(__koru_p_0: i64) @This().Output {
const __koru_event_input: @This().Input = .{ .v = __koru_p_0 };
const v = __koru_event_input.v;
_ = &v;
return v;
}
};
// std/store: plural store 'src' created (SoA cell + insert/query/write/take/stripe units); fields id: i64, hp: i64
// std/store: plural store 'dst' created (SoA cell + insert/query/write/take/stripe units); fields id: i64, hp: i64
// std/store: plural store 'buf' created (SoA cell + insert/query/write/take/stripe units); fields text: *std/string:String<instance!>
// std/store: 'pstate' created (cell + write-subflow at module scope); fields have: i64, pid: i64
// std/store: 'check' created (cell + write-subflow at module scope); fields rows: i64, ids: i64, hps: i64, pair: i64
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:35 ~std.control:for()
pub fn flow0() void {
{
const __koru_bulk_lo = (0);
const __koru_bulk_hi = (1000);
const __koru_bulk_n = __koru_bulk_hi - __koru_bulk_lo;
if (__koru_bulk_n > 1000 - __koru_store_src.len) @panic("std/store: store 'src' is full (capacity 1000) - declared capacity and the `| full` branch are pinned at 690_011");
const __koru_bulk_base = __koru_store_src.len;
for (0..__koru_bulk_n) |__koru_bulk_j| {
const i = __koru_bulk_lo + __koru_bulk_j;
__koru_store_src.id[__koru_bulk_base + __koru_bulk_j] = @as(i64, @intCast(i));
__koru_store_src.hp[__koru_bulk_base + __koru_bulk_j] = 1000 + @as(i64, @intCast(i));
}
__koru_store_src.len += __koru_bulk_n;
}
{ }
}
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:38 ~std.string:from_page()
pub fn flow1() void {
const result_0 = koru_std.koru_string.from_page_event.handler(.{ .text = "" });
switch (result_0) {
// >>> BRANCH: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:39 | ok s |>
.ok => |s| {
const m = koru_std.koru_string.take_event.handler(.{ .s = s });
_ = &m;
const result_2 = main_module.__store_inserth_buf_event.handler(.{ .text = m, .__site_line = 39 });
_ = &result_2;
const _auto_6 = result_2.row;
_ = &_auto_6;
},
// >>> BRANCH: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:41 | err _auto_7 |>
.err => |_| {
},
}
}
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:43 ~input:__store_sweeprun_src_L44_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e()
pub fn flow2() void {
_ = main_module.__store_sweeprun_src_L44_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(.{ });
}
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:59 ~input:__store_sweeprun_buf_L60_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e()
pub fn flow3() void {
_ = main_module.__store_sweeprun_buf_L60_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(.{ });
}
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:62 ~input:__store_sweeprun_buf_L63_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e()
pub fn flow4() void {
_ = main_module.__store_sweeprun_buf_L63_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(.{ });
}
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:76 ~input:__store_sweeprun_dst_L77_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e()
pub fn flow5() void {
_ = main_module.__store_sweeprun_dst_L77_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(.{ });
}
// >>> FLOW: tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:79 ~std.control:if()
pub fn flow6() void {
if (__koru_store_check.rows > 0) {
{ (struct { fn __kout(__fd: i32, __b: []const u8) void { if (@import("builtin").os.tag == .freestanding) { const __kc = struct { extern var stdout: ?*anyopaque; extern var stderr: ?*anyopaque; extern fn fputs(__s: [*:0]const u8, __st: ?*anyopaque) c_int; }; var __kt: [4096]u8 = undefined; for (0..(__b.len + __kt.len - 2) / (__kt.len - 1)) |__ki| { const __kn = @min(__kt.len - 1, __b.len - __ki * (__kt.len - 1)); @memcpy(__kt[0..__kn], __b[__ki * (__kt.len - 1)..][0..__kn]); __kt[__kn] = 0; @import("std").mem.doNotOptimizeAway(__kc.fputs(@as([*:0]const u8, @ptrCast(&__kt)), if (__fd == 2) __kc.stderr else __kc.stdout)); } } else { @import("std").mem.doNotOptimizeAway(@import("std").posix.write(__fd, __b) catch @as(usize, 0)); } } fn __kw(comptime __f: []const u8, __a: anytype) void { var __kb: [65536]u8 = undefined; const __ks = @import("std").fmt.bufPrint(&__kb, __f, __a) catch __kb[0..0]; __kout(1, __ks); } }).__kw("rows {d} ids {d} hps {d} pair {d}\n", .{__koru_store_check.rows, __koru_store_check.ids, __koru_store_check.hps, __koru_store_check.pair});
}
} else {
{ }
}
}
pub fn koru_start_flow() void {
const result_0 = koru_koru.start_event.handler(.{ });
const result_0_done = result_0.done;
_ = &result_0_done;
}
pub fn koru_end_flow() void {
const result_0 = koru_koru.end_event.handler(.{ });
const result_0_done = result_0.done;
_ = &result_0_done;
}
const __KoruStoreT_src = struct {
id: [1000]i64 = undefined,
hp: [1000]i64 = undefined,
len: usize = 0,
};
var __koru_store_src: __KoruStoreT_src = .{};
const __KoruStoreRow_src = struct { id: i64, hp: i64 };
pub const __store_insert_src_event = struct {
pub const Input = struct {
id: i64,
hp: i64,
__site_line: i64,
};
pub const Output = void;
pub inline fn handler(__koru_event_input: @This().Input) @This().Output {
return __koru_handler_impl(__koru_event_input.id, __koru_event_input.hp, __koru_event_input.__site_line);
}
fn __koru_handler_impl(__koru_p_0: i64, __koru_p_1: i64, __koru_p_2: i64) @This().Output {
const __koru_event_input: @This().Input = .{ .id = __koru_p_0, .hp = __koru_p_1, .__site_line = __koru_p_2 };
// >>> PROC: __store_insert_src [tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:29]
const id = __koru_event_input.id;
const hp = __koru_event_input.hp;
const __site_line = __koru_event_input.__site_line;
_ = &id;
_ = &hp;
_ = &__site_line;
_ = &__koru_event_input;
if (__koru_store_src.len >= 1000) @panic("std/store: store 'src' is full (capacity 1000) - declared capacity and the `| full` branch are pinned at 690_011");
const __koru_new_row = __koru_store_src.len;
__koru_store_src.id[__koru_new_row] = id;
__koru_store_src.hp[__koru_new_row] = hp;
__koru_store_src.len += 1;
return;
}
};
pub const __store_apply_src_event = struct {
pub const Input = struct {
row: usize,
field: i64,
value_0: i64,
value_1: i64,
};
pub const Output = union(enum(u8)) {
id: i64,
hp: i64,
};
pub inline fn handler(__koru_event_input: @This().Input) @This().Output {
return __koru_handler_impl(__koru_event_input.row, __koru_event_input.field, __koru_event_input.value_0, __koru_event_input.value_1);
}
fn __koru_handler_impl(__koru_p_0: usize, __koru_p_1: i64, __koru_p_2: i64, __koru_p_3: i64) @This().Output {
const __koru_event_input: @This().Input = .{ .row = __koru_p_0, .field = __koru_p_1, .value_0 = __koru_p_2, .value_1 = __koru_p_3 };
// >>> PROC: __store_apply_src [tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:29]
const row = __koru_event_input.row;
const field = __koru_event_input.field;
const value_0 = __koru_event_input.value_0;
const value_1 = __koru_event_input.value_1;
_ = &row;
_ = &field;
_ = &value_0;
_ = &value_1;
_ = &__koru_event_input;
const __koru_r: usize = row;
return switch (field) {
0 => blk: { __koru_store_src.id[__koru_r] = value_0; break :blk .{ .id = value_0 }; },
1 => blk: { __koru_store_src.hp[__koru_r] = value_1; break :blk .{ .hp = value_1 }; },
else => unreachable,
};
}
};
const __KoruStoreT_dst = struct {
id: [1000]i64 = undefined,
hp: [1000]i64 = undefined,
len: usize = 0,
};
var __koru_store_dst: __KoruStoreT_dst = .{};
const __KoruStoreRow_dst = struct { id: i64, hp: i64 };
pub const __store_inserth_dst_event = struct {
pub const Input = struct {
id: i64,
hp: i64,
__site_line: i64,
};
pub const Output = union(enum(u8)) {
row: i64,
};
pub inline fn handler(__koru_event_input: @This().Input) @This().Output {
return __koru_handler_impl(__koru_event_input.id, __koru_event_input.hp, __koru_event_input.__site_line);
}
fn __koru_handler_impl(__koru_p_0: i64, __koru_p_1: i64, __koru_p_2: i64) @This().Output {
const __koru_event_input: @This().Input = .{ .id = __koru_p_0, .hp = __koru_p_1, .__site_line = __koru_p_2 };
// >>> PROC: __store_inserth_dst [tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:30]
const id = __koru_event_input.id;
const hp = __koru_event_input.hp;
const __site_line = __koru_event_input.__site_line;
_ = &id;
_ = &hp;
_ = &__site_line;
_ = &__koru_event_input;
if (__koru_store_dst.len >= 1000) @panic("std/store: store 'dst' is full (capacity 1000) - declared capacity and the `| full` branch are pinned at 690_011");
const __koru_new_row = __koru_store_dst.len;
__koru_store_dst.id[__koru_new_row] = id;
__koru_store_dst.hp[__koru_new_row] = hp;
__koru_store_dst.len += 1;
return .{ .row = @as(i64, @intCast(__koru_new_row)) };
}
};
pub const __store_apply_dst_event = struct {
pub const Input = struct {
row: usize,
field: i64,
value_0: i64,
value_1: i64,
};
pub const Output = union(enum(u8)) {
id: i64,
hp: i64,
};
pub inline fn handler(__koru_event_input: @This().Input) @This().Output {
return __koru_handler_impl(__koru_event_input.row, __koru_event_input.field, __koru_event_input.value_0, __koru_event_input.value_1);
}
fn __koru_handler_impl(__koru_p_0: usize, __koru_p_1: i64, __koru_p_2: i64, __koru_p_3: i64) @This().Output {
const __koru_event_input: @This().Input = .{ .row = __koru_p_0, .field = __koru_p_1, .value_0 = __koru_p_2, .value_1 = __koru_p_3 };
// >>> PROC: __store_apply_dst [tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:30]
const row = __koru_event_input.row;
const field = __koru_event_input.field;
const value_0 = __koru_event_input.value_0;
const value_1 = __koru_event_input.value_1;
_ = &row;
_ = &field;
_ = &value_0;
_ = &value_1;
_ = &__koru_event_input;
const __koru_r: usize = row;
return switch (field) {
0 => blk: { __koru_store_dst.id[__koru_r] = value_0; break :blk .{ .id = value_0 }; },
1 => blk: { __koru_store_dst.hp[__koru_r] = value_1; break :blk .{ .hp = value_1 }; },
else => unreachable,
};
}
};
const __KoruStoreT_buf = struct {
text: [2]*koru_std.koru_string.String = undefined,
len: usize = 0,
};
var __koru_store_buf: __KoruStoreT_buf = .{};
const __KoruStoreRow_buf = struct { text: *koru_std.koru_string.String };
pub const __store_inserth_buf_event = struct {
pub const Input = struct {
text: *koru_std.koru_string.String,
__site_line: i64,
};
pub const Output = union(enum(u8)) {
row: i64,
};
pub fn handler(__koru_event_input: @This().Input) @This().Output {
// >>> PROC: __store_inserth_buf [tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:31]
const text = __koru_event_input.text;
const __site_line = __koru_event_input.__site_line;
_ = &text;
_ = &__site_line;
_ = &__koru_event_input;
if (__koru_store_buf.len >= 2) @panic("std/store: store 'buf' is full (capacity 2) - declared capacity and the `| full` branch are pinned at 690_011");
const __koru_new_row = __koru_store_buf.len;
__koru_store_buf.text[__koru_new_row] = text;
__koru_store_buf.len += 1;
return .{ .row = @as(i64, @intCast(__koru_new_row)) };
}
};
pub const __store_apply_buf_event = struct {
pub const Input = struct {
row: usize,
field: i64,
value_0: *koru_std.koru_string.String,
};
pub const Output = union(enum(u8)) {
text: *koru_std.koru_string.String,
};
pub fn handler(__koru_event_input: @This().Input) @This().Output {
// >>> PROC: __store_apply_buf [tests/regression/600_STDLIB/690_STORE/690_190_store_text_dump_thousand_rows_parsed_back/input.k:31]
const row = __koru_event_input.row;
const field = __koru_event_input.field;
const value_0 = __koru_event_input.value_0;
_ = &row;
_ = &field;
_ = &value_0;
_ = &__koru_event_input;
const __koru_r: usize = row;
return switch (field) {
0 => blk: { const __koru_old_ptr = __koru_store_buf.text[__koru_r]; _ = koru_std.koru_string.free_event
... [truncated - 103KB total]Emitted C# source
static class main_module {
public static void __koru_stdout_write(dynamic s) => global::System.Console.Out.Write(s);
public static void __koru_stderr_write(dynamic s) => global::System.Console.Error.Write(s);
// The mutable handle carrier — `*String`-style resources are
// `new __KoruBox { data = … }` because C# anonymous types are
// read-only: `s.data = …` (std/string append/clear, handle
// mutation generally) needs a settable member.
public class __KoruBox { public dynamic data; }
// Textification for `{{ … }}` operands: C# bool ToStrings as
// `True` where Koru prints `true`, and the operand's static type
// is unknown at this boundary — a `(x) is bool` inline test would
// be a compile error on statically-typed operands instead. Generic
// on purpose: `dynamic` boxed every value-type operand — measured
// ~1s/10M elements on 012_threat_scanner — while T specializes to
// the operand's own ToString() with no box.
public static string __koru_str<T>(T v) => v is bool b ? (b ? "true" : "false") : v?.ToString();
// std/store: plural store 'src' created (SoA cell + insert/query/write/take/stripe units); fields id: i64, hp: i64
// std/store: plural store 'dst' created (SoA cell + insert/query/write/take/stripe units); fields id: i64, hp: i64
// std/store: plural store 'buf' created (SoA cell + insert/query/write/take/stripe units); fields text: *std/string:String<instance!>
// std/store: 'pstate' created (cell + write-subflow at module scope); fields have: i64, pid: i64
// std/store: 'check' created (cell + write-subflow at module scope); fields rows: i64, ids: i64, hps: i64, pair: i64
static class __koru_store_src {
public static long[] id = new long[1000];
public static long[] hp = new long[1000];
public static long len = 0;
public static long __koru_brand = -1;
}
static class __koru_store_dst {
public static long[] id = new long[1000];
public static long[] hp = new long[1000];
public static long len = 0;
public static long __koru_brand = -1;
}
static class __koru_store_buf {
public static dynamic[] text = new dynamic[2];
public static long len = 0;
public static long __koru_brand = -1;
}
static class __koru_store_pstate {
public static long have = 0;
public static long pid = 0;
public static long __koru_brand = -1;
}
static class __koru_store_check {
public static long rows = 0;
public static long ids = 0;
public static long hps = 0;
public static long pair = 0;
public static long __koru_brand = -1;
}
public static class echo_event {
public struct Input {
public long v;
}
public static long handler(Input __koru_input) {
var v = __koru_input.v;
return (long)(v);
}
}
public static class __store_insert_src_event {
public struct Input {
public long id;
public long hp;
public long __site_line;
}
public static dynamic handler(Input __koru_input) {
var id = __koru_input.id;
var hp = __koru_input.hp;
var __site_line = __koru_input.__site_line;
if (__koru_store_src.len >= 1000) throw new global::System.Exception("std/store: store 'src' is full (capacity 1000) - declared capacity and the `| full` branch are pinned at 690_011");
long __koru_new_row = __koru_store_src.len;
__koru_store_src.id[__koru_new_row] = id;
__koru_store_src.hp[__koru_new_row] = hp;
__koru_store_src.len += 1;
return default;
}
}
public static class __store_apply_src_event {
public struct Input {
public long row;
public long field;
public long value_0;
public long value_1;
}
public struct Output {
public string tag;
public long id;
public long hp;
}
public static Output handler(Input __koru_input) {
var row = __koru_input.row;
var field = __koru_input.field;
var value_0 = __koru_input.value_0;
var value_1 = __koru_input.value_1;
var __koru_r = row;
switch (field) {
case 0: { __koru_store_src.id[__koru_r] = value_0; return new Output { tag = "id", id = value_0 }; }
case 1: { __koru_store_src.hp[__koru_r] = value_1; return new Output { tag = "hp", hp = value_1 }; }
}
throw new global::System.Exception("__store_apply_src: field index " + field + " is not a column of store 'src'");
return default;
}
}
public static class __store_inserth_dst_event {
public struct Input {
public long id;
public long hp;
public long __site_line;
}
public struct Output {
public string tag;
public long row;
}
public static Output handler(Input __koru_input) {
var id = __koru_input.id;
var hp = __koru_input.hp;
var __site_line = __koru_input.__site_line;
if (__koru_store_dst.len >= 1000) throw new global::System.Exception("std/store: store 'dst' is full (capacity 1000) - declared capacity and the `| full` branch are pinned at 690_011");
long __koru_new_row = __koru_store_dst.len;
__koru_store_dst.id[__koru_new_row] = id;
__koru_store_dst.hp[__koru_new_row] = hp;
__koru_store_dst.len += 1;
return new Output { tag = "row", row = __koru_new_row };
return default;
}
}
public static class __store_apply_dst_event {
public struct Input {
public long row;
public long field;
public long value_0;
public long value_1;
}
public struct Output {
public string tag;
public long id;
public long hp;
}
public static Output handler(Input __koru_input) {
var row = __koru_input.row;
var field = __koru_input.field;
var value_0 = __koru_input.value_0;
var value_1 = __koru_input.value_1;
var __koru_r = row;
switch (field) {
case 0: { __koru_store_dst.id[__koru_r] = value_0; return new Output { tag = "id", id = value_0 }; }
case 1: { __koru_store_dst.hp[__koru_r] = value_1; return new Output { tag = "hp", hp = value_1 }; }
}
throw new global::System.Exception("__store_apply_dst: field index " + field + " is not a column of store 'dst'");
return default;
}
}
public static class __store_inserth_buf_event {
public struct Input {
public dynamic text;
public long __site_line;
}
public struct Output {
public string tag;
public long row;
}
public static Output handler(Input __koru_input) {
var text = __koru_input.text;
var __site_line = __koru_input.__site_line;
if (__koru_store_buf.len >= 2) throw new global::System.Exception("std/store: store 'buf' is full (capacity 2) - declared capacity and the `| full` branch are pinned at 690_011");
long __koru_new_row = __koru_store_buf.len;
__koru_store_buf.text[__koru_new_row] = text;
__koru_store_buf.len += 1;
return new Output { tag = "row", row = __koru_new_row };
return default;
}
}
public static class __store_apply_buf_event {
public struct Input {
public long row;
public long field;
public dynamic value_0;
}
public struct Output {
public string tag;
public dynamic text;
}
public static Output handler(Input __koru_input) {
var row = __koru_input.row;
var field = __koru_input.field;
var value_0 = __koru_input.value_0;
var __koru_r = row;
switch (field) {
case 0: { var __koru_old_ptr = __koru_store_buf.text[__koru_r]; main_module.std_string_free_event.handler(new main_module.std_string_free_event.Input { s = __koru_old_ptr }); __koru_store_buf.text[__koru_r] = value_0; return new Output { tag = "text", text = __koru_store_buf.text[__koru_r] }; }
}
throw new global::System.Exception("__store_apply_buf: field index " + field + " is not a column of store 'buf'");
return default;
}
}
public static class __store_fapply_buf_0_event {
public struct Input {
public long row;
public dynamic value;
}
public struct Output {
public string tag;
public dynamic text;
}
public static Output handler(Input __koru_input) {
var row = __koru_input.row;
var value = __koru_input.value;
var __koru_r = row;
var __koru_old_ptr = __koru_store_buf.text[__koru_r]; main_module.std_string_free_event.handler(new main_module.std_string_free_event.Input { s = __koru_old_ptr }); __koru_store_buf.text[__koru_r] = value; return new Output { tag = "text", text = __koru_store_buf.text[__koru_r] };
return default;
}
}
public static class __store_teardown_buf_event {
public struct Input {
}
public static dynamic handler(Input __koru_input) {
for (var __koru_i = 0; __koru_i < __koru_store_buf.len; __koru_i++) {
main_module.std_string_free_event.handler(new main_module.std_string_free_event.Input { s = __koru_store_buf.text[__koru_i] });
}
__koru_store_buf.len = 0;
return default;
}
}
public static class __store_apply_pstate_event {
public struct Input {
public long field;
public long value;
}
public struct Output {
public string tag;
public long have;
public long pid;
}
public static Output handler(Input __koru_input) {
var field = __koru_input.field;
var value = __koru_input.value;
switch (field) {
case 0: { __koru_store_pstate.have = value; return new Output { tag = "have", have = value }; }
case 1: { __koru_store_pstate.pid = value; return new Output { tag = "pid", pid = value }; }
}
throw new global::System.Exception("__store_apply_pstate: field index " + field + " is not a column of store 'pstate'");
return default;
}
}
public static class __store_write_pstate_event {
public struct Input {
public long field;
public long value;
}
public static dynamic handler(Input __koru_input) {
var field = __koru_input.field;
var value = __koru_input.value;
var result_0 = main_module.__store_apply_pstate_event.handler(new __store_apply_pstate_event.Input { field = (long)(field), value = (long)(value)});
if (result_0.tag == "have") {
var _auto_15 = result_0.have;
}
if (result_0.tag == "pid") {
var _auto_16 = result_0.pid;
}
return default;
}
}
public static class __store_announce_pstate_event {
public struct Input {
public long field;
}
public static dynamic handler(Input __koru_input) {
var field = __koru_input.field;
return default;
}
}
public static class __store_envwrite_pstate_event {
public struct Input {
public long field;
public long value;
}
public static dynamic handler(Input __koru_input) {
var field = __koru_input.field;
var value = __koru_input.value;
var __koru_mask = (ulong)field;
if ((__koru_mask & (1UL << 0)) != 0) __koru_store_pstate.have = value;
if ((__koru_mask & (1UL << 1)) != 0) __koru_store_pstate.pid = value;
return default;
}
}
public static class __store_apply_check_event {
public struct Input {
public long field;
public long value;
}
public struct Output {
public string tag;
public long rows;
public long ids;
public long hps;
public long pair;
}
public static Output handler(Input __koru_input) {
var field = __koru_input.field;
var value = __koru_input.value;
switch (field) {
case 0: { __koru_store_check.rows = value; return new Output { tag = "rows", rows = value }; }
case 1: { __koru_store_check.ids = value; return new Output { tag = "ids", ids = value }; }
case 2: { __koru_store_check.hps = value; return new Output { tag = "hps", hps = value }; }
case 3: { __koru_store_check.pair = value; return new Output { tag = "pair", pair = value }; }
}
throw new global::System.Exception("__store_apply_check: field index " + field + " is not a column of store 'check'");
return default;
}
}
public static class __store_announce_check_event {
public struct Input {
public long field;
}
public static dynamic handler(Input __koru_input) {
var field = __koru_input.field;
return default;
}
}
public static class __store_envwrite_check_event {
public struct Input {
public long field;
public long value;
}
public static dynamic handler(Input __koru_input) {
var field = __koru_input.field;
var value = __koru_input.value;
var __koru_mask = (ulong)field;
if ((__koru_mask & (1UL << 0)) != 0) __koru_store_check.rows = value;
if ((__koru_mask & (1UL << 1)) != 0) __koru_store_check.ids = value;
if ((__koru_mask & (1UL << 2)) != 0) __koru_store_check.hps = value;
if ((__koru_mask & (1UL << 3)) != 0) __koru_store_check.pair = value;
return default;
}
}
public static class __store_sweepbody_src_L44_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event {
public struct Input {
public long __koru_srf_r_L44_id;
public long __koru_srf_r_L44_hp;
public long __koru_sdix_r_L44;
}
public static dynamic handler(Input __koru_input) {
var __koru_srf_r_L44_id = __koru_input.__koru_srf_r_L44_id;
var __koru_srf_r_L44_hp = __koru_input.__koru_srf_r_L44_hp;
var __koru_sdix_r_L44 = __koru_input.__koru_sdix_r_L44;
{
for (var __koru_si = 0; __koru_si < __koru_store_buf.len; __koru_si++) {
var __koru_srf_b_L45_text = __koru_store_buf.text[__koru_si];
main_module.__store_sweepbody_buf_L45_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(new main_module.__store_sweepbody_buf_L45_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.Input { __koru_srf_b_L45_text = __koru_srf_b_L45_text, __koru_srf_r_L44_id = __koru_srf_r_L44_id, __koru_srf_r_L44_hp = __koru_srf_r_L44_hp, __koru_sdix_b_L45 = __koru_si });
}
}
return default;
}
}
public static class __store_sweeprun_src_L44_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event {
public struct Input {
}
public static dynamic handler(Input __koru_input) {
{
for (var __koru_si = 0; __koru_si < __koru_store_src.len; __koru_si++) {
var __koru_srf_r_L44_id = __koru_store_src.id[__koru_si];
var __koru_srf_r_L44_hp = __koru_store_src.hp[__koru_si];
main_module.__store_sweepbody_src_L44_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(new main_module.__store_sweepbody_src_L44_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.Input { __koru_srf_r_L44_id = __koru_srf_r_L44_id, __koru_srf_r_L44_hp = __koru_srf_r_L44_hp, __koru_sdix_r_L44 = __koru_si });
}
}
return default;
}
}
public static class __store_sweepbody_buf_L60_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event {
public struct Input {
public dynamic __koru_srf_b_L60_text;
public long __koru_sdix_b_L60;
}
public static dynamic handler(Input __koru_input) {
var __koru_srf_b_L60_text = __koru_input.__koru_srf_b_L60_text;
var __koru_sdix_b_L60 = __koru_input.__koru_sdix_b_L60;
var n = main_module.std_string_len_event.handler(new std_string_len_event.Input { s = __koru_srf_b_L60_text});
__koru_stdout_write("dump bytes " + __koru_str(n) + "\n");
return default;
}
}
public static class __store_sweeprun_buf_L60_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event {
public struct Input {
}
public static dynamic handler(Input __koru_input) {
{
for (var __koru_si = 0; __koru_si < __koru_store_buf.len; __koru_si++) {
var __koru_srf_b_L60_text = __koru_store_buf.text[__koru_si];
main_module.__store_sweepbody_buf_L60_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.handler(new main_module.__store_sweepbody_buf_L60_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event.Input { __koru_srf_b_L60_text = __koru_srf_b_L60_text, __koru_sdix_b_L60 = __koru_si });
}
}
return default;
}
}
public static class __store_sweepbody_buf_L63_690_190_store_text_dump_thousand_rows_parsed_back_input_d96a7e_event {
public struct Input {
public dynamic __koru_srf_b_L63_text;
public long __koru_sdix_b_L63;
}
public static dynamic handler(Input __koru_input) {
var __koru_srf_b_L63_text = __koru_input.__koru_srf_b_L63_text;
var __koru_sdix_b_L63 = __koru_input.__koru_sdix_b_L63;
var dump = $"{__koru_str(__koru_srf_b_L63_text.data)}";
var __koru_handlers_1 = new __koru_handlers_1 { __koru_fn_piece = (__koru_arm_2) => {
var tok = __koru_arm_2;
var result_6 = main_module.std_string_from_page_event.handler(new std_string_from_page_event.Input { text = (string)(tok)});
if (result_6.tag == "ok") {
var h = result_6.ok;
var result_7 = main_module.std_string_parse_int_event.handler(new std_string_parse_int_event.Input { s = h});
if (result_7.tag == "ok") {
var n = result_7.ok;
if (__koru_store_pstate.have == 0) {
{ {
var __koru_p_field = (long)((long)((long)((ulong)((ulong)(1) << 1))));
var __koru_p_value = (long)(n);
var __koru_mask = (ulong)__koru_p_field;
if ((__koru_mask & (1UL << 0)) != 0) __koru_store_pstate.have = __koru_p_value;
if ((__koru_mask & (1UL << 1)) != 0) __koru_store_pstate.pid = __koru_p_value;
}
{
var __koru_p_field = (long)((long)((long)((ulong)((ulong)(1) << 0))));
var __koru_p_value = (long)(1);
var __koru_mask = (ulong)__koru_p_field;
if ((__koru_mask & (1UL << 0)) != 0) __koru_store_pstate.have = __koru_p_value;
if ((__koru_mask & (1UL << 1)) != 0) __koru_store_pstate.pid = __koru_p_value;
}
{
var __koru_p_field = (long)(1);
}
{
var __koru_p_field = (long)(0);
}
{
var __koru_p_s = h;
// GC is the implementation. There is no allocator to hand the bytes back
// to, so the honest body is empty — this is a port, not a stub.
}
}
} else {
{ var pv = main_module.echo_event.handler(new echo_event.Input { v = (long)(__koru_store_pstate.pid)});
var result_8 = main_module.__store_inserth_dst_event.handler(new __store_inserth_dst_event.Input { id = (long)(pv), hp = (long)(n), __site_line = (long)(70)});
var _auto_21 = result_8.row;
main_module.__store_write_pstate_event.handler(new __store_write_pstate_event.Input { field = (long)(0), value = (long)(0)});
{
var __koru_p_s = h;
// GC is the implementation. There is no allocator to hand the bytes back
// to, so the honest body is empty — this is a port, not a stub.
}
}
}
}
if (result_7.tag == "err") {
var _auto_22 = result_7.err;
{
var __koru_p_s = h;
// GC is the implementation. There is no allocator to hand the bytes back
// to, so the honest body is empty — this is a port, not a stub.
}
}
}
if (result_6.tag == "err") {
var _auto_23 = result_6.err;
}
return null;
}, };
var result_9 = main_module.std_string_split_event.handler(new std_string_split_event.Input { s = (string)(dump), sep = (string)(" ")}, __koru_handler
... [truncated - 40KB total]Flows
flow ~new click a branch to expand · @labels scroll to their anchor
new (src, capacity: 1000, source: id: i64, hp: i64)
flow ~new click a branch to expand · @labels scroll to their anchor
new (dst, capacity: 1000, source: id: i64, hp: i64)
flow ~new click a branch to expand · @labels scroll to their anchor
new (buf, capacity: 2, source: text: *std/string:String<instance!>)
flow ~new click a branch to expand · @labels scroll to their anchor
new (pstate, source: have: 0[i64], pid: 0[i64])
flow ~new click a branch to expand · @labels scroll to their anchor
new (check, source: rows: 0[i64], ids: 0[i64], hps: 0[i64], pair: 0[i64])
flow ~for click a branch to expand · @labels scroll to their anchor
for (0..1000)
flow ~from-page click a branch to expand · @labels scroll to their anchor
from-page (text: "")
flow ~query click a branch to expand · @labels scroll to their anchor
query (src)
flow ~query click a branch to expand · @labels scroll to their anchor
query (buf)
flow ~query click a branch to expand · @labels scroll to their anchor
query (buf)
flow ~query click a branch to expand · @labels scroll to their anchor
query (dst)
flow ~if click a branch to expand · @labels scroll to their anchor
if (check.rows > 0)
Test Configuration
MUST_RUN LANGUAGES: zig cs