Update scratch

This commit is contained in:
Vivianne 2024-03-07 13:47:27 -05:00
parent b8727b7990
commit 3ca90742d8
Signed by: vv
GPG key ID: F3E249EDFAC7BE26

View file

@ -35,6 +35,7 @@
((? list? lst) (map (λ (item) (expand-view engine item)) lst))
(else tree)))
;; Problem: Need to support dot syntax so users can create variadic operations
(define-syntax-rule (define-vprim (name args ...)
exp ...
((eng content) ...))
@ -42,8 +43,6 @@
exp ...
(lambda (engine)
(match engine
;; Problem: Content can contain any number of these functions
;; Need to identify them and resolve them.
('eng (expand-view engine content)) ...))))
(define-vprim (box content)