46 lines
1.2 KiB
Plaintext
46 lines
1.2 KiB
Plaintext
package wcc;
|
|
|
|
import syntax;
|
|
|
|
export fn compilefile(file: *syntax.node, testmode: i32, testpackage: i32,
|
|
testmodule: str, testtarget: str, sepmode: i32, wwifd: i32,
|
|
haswwi: i32,
|
|
entrymode: i32, packageinitsymbol: str, initdispatchsymbol: str) i32 = {
|
|
let tc: syntax.tctx;
|
|
syntax.typesinit(&tc);
|
|
let ck: checker;
|
|
checkinit(&ck, &tc);
|
|
ck.istest = testmode;
|
|
ck.istestpackage = testpackage;
|
|
if (testmodule.len > 0) { ck.testmodule = testmodule; };
|
|
ck.testtarget = testtarget;
|
|
ck.sepmode = sepmode;
|
|
ck.packageinitsymbol = packageinitsymbol;
|
|
checkfile(&ck, file);
|
|
if (ck.errs > 0) { return 1; };
|
|
if (haswwi != 0) {
|
|
if (wwiemitfd(&ck, file, wwifd) != 0) { return 1; };
|
|
};
|
|
|
|
let cg: cgen;
|
|
cgeninit(&cg);
|
|
cg.sepmode = sepmode;
|
|
if (haswwi != 0 && entrymode == 0) { cg.sepisdep = 1i32; };
|
|
cg.initdispatchsymbol = initdispatchsymbol;
|
|
return cgfile(&cg, file);
|
|
};
|
|
|
|
export fn resolvefile(file: *syntax.node, verbose: i32,
|
|
nresolved: *i32, nunresolved: *i32) i32 = {
|
|
let tc: syntax.tctx;
|
|
syntax.typesinit(&tc);
|
|
let ck: checker;
|
|
checkinit(&ck, &tc);
|
|
ck.verbose = verbose;
|
|
checkfile(&ck, file);
|
|
*nresolved = ck.nresolved;
|
|
*nunresolved = ck.nunresolved;
|
|
if (ck.errs > 0 || ck.nunresolved > 0) { return 1; };
|
|
return 0;
|
|
};
|