parse: enforce strict-package — reject package-less files (#24a)
Flip the soft-default to a hard "missing package clause" error symmetrically in both stages (cmd/wcc/parse.c + lib/ww/syntax/parse.ww): the first real decl of a primary section with empty pathmod/resetmod and no seen clause is now rejected. Closes the documented soft-default divergence (the 63-wrapper carve-out). The gate flip can't be split from the migration it breaks, so this is one atomic commit: ~80 test/wcc wrappers gain `package main;` via a shared wwtestpkg.h helper, 6 data fixtures plus 17 asm-grep assertions update for the bare->main.<leaf> root-helper mangle shift, and rt/ declares `package rt;` with @symbol pinning the bare rt_ensure/rt_malloc linker names. Root mangling narrows: the executable entry `main` stays bare (existing carve-out), but root helper symbols become main.X. The #84 cluster is rewritten to assert main.run distinct from aa.run/test.run; its cgen fix and bare machinery are retained — still load-bearing for package-less module-reset deps. New table-driven test 782_strict_package.c (6 rows, both stages). Retiring //ww:module-reset is deferred to #24b: it is load-bearing (clears the .wwi pathmod so the body's package clause asserts), not a vestige; fusing its removal here would be a silent mismatch. All byte-id gates green; full make test reports "all 335 tests passed".
This commit is contained in:
@@ -41,6 +41,7 @@
|
||||
#include <sys/wait.h>
|
||||
#include <sys/stat.h>
|
||||
#include <dirent.h>
|
||||
#include "wwtestpkg.h"
|
||||
|
||||
static int
|
||||
runwait(const char *cmd)
|
||||
@@ -114,7 +115,7 @@ write_file(const char *path, const char *body)
|
||||
{
|
||||
FILE *f = fopen(path, "wb");
|
||||
if (!f) return -1;
|
||||
fputs(body, f);
|
||||
wwtest_fputs(body, f);
|
||||
fclose(f);
|
||||
return 0;
|
||||
}
|
||||
@@ -196,12 +197,13 @@ static struct tcase cases[] = {
|
||||
/* a non-`fn() void` @test signature must loud-reject, not be coerced. */
|
||||
{ "badsig", NULL, "test/wcc/data/attest_badsig.ww", 0, 0, 1 },
|
||||
/* a user `fn run` COEXISTS with lib/test's bound runner (post-#80 synth
|
||||
* `use test;` keys the runner under "test", #84 mangles the user `run`
|
||||
* bare) → accept and run to exit 0. Under sep the two land in distinct
|
||||
* units (`run` in __root.s, `test.run` in test.s), so a regressed #84
|
||||
* collision re-mangles the user `run` to `test.run` and the force-loaded
|
||||
* root `.o` + test's `.a` both define `test.run` → w6l duplicate-symbol
|
||||
* → non-zero; exit 0 is the teeth (empirically confirmed). byteid=1 also
|
||||
* `use test;` keys the runner under "test"; under strict-package #24a the
|
||||
* user file's `package main;` mangles its `run` to `main.run`) → accept
|
||||
* and run to exit 0. Under sep the two land in distinct units (`main.run`
|
||||
* in __root.s, `test.run` in test.s), so a regressed collision re-mangles
|
||||
* the user `run` to `test.run` and the force-loaded root `.o` + test's
|
||||
* `.a` both define `test.run` → w6l duplicate-symbol → non-zero; exit 0
|
||||
* is the teeth (empirically confirmed). byteid=1 also
|
||||
* pins this coexist path's cs==ww per-pkg asm + synth presence — the
|
||||
* rule-10 leg the ported 997 `coexist_run` carried over the #84 mangle. */
|
||||
{ "collide_run", NULL, "test/wcc/data/attest_userrun.ww", 0, 1, 0 },
|
||||
|
||||
Reference in New Issue
Block a user