parse-payload ( data -- remain payload payload-type )

Vocabulary

tnetstrings.private

Inputs

data

an object

Outputs

remain	an object
payload	an object
payload-type	an object

Definition

USING: kernel math.parser sequences splitting ;

IN: tnetstrings.private

: parse-payload ( data -- remain payload payload-type )
    ":" split1 swap string>number cut unclip swapd ;