From 2c9d7c95a220550585584a21a69c73b0c80e8edc Mon Sep 17 00:00:00 2001
From: giles <giles.bradshaw@rose-ash.com>
Date: Sat, 7 Mar 2026 19:20:54 +0000
Subject: [PATCH] resolve-suspense: process new SX scripts before resolving

Streaming resolve scripts arrive after boot, so any extra component
defs sent as <script type="text/sx"> tags weren't being loaded.
Fix in the spec (boot.sx): call (process-sx-scripts nil) at the
start of resolve-suspense so late-arriving component defs are
available in componentEnv before rendering.

Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
---
 shared/static/scripts/sx-browser.js | 7 ++++---
 shared/static/scripts/sx.js         | 2 ++
 shared/sx/ref/boot.sx               | 3 +++
 3 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/shared/static/scripts/sx-browser.js b/shared/static/scripts/sx-browser.js
index e1061f7..fa0aeaf 100644
--- a/shared/static/scripts/sx-browser.js
+++ b/shared/static/scripts/sx-browser.js
@@ -14,7 +14,7 @@
   // =========================================================================
 
   var NIL = Object.freeze({ _nil: true, toString: function() { return "nil"; } });
-  var SX_VERSION = "2026-03-07T17:50:50Z";
+  var SX_VERSION = "2026-03-07T19:20:07Z";
 
   function isNil(x) { return x === NIL || x === null || x === undefined; }
   function isSxTruthy(x) { return x !== false && !isNil(x); }
@@ -693,7 +693,7 @@
   return (isSxTruthy((name == "if")) ? sfIf(args, env) : (isSxTruthy((name == "when")) ? sfWhen(args, env) : (isSxTruthy((name == "cond")) ? sfCond(args, env) : (isSxTruthy((name == "case")) ? sfCase(args, env) : (isSxTruthy((name == "and")) ? sfAnd(args, env) : (isSxTruthy((name == "or")) ? sfOr(args, env) : (isSxTruthy((name == "let")) ? sfLet(args, env) : (isSxTruthy((name == "let*")) ? sfLet(args, env) : (isSxTruthy((name == "letrec")) ? sfLetrec(args, env) : (isSxTruthy((name == "lambda")) ? sfLambda(args, env) : (isSxTruthy((name == "fn")) ? sfLambda(args, env) : (isSxTruthy((name == "define")) ? sfDefine(args, env) : (isSxTruthy((name == "defcomp")) ? sfDefcomp(args, env) : (isSxTruthy((name == "defmacro")) ? sfDefmacro(args, env) : (isSxTruthy((name == "defstyle")) ? sfDefstyle(args, env) : (isSxTruthy((name == "defkeyframes")) ? sfDefkeyframes(args, env) : (isSxTruthy((name == "defhandler")) ? sfDefhandler(args, env) : (isSxTruthy((name == "defpage")) ? sfDefpage(args, env) : (isSxTruthy((name == "defquery")) ? sfDefquery(args, env) : (isSxTruthy((name == "defaction")) ? sfDefaction(args, env) : (isSxTruthy((name == "begin")) ? sfBegin(args, env) : (isSxTruthy((name == "do")) ? sfBegin(args, env) : (isSxTruthy((name == "quote")) ? sfQuote(args, env) : (isSxTruthy((name == "quasiquote")) ? sfQuasiquote(args, env) : (isSxTruthy((name == "->")) ? sfThreadFirst(args, env) : (isSxTruthy((name == "set!")) ? sfSetBang(args, env) : (isSxTruthy((name == "reset")) ? sfReset(args, env) : (isSxTruthy((name == "shift")) ? sfShift(args, env) : (isSxTruthy((name == "dynamic-wind")) ? sfDynamicWind(args, env) : (isSxTruthy((name == "map")) ? hoMap(args, env) : (isSxTruthy((name == "map-indexed")) ? hoMapIndexed(args, env) : (isSxTruthy((name == "filter")) ? hoFilter(args, env) : (isSxTruthy((name == "reduce")) ? hoReduce(args, env) : (isSxTruthy((name == "some")) ? hoSome(args, env) : (isSxTruthy((name == "every?")) ? hoEvery(args, env) : (isSxTruthy((name == "for-each")) ? hoForEach(args, env) : (isSxTruthy((isSxTruthy(envHas(env, name)) && isMacro(envGet(env, name)))) ? (function() {
   var mac = envGet(env, name);
   return makeThunk(expandMacro(mac, args, env), env);
-})() : (isSxTruthy(isRenderExpr(expr)) ? renderExpr(expr, env) : evalCall(head, args, env)))))))))))))))))))))))))))))))))))))));
+})() : (isSxTruthy(isRenderExpr(expr)) ? makeRawHtml(renderExpr(expr, env)) : evalCall(head, args, env)))))))))))))))))))))))))))))))))))))));
 })() : evalCall(head, args, env)));
 })(); };
 
@@ -2456,7 +2456,8 @@ allKf = concat(allKf, styleValueKeyframes_(sv)); } }
 })(); };
 
   // resolve-suspense
-  var resolveSuspense = function(id, sx) { return (function() {
+  var resolveSuspense = function(id, sx) { processSxScripts(NIL);
+return (function() {
   var el = domQuery((String("[data-suspense=\"") + String(id) + String("\"]")));
   return (isSxTruthy(el) ? (function() {
   var ast = parse(sx);
diff --git a/shared/static/scripts/sx.js b/shared/static/scripts/sx.js
index 49c7e83..49f32b3 100644
--- a/shared/static/scripts/sx.js
+++ b/shared/static/scripts/sx.js
@@ -1597,6 +1597,8 @@
      * new SX content, and replaces the wrapper's children.
      */
     resolveSuspense: function (id, sx) {
+      // Process any new <script type="text/sx"> tags (streaming extras)
+      Sx.processScripts();
       var el = document.querySelector('[data-suspense="' + id + '"]');
       if (!el) {
         console.warn("[sx] resolveSuspense: no element for id=" + id);
diff --git a/shared/sx/ref/boot.sx b/shared/sx/ref/boot.sx
index 0c4f477..0bdc66d 100644
--- a/shared/sx/ref/boot.sx
+++ b/shared/sx/ref/boot.sx
@@ -103,6 +103,9 @@
 
 (define resolve-suspense
   (fn (id sx)
+    ;; Process any new <script type="text/sx"> tags that arrived via
+    ;; streaming (e.g. extra component defs) before resolving.
+    (process-sx-scripts nil)
     (let ((el (dom-query (str "[data-suspense=\"" id "\"]"))))
       (if el
         (do