steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tools.dns: enable use from command-line.

db4
John Benediktsson 2015-04-01 14:18:31 -07:00
parent 96ea327702
commit 44bfc19e3b
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
extra/tools/dns/dns.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2010 Doug Coleman. ! Copyright (C) 2010 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: arrays dns fry io kernel math.parser sequences USING: arrays command-line dns fry io kernel math.parser
strings ; namespaces sequences strings ;
IN: tools.dns IN: tools.dns
: a-line. ( host ip -- ) : a-line. ( host ip -- )
@ -41,3 +41,8 @@ M: sequence dns-host ( servers domain -- )
M: string dns-host M: string dns-host
[ 1array ] dip dns-host ; [ 1array ] dip dns-host ;
: run-host ( -- )
command-line get first host ;
MAIN: run-host