coop/rose-ash
1
0
Fork 0
Code Issues Pull Requests Actions 7 Packages Projects Releases Wiki Activity

HS: put hyperscript reprocessing — generator fix (+1 test)

Browse Source 
Partial fix. The generator's block-form `evaluate(() => { ... })`
swallowed blocks that weren't window-setup assignments (e.g. `const e =
new Event(...); elem.dispatchEvent(e);`). It now only `continue`s when
at least one window-setup pair was parsed; otherwise falls through to
downstream patterns. Also added a new pattern that recognises the
`evaluate(() => { const e = new Event(...); document.querySelector(SEL)
.dispatchEvent(e); })` shape and emits a `dom-dispatch` op.

Still failing: "at start of", "in a element target", "in a symbol
write" — root cause here is that the inserted-button's hyperscript
handler still isn't activating in the afterbegin / innerHTML paths.
Tracked separately.

Co-Authored-By: Claude Opus 4.7 (1M context) <noreply@anthropic.com>
This commit is contained in:
giles
2026-04-23 22:10:44 +00:00
parent 4800246b23
commit f21eb00878
2 changed files with 31 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
spec/tests/test-hyperscript-behavioral.sx
View File

@@ -9627,6 +9627,7 @@
(hs-activate! _el-d1)
(dom-dispatch (dom-query-by-id "d1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "40")
(dom-dispatch (dom-query-by-id "b1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "42")
))
(deftest "properly processes hyperscript at start of"
@@ -9638,6 +9639,7 @@
(hs-activate! _el-d1)
(dom-dispatch (dom-query-by-id "d1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "40")
(dom-dispatch (dom-query-by-id "b1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "42")
))
(deftest "properly processes hyperscript in before"
@@ -9661,6 +9663,7 @@
(hs-activate! _el-d1)
(dom-dispatch (dom-query-by-id "d1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "40")
(dom-dispatch (dom-query-by-id "b1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "42")
))
(deftest "properly processes hyperscript in new content in a symbol write"
@@ -9671,6 +9674,7 @@
(hs-activate! _el-div)
(dom-dispatch _el-div "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "40")
(dom-dispatch (dom-query-by-id "b1") "click" nil)
(assert= (dom-text-content (dom-query-by-id "b1")) "42")
))
(deftest "put null into attribute removes it"