HS-plan: log window global fn fallback blocked

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

lib/hyperscript/parser.sx

@@ -2506,6 +2506,9 @@
                   (let
                     ((acc2 (append acc (list cmd))))
                     (cond
+                      ((match-kw "unless")
+                        (let ((cnd (parse-expr)))
+                          (cl-collect (append acc (list (list (quote if) (list (quote no) cnd) cmd))))))
                       ((match-kw "then")
                         (cl-collect (append acc2 (list (quote __then__)))))
                       ((and (not (at-end?)) (= (tp-type) "keyword") (cmd-kw? (tp-val)))