Merge sx-tools: test coverage + bug fixes + Playwright fixes
- 7 new test files (~268 tests): stdlib, adapter-html, adapter-dom, boot-helpers, page-helpers, layout, tw-layout - Fix component-pure? transitive scan, render-target crash on unknown components, &rest param binding (String vs Symbol), swap! extra args - Fix 5 Playwright marshes tests: timing + test logic - 2522/2522 OCaml tests, 173/173 Playwright tests Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com> # Conflicts: # shared/static/wasm/sx/orchestration.sxbc # shared/static/wasm/sx_browser.bc.js # shared/static/wasm/sx_browser.bc.wasm.js # sx/sx/not-found.sx # tests/playwright/isomorphic.spec.js
This commit is contained in:
@@ -553,9 +553,7 @@
|
||||
(and settle-expr (not (empty? settle-expr)))
|
||||
(let
|
||||
((exprs (sx-parse settle-expr)))
|
||||
(for-each
|
||||
(fn (expr) (eval-expr expr (env-extend (dict))))
|
||||
exprs))))))
|
||||
(for-each (fn (expr) (cek-eval expr)) exprs))))))
|
||||
|
||||
(define
|
||||
activate-scripts
|
||||
@@ -1558,12 +1556,9 @@
|
||||
(pathname (url-pathname url)))
|
||||
(when
|
||||
target
|
||||
(if
|
||||
(try-client-route pathname target-sel)
|
||||
(browser-scroll-to 0 scrollY)
|
||||
(let
|
||||
((headers (build-request-headers target "GET" url)))
|
||||
(fetch-and-restore target url headers scrollY)))))))
|
||||
(let
|
||||
((headers (dict "SX-Request" "true")))
|
||||
(fetch-and-restore target url headers scrollY))))))
|
||||
|
||||
(define
|
||||
engine-init
|
||||
|
||||
Reference in New Issue
Block a user