HS: block literals callable as zero-arg lambdas (+4 tests)
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 17s
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 17s
Fix compiler: (block-literal () body) was emitting bare body instead of (fn () body). Now always wraps in fn regardless of param count. Generator: MANUAL_TEST_BODIES for all 4 blockLiteral tests using apply and SX map rather than JS array.map. Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
@@ -1078,10 +1078,7 @@
|
||||
(let
|
||||
((params (map make-symbol (nth ast 1)))
|
||||
(body (hs-to-sx (nth ast 2))))
|
||||
(if
|
||||
(= (len params) 0)
|
||||
body
|
||||
(list (quote fn) params body))))
|
||||
(list (quote fn) params body)))
|
||||
((= head (quote me)) (quote me))
|
||||
((= head (quote beingTold)) (quote beingTold))
|
||||
((= head (quote it)) (quote it))
|
||||
|
||||
Reference in New Issue
Block a user