     ] if ;
 *)
     
-HOOK: initial-dns-servers os ( -- seq )
+HOOK: initial-dns-servers os ( -- sequence )
 
 {
     { [ os windows? ] [ "dns.windows" ] }

        } cleave
    ] B{ } append-outputs-as ;

: message>byte-array ( message -- ba )
    [
        {
            [ id>> 2 >be ]

! Copyright (C) 2010 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien.enums alien.syntax arrays calendar
combinators combinators.smart constructors destructors grouping
io io.binary io.encodings.binary io.encodings.string
io.encodings.utf8 io.sockets io.sockets.private
io.streams.byte-array io.timeouts kernel make math math.bitwise
math.parser namespaces nested-comments random sequences
slots.syntax splitting system vectors vocabs.loader ;
IN: dns

ENUM: dns-type
