Files
sx/examples/1622-cimport-unit-bound-defines.sx
agra 1a8991ab27 refactor(ffi-linkage): Phase 7.4 — migrate straggler examples #foreign→extern
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.
2026-06-15 07:03:53 +03:00

18 lines
477 B
Plaintext

// `#define`/`#flags` reach a unit whose ONLY consumer is hand-curated
// `extern` decls (PLAN-C C3.3) — no `#include`, no auto-synthesis:
// the macro decides what the unit-bound decl answers.
#import "modules/std.sx";
unit :: #import c {
#define "UNIT_BASE=33";
#flags "-O2";
#source "1622-cimport-unit-bound-defines/unit.c";
};
unit_answer :: () -> i32 extern unit "unit_answer";
main :: () -> i32 {
print("unit answer = {}\n", unit_answer());
0
}