You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
|
|
|
(in-package #:lolisp)
|
|
|
|
|
|
|
|
|
|
(defmacro str (&rest strs)
|
|
|
|
|
`(concatenate 'string ,@strs))
|
|
|
|
|
|
|
|
|
|
(defmacro json-value (json &rest rest)
|
|
|
|
|
(let ((this `(jsown:val ,json ,(pop rest))))
|
|
|
|
|
(loop while rest
|
|
|
|
|
do (setf this `(jsown:val ,this ,(pop rest))))
|
|
|
|
|
this))
|
