stream-read-json ( stream -- object ) - Factor Documentation

stream-read-json ( stream -- object )

Vocabulary
json

Inputs

stream an object

Outputs

object an object

Definition

USING: io json.private kernel sequences vectors ;

: stream-read-json ( stream -- object )
[
V{ } clone over
[ stream-read1 [ scan dup first vector? ] [ f ] if* ]
curry loop nip
] check-json-depth get-json ;