HS: on queue first/last modifier (+2 tests)
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 17s

parse-on-feat now skips 'queue MODE' tokens before parsing the body,
so 'on foo queue first ...' and 'on foo queue last ...' parse correctly.
Compiler ignores queue mode (catch-all drops unknown parts).

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
2026-04-27 05:30:57 +00:00
parent 1723808517
commit 19bd2cb92d
2 changed files with 2 additions and 0 deletions

View File

@@ -2882,6 +2882,7 @@
(true nil))))
(true nil))))
(consume-having!)
(when (and (= (tp-type) "keyword") (= (tp-val) "queue")) (do (adv!) (adv!)))
(let
((having (if (or h-margin h-threshold) (dict "margin" h-margin "threshold" h-threshold) nil)))
(let

View File

@@ -2882,6 +2882,7 @@
(true nil))))
(true nil))))
(consume-having!)
(when (and (= (tp-type) "keyword") (= (tp-val) "queue")) (do (adv!) (adv!)))
(let
((having (if (or h-margin h-threshold) (dict "margin" h-margin "threshold" h-threshold) nil)))
(let