JSON: Difference between revisions

62 bytes added ,  11 years ago
'read' spec changed
(added Caché ObjectScript)
('read' spec changed)
Line 1,515:
(T
(let X @
(if (and (= "-" X) (format (peek)))cond
(-(pair X) (readpack X))
X((and )(= )"-" X) (format (peek)) )
(- (read)) )
(T X) ) ) ) ) )
 
(de printJson (Item) # For simplicity, without indentation
Anonymous user