Hyperscript conformance: 372→373 — hide/show strategy, generator toEqual

Parser: hide/show handle `with opacity/visibility/display` strategy,
target detection for then-less chaining (add/remove/set/put as boundary).
Generator: inline run().toEqual([...]) pattern for eval-only tests.
Compiler: hide/show emit correct CSS property per strategy.

373/831 (45%)

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>

shared/static/wasm/sx/hs-compiler.sx

@@ -847,17 +847,25 @@
                   (nth ast 1)
                   nil))
               ((= head (quote hide))
-                (list
-                  (quote dom-set-style)
-                  (hs-to-sx (nth ast 1))
-                  "display"
-                  "none"))
+                (let
+                  ((tgt (hs-to-sx (nth ast 1)))
+                    (strategy (if (> (len ast) 2) (nth ast 2) "display")))
+                  (cond
+                    ((= strategy "opacity")
+                      (list (quote dom-set-style) tgt "opacity" "0"))
+                    ((= strategy "visibility")
+                      (list (quote dom-set-style) tgt "visibility" "hidden"))
+                    (true (list (quote dom-set-style) tgt "display" "none")))))
               ((= head (quote show))
-                (list
-                  (quote dom-set-style)
-                  (hs-to-sx (nth ast 1))
-                  "display"
-                  ""))
+                (let
+                  ((tgt (hs-to-sx (nth ast 1)))
+                    (strategy (if (> (len ast) 2) (nth ast 2) "display")))
+                  (cond
+                    ((= strategy "opacity")
+                      (list (quote dom-set-style) tgt "opacity" "1"))
+                    ((= strategy "visibility")
+                      (list (quote dom-set-style) tgt "visibility" "visible"))
+                    (true (list (quote dom-set-style) tgt "display" "")))))
               ((= head (quote transition)) (emit-transition ast))
               ((= head (quote repeat)) (emit-repeat ast))
               ((= head (quote fetch))

shared/static/wasm/sx/hs-parser.sx

@@ -951,15 +951,19 @@
         (fn
           ()
           (let
-            ((tgt (if (at-end?) (list (quote me)) (if (or (= (tp-type) "id") (= (tp-type) "selector")) (parse-expr) (list (quote me))))))
-            (list (quote hide) tgt))))
+            ((tgt (cond ((at-end?) (list (quote me))) ((and (= (tp-type) "keyword") (or (= (tp-val) "then") (= (tp-val) "end") (= (tp-val) "with") (= (tp-val) "add") (= (tp-val) "remove") (= (tp-val) "set") (= (tp-val) "put") (= (tp-val) "toggle") (= (tp-val) "hide") (= (tp-val) "show"))) (list (quote me))) (true (parse-expr)))))
+            (let
+              ((strategy (if (match-kw "with") (if (at-end?) "display" (let ((s (tp-val))) (adv!) s)) "display")))
+              (list (quote hide) tgt strategy)))))
       (define
         parse-show-cmd
         (fn
           ()
           (let
-            ((tgt (if (at-end?) (list (quote me)) (if (or (= (tp-type) "id") (= (tp-type) "selector")) (parse-expr) (list (quote me))))))
-            (list (quote show) tgt))))
+            ((tgt (cond ((at-end?) (list (quote me))) ((and (= (tp-type) "keyword") (or (= (tp-val) "then") (= (tp-val) "end") (= (tp-val) "with") (= (tp-val) "add") (= (tp-val) "remove") (= (tp-val) "set") (= (tp-val) "put") (= (tp-val) "toggle") (= (tp-val) "hide") (= (tp-val) "show"))) (list (quote me))) (true (parse-expr)))))
+            (let
+              ((strategy (if (match-kw "with") (if (at-end?) "display" (let ((s (tp-val))) (adv!) s)) "display")))
+              (list (quote show) tgt strategy)))))
       (define
         parse-transition-cmd
         (fn

shared/static/wasm/sx_browser.bc.wasm.js

@@ -1792,7 +1792,7 @@
             blake2_js_for_wasm_create: blake2_js_for_wasm_create};
    }
    (globalThis))
-({"link":[["runtime-0db9b496",0],["prelude-d7e4b000",0],["stdlib-23ce0836",[]],["re-9a0de245",[2]],["sx-7ec49d05",[2,3]],["jsoo_runtime-f96b44a8",[2]],["js_of_ocaml-651f6707",[2,5]],["dune__exe__Sx_browser-acaac3c1",[2,4,6]],["std_exit-10fb8830",[2]],["start-f808dbe1",0]],"generated":(b=>{var
+({"link":[["runtime-0db9b496",0],["prelude-d7e4b000",0],["stdlib-23ce0836",[]],["re-9a0de245",[2]],["sx-982ed992",[2,3]],["jsoo_runtime-f96b44a8",[2]],["js_of_ocaml-651f6707",[2,5]],["dune__exe__Sx_browser-acaac3c1",[2,4,6]],["std_exit-10fb8830",[2]],["start-f808dbe1",0]],"generated":(b=>{var
 c=b,a=b?.module?.export||b;return{"env":{"caml_ba_kind_of_typed_array":()=>{throw new
 Error("caml_ba_kind_of_typed_array not implemented")},"caml_exn_with_js_backtrace":()=>{throw new
 Error("caml_exn_with_js_backtrace not implemented")},"caml_int64_create_lo_mi_hi":()=>{throw new