59f0aa7716
allocators/fs/process/socket/log/trace/test move under modules/std/ (allocators.sx becomes std/mem.sx; the Allocator protocol moves into the std.sx prelude, impls stay in mem.sx). New std/xml.sx holds xml_escape as xml.escape. std.sx gains the carried namespace tail — flat-importing std.sx now also provides mem./xml./log. — with the remaining modules (fs/process/socket/json/cli/hash/test) deferred from the tail until the global last-wins maps are fully own-wins (pulling them into every closure collides bare names corpus-wide; they stay direct imports: modules/std/fs.sx etc.). log.sx's internal emit renamed log_emit (it clobbered consumer fns named emit program-wide). bundle.sx uses xml.escape via the carried alias. Consumer import paths swept mechanically; .ir snapshots recaptured for the larger std closure. m3te + game build unchanged.
28 lines
889 B
Plaintext
28 lines
889 B
Plaintext
// `xx allocator` recovers the typed concrete pointer (ctx) from a
|
|
// protocol value. The recovery is read-only and must not perturb
|
|
// subsequent dispatch through the protocol value, regardless of
|
|
// whether the recovery happens BEFORE or AFTER the first dispatch.
|
|
|
|
#import "modules/std.sx";
|
|
#import "modules/std/mem.sx"; // `Allocator` is non-transitive: name it, import it.
|
|
|
|
main :: () -> s32 {
|
|
gpa := GPA.init();
|
|
a : Allocator = xx gpa;
|
|
|
|
// Recover BEFORE first dispatch.
|
|
recovered : *GPA = xx a;
|
|
print("recovered == gpa? {}\n", recovered == @gpa);
|
|
|
|
p := a.alloc(64);
|
|
print("alloc count after first alloc: {}\n", gpa.alloc_count);
|
|
|
|
// Recover AFTER dispatch — still works.
|
|
recovered2 : *GPA = xx a;
|
|
print("recovered2 == gpa? {}\n", recovered2 == @gpa);
|
|
|
|
a.dealloc(p);
|
|
print("alloc count after dealloc: {}\n", gpa.alloc_count);
|
|
0
|
|
}
|