parse-srv ( -- srv )

Vocabulary

dns

Inputs

None

Outputs

srv

an object

Definition

USING: accessors endian io kernel ;

IN: dns

: parse-srv ( -- srv )
    srv new 2 read be> >>priority 2 read be> >>weight
    2 read be> >>port parse-name >>target ;