deserialize* ( -- object ? )

Vocabulary

serialize.private

Inputs

None

Outputs

object	an object
?	an object

Definition

USING: combinators io kernel ;

IN: serialize.private

: deserialize* ( -- object ? )
    read1 [
        {
            { 65 [ deserialize-byte-array ] }
            { 70 [ deserialize-float ] }
            { 84 [ deserialize-tuple ] }
            { 87 [ deserialize-wrapper ] }
            { 97 [ deserialize-array ] }
            { 104 [ deserialize-hashtable ] }
            { 109 [ deserialize-negative-integer ] }
            { 110 [ deserialize-false ] }
            { 116 [ deserialize-true ] }
            { 111 [ deserialize-unknown ] }
            { 112 [ deserialize-positive-integer ] }
            { 113 [ deserialize-quotation ] }
            { 115 [ deserialize-string ] }
            { 119 [ deserialize-word ] }
            { 71 [ deserialize-word ] }
            { 122 [ deserialize-zero ] }
        } case t
    ] [ f f ] if* ;