>name ( domain -- byte-array )

Vocabulary

dns

Inputs

domain

an object

Outputs

byte-array

an object

Definition

USING: kernel sequences splitting ;

IN: dns

: >name ( domain -- byte-array )
    dup "." =
    [ drop B{ 0 } ] [ "." split [ >n/label ] map concat ] if ;