Files
LithosAnanake/capsules/workload-4.4th
T
Robert Allan JamesandClaude Opus 5.5 ac42cf36b5 Stage O-C: the event-driven DoE driver -- DOE returns to the prompt, EV-DONE chains the trials, MU-WAIT-ALL deleted (FABRIC-3.9.0 §3/§7.4)
- DOE sets up, JOINs EV-DONE and starts trial 1, then returns. Each trial
  births and sends WL-RUN only; completion arrives as the OS's EV-DONE.
- ON-DONE counts this campaign's own workers while active; the last one
  ends the trial (KILL all, marker, persist) and starts the next, or
  finishes (HB-OFF, UNJOIN, MU-CAMPAIGN: complete). MU-WAIT-ALL is gone;
  the start/end cycle goes through MU-END-XT.
- WL-DONE-ARGS removed from all ten workload capsules; lint passes.

Smoke campaign (amd64, 1 rep, rows off per Captain Bob): DOE returns, the
prompt answers mid-trial, all 6 trials chain on events, fail=0 each,
28/28 born/killed/departed, MU-CAMPAIGN: complete in ~61 min. Standard
sequence passes on all three ISAs (with the xHCI fix it exposed, df150e86).

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
2026-09-25 10:58:11 -04:00

35 lines
546 B
Forth

Block 2130
( workload-4.4th - pi series )
VARIABLE PI-ACC
VARIABLE PI-SGN
1000000 CONSTANT PI-SCALE
: RESET-PI 0 PI-ACC ! 1 PI-SGN ! ;
: FLIP-SIGN
PI-SGN @ 0< IF 1 PI-SGN ! ELSE -1 PI-SGN ! THEN
;
Block 2131
: PI-STEP ( n -- )
2 * 1 +
PI-SCALE SWAP / PI-SGN @ * PI-ACC @ + PI-ACC !
FLIP-SIGN
;
: PI-CHUNK
100 0 DO
I PI-STEP
LOOP
;
Block 2132
: DO-PI
RESET-PI
5 0 DO
PI-CHUNK
LOOP
;
: RUN-PI
8 0 DO
DO-PI
LOOP
;
( FABRIC-3.8 3.9: defs only; the DoE SENDs WL-RUN )
: WL-RUN RUN-PI ." 4:dopi-ok" CR RUN-PI RUN-PI ;