Robert Allan JamesandClaude Sonnet 5
5c1b31669e
These are alternate boot personality capsules, not files doe.4th dispatches from -- confirmed by reading doe.4th itself (it generates its own synthetic workload internally, DOE-WORK) and mkcapsule.c (only the exact filename "init.4th" is special-cased as the active MAMA_INIT capsule). "workload-N.4th" names them for what they are without colliding with that reserved name. Renamed the 10 files (git mv, preserving history) and their own self-referential header comments (also fixed a pre-existing typo, "init-4.th" -> "workload-4.4th"), updated capsules/README.md, capsules/MANIFEST.md (21 references), .claude/CLAUDE.md, and a tools/mkcapsule.c comment. Also fixed experiments/bare_metal/README.md's "Adding a Custom Workload Capsule" section, discovered stale while doing this rename: it documented a WL-HI/WL-LO dispatch table and a wl_id CSV column that don't exist anywhere in the current capsules/ tree or doe.4th's own CSV header -- corrected to describe what's actually there (no pluggable workload dispatch; a custom workload is run by substituting it in as the boot's own init.4th). Verified: mkcapsule --lint clean (35 files, 0 violations), all 3 architectures build with zero new warnings, amd64 boots to zuse)ok> with an unchanged dict_hash/capsule_hash from every prior boot this session (0xc8f4b09e36f4fc4a / 0x1ef4939ed32ec1e6) and zero faults. Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_01EXieurDfDSsDFdnSyusuWo
168 lines
1.9 KiB
Forth
168 lines
1.9 KiB
Forth
Block 2080
|
|
|
|
Block 2081
|
|
: STABLE-WORK
|
|
1024 0 DO
|
|
I 3 MOD 0= IF
|
|
100 0 DO
|
|
I J + DROP
|
|
LOOP
|
|
ELSE
|
|
50 0 DO
|
|
I J * DROP
|
|
LOOP
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2082
|
|
: STABLE-PHASE
|
|
16 0 DO
|
|
STABLE-WORK
|
|
LOOP
|
|
;
|
|
|
|
Block 2083
|
|
: WAVES-OF-DOOM
|
|
64 0 DO
|
|
I 8 MOD 0= IF
|
|
100 0 DO
|
|
I J + DROP
|
|
LOOP
|
|
ELSE
|
|
25 0 DO
|
|
I J * DROP
|
|
LOOP
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2084
|
|
: BURSTY-STABLE
|
|
8 0 DO
|
|
STABLE-WORK
|
|
I 2 MOD 0= IF
|
|
4 0 DO
|
|
256 0 DO
|
|
I J * DROP
|
|
LOOP
|
|
LOOP
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2085
|
|
: TIDAL-WORK
|
|
16 0 DO
|
|
I 4 MOD 0= IF
|
|
512 0 DO
|
|
I J + DROP
|
|
LOOP
|
|
ELSE
|
|
256 0 DO
|
|
I J * DROP
|
|
LOOP
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2086
|
|
: W-TIDAL
|
|
4 0 DO
|
|
TIDAL-WORK
|
|
WAVES-OF-DOOM
|
|
LOOP
|
|
;
|
|
|
|
Block 2087
|
|
: VOLATILE-BLOCK
|
|
128 0 DO
|
|
I 2 MOD 0= IF
|
|
64 0 DO I J + DROP LOOP
|
|
ELSE
|
|
64 0 DO I J * DROP LOOP
|
|
THEN
|
|
I 8 MOD 0= IF
|
|
256 0 DO I J + J * DROP LOOP
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2088
|
|
: VOLATILE-STORM
|
|
12 0 DO
|
|
VOLATILE-BLOCK
|
|
LOOP
|
|
;
|
|
|
|
Block 2089
|
|
: TRANSITION-PHASE
|
|
STABLE-PHASE
|
|
W-TIDAL
|
|
BURSTY-STABLE
|
|
VOLATILE-STORM
|
|
;
|
|
|
|
Block 2090
|
|
: TRANSITION-RIPPLE
|
|
4 0 DO
|
|
256 0 DO I J + DROP LOOP
|
|
128 0 DO I J * DROP LOOP
|
|
LOOP
|
|
;
|
|
|
|
Block 2091
|
|
: MICRO-BURST
|
|
32 0 DO
|
|
I 4 MOD 0= IF
|
|
64 0 DO I J + J * DROP LOOP
|
|
ELSE
|
|
64 0 DO I J * I + DROP LOOP
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2092
|
|
: MICRO-BURST-FIELD
|
|
16 0 DO
|
|
STABLE-WORK
|
|
I 3 MOD 0= IF
|
|
MICRO-BURST
|
|
THEN
|
|
LOOP
|
|
;
|
|
|
|
Block 2093
|
|
: ROLLING-CASCADE
|
|
9 1 DO
|
|
I 0 DO
|
|
STABLE-WORK
|
|
LOOP
|
|
MICRO-BURST
|
|
LOOP
|
|
8 1 DO
|
|
I 0 DO
|
|
STABLE-WORK
|
|
LOOP
|
|
LOOP
|
|
;
|
|
|
|
Block 2094
|
|
: OMNI-WORK
|
|
STABLE-PHASE 46 EMIT
|
|
TRANSITION-RIPPLE 46 EMIT
|
|
W-TIDAL 46 EMIT
|
|
BURSTY-STABLE 46 EMIT
|
|
MICRO-BURST-FIELD 46 EMIT
|
|
VOLATILE-STORM 46 EMIT
|
|
TRANSITION-PHASE 46 EMIT
|
|
ROLLING-CASCADE 46 EMIT
|
|
;
|
|
|
|
Block 2095
|
|
: RUN-OMNI
|
|
OMNI-WORK
|
|
;
|
|
|
|
RUN-OMNI
|