1a8991ab27
16 fn/global examples across categories (0415/0602/0603/1024/1025/1605/1607-1609/ 1611/1616/1619/1622/1628/1635/1636): bare '#foreign'→'extern'. All cls=0 (no class forms). Marker'd ones (1605/1609/1611 + the rest) corpus-validated; the 3 unmarked uikit importers (1607/1608/1616) verified byte-identical via 'sx ir' probes. Empty snapshot diff; suite green (647 corpus / 444 unit, 0 failed). LEFT comment-only/provenance #foreign (0716/0729 + issues/0030-extern-global + extern-test files 1223-1231/1332/1348/1349/1426) and the keep-list (identity ffi-foreign-* + foreign-asserting diagnostics 1172/1174/1219/1228/1620) for Phase 8.
30 lines
771 B
Plaintext
30 lines
771 B
Plaintext
// IR interpreter — variadic `..Any` indexing inside post-link callback.
|
|
//
|
|
// `format(fmt, ..args: []Any)` lowers to `any_to_string(args[i])` calls.
|
|
// The interpreter must be able to read every element of the packed
|
|
// `[N x Any]` slice from within a `#run`/post-link callback, not just
|
|
// the first two — and not just via JIT.
|
|
|
|
#import "modules/std.sx";
|
|
#import "modules/build.sx";
|
|
|
|
puts :: (s: [:0]u8) -> i32 extern libc;
|
|
|
|
cb :: () -> bool {
|
|
a := format("{}", "x");
|
|
puts("1-arg ok");
|
|
b := format("{} {}", "x", "y");
|
|
puts("2-arg ok");
|
|
c := format("{} {} {}", "x", "y", "z");
|
|
puts("3-arg ok");
|
|
true
|
|
}
|
|
|
|
configure :: () {
|
|
opts := build_options();
|
|
opts.set_post_link_callback(cb);
|
|
}
|
|
#run configure();
|
|
|
|
main :: () { print("rt\n"); }
|