define-syntax json does not work

[misiekdarek]

json always quote its arguments
e.g.

(json (object ("1" "2") ("3" "4")))
(object ("1" "2") ("3" "4"))

(json (array "1" "2" "3" "4")))
(array "1" "2" "3" "4")

after looking at the code it seems list->hash-table has also two issues

1. reference to list instead of lst
2. it expects a list of pairs instead of list of lists

Best Regards,
Darek