read-dictionary ( -- obj )

Vocabulary

bencode.private

Inputs

None

Outputs

obj

an object

Definition

USING: arrays bencode kernel linked-assocs sequences.extras ;

IN: bencode.private

: read-dictionary ( -- obj )
    [ read-bencode [ read-bencode 2array ] [ f ] if* ]
    loop>array >linked-hash ;