Better error

This commit is contained in:
Jakub 2026-07-12 12:21:14 +08:00
parent c0fa36b75c
commit f8c3431d12

View file

@ -24,7 +24,11 @@ heading component:
:title \"Title Text\")) :title \"Title Text\"))
```" ```"
(when (= (remainder (length args) 2 1)) (when (= (remainder (length args) 2 1))
(error "Component macro expects even length args list.")) (error (format
"mithril:comp-> Component macro expects even length args list.
Call: (mithril:comp ~S ~S)"
view args)))
`(object `(object
:view :view
(lambda (vnode) (,@view)) (lambda (vnode) (,@view))