HS parser: possessive 's style property access (517→519/831)
parse-poss-tail now handles style token type after 's operator. #div2's *color, #foo's *width etc. now correctly produce (style prop owner) AST which compiles to dom-set/get-style. Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
This commit is contained in:
@@ -63,6 +63,7 @@
|
|||||||
(let
|
(let
|
||||||
((prop (get (adv!) "value")))
|
((prop (get (adv!) "value")))
|
||||||
(parse-prop-chain (list (quote .) owner prop))))
|
(parse-prop-chain (list (quote .) owner prop))))
|
||||||
|
((= typ "style") (do (adv!) (list (quote style) val owner)))
|
||||||
(true owner)))))
|
(true owner)))))
|
||||||
(define
|
(define
|
||||||
parse-prop-chain
|
parse-prop-chain
|
||||||
|
|||||||
@@ -63,6 +63,7 @@
|
|||||||
(let
|
(let
|
||||||
((prop (get (adv!) "value")))
|
((prop (get (adv!) "value")))
|
||||||
(parse-prop-chain (list (quote .) owner prop))))
|
(parse-prop-chain (list (quote .) owner prop))))
|
||||||
|
((= typ "style") (do (adv!) (list (quote style) val owner)))
|
||||||
(true owner)))))
|
(true owner)))))
|
||||||
(define
|
(define
|
||||||
parse-prop-chain
|
parse-prop-chain
|
||||||
|
|||||||
Reference in New Issue
Block a user