Plaster

(let ((yason:*symbol-key-encoder* 'yason:encode-symbol-as-lowercase) (yason:*list-encoder* 'yason:encode-alist)) (yason:with-output-to-string* () (yason:encode '((key0 . "value0") (key1 . "value1"))))) "{\"key0\":\"value0\",\"key1\":\"value1\"}"