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.
13 lines
382 B
Plaintext
13 lines
382 B
Plaintext
// `#framework "Name"` top-level directive registers an Apple framework for
|
|
// linking; `extern` declarations can omit the library identifier (frameworks
|
|
// resolve symbols by global namespace at link time).
|
|
|
|
#framework "CoreFoundation";
|
|
|
|
CFAbsoluteTimeGetCurrent :: () -> f64 extern;
|
|
|
|
main :: () -> i32 {
|
|
t := CFAbsoluteTimeGetCurrent();
|
|
return if t > 0.0 then 0 else 1;
|
|
}
|