diff --git a/lib/hyperscript/parser.sx b/lib/hyperscript/parser.sx index abccc04e..52fc9dde 100644 --- a/lib/hyperscript/parser.sx +++ b/lib/hyperscript/parser.sx @@ -1046,6 +1046,9 @@ (let ((val (if (and (= (tp-type) "ident") (= (tp-val) "$")) (do (adv!) (when (= (tp-type) "brace-open") (adv!)) (if (= (tp-type) "brace-close") (do (adv!) (if (= (tp-type) "brace-open") (do (adv!) (let ((inner (parse-expr))) (when (= (tp-type) "brace-close") (adv!)) inner)) "")) (let ((expr (parse-expr))) (when (= (tp-type) "brace-close") (adv!)) expr))) (get (adv!) "value")))) (set! pairs (cons (list prop val) pairs)) + (when + (and (= (tp-type) "op") (= (tp-val) ";")) + (adv!)) (collect-pairs!)))))) (collect-pairs!) (when (= (tp-type) "brace-close") (adv!)) diff --git a/shared/static/wasm/sx/hs-parser.sx b/shared/static/wasm/sx/hs-parser.sx index abccc04e..52fc9dde 100644 --- a/shared/static/wasm/sx/hs-parser.sx +++ b/shared/static/wasm/sx/hs-parser.sx @@ -1046,6 +1046,9 @@ (let ((val (if (and (= (tp-type) "ident") (= (tp-val) "$")) (do (adv!) (when (= (tp-type) "brace-open") (adv!)) (if (= (tp-type) "brace-close") (do (adv!) (if (= (tp-type) "brace-open") (do (adv!) (let ((inner (parse-expr))) (when (= (tp-type) "brace-close") (adv!)) inner)) "")) (let ((expr (parse-expr))) (when (= (tp-type) "brace-close") (adv!)) expr))) (get (adv!) "value")))) (set! pairs (cons (list prop val) pairs)) + (when + (and (= (tp-type) "op") (= (tp-val) ";")) + (adv!)) (collect-pairs!)))))) (collect-pairs!) (when (= (tp-type) "brace-close") (adv!))