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.
18 lines
477 B
Plaintext
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
|
|
}
|