DNS query: Difference between revisions
Content added Content deleted
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
(→{{header|TXR}}: Use str-addr method on objects returned by getaddrinfo.) |
||
| Line 1,562: | Line 1,562: | ||
=={{header|TXR}}== |
=={{header|TXR}}== |
||
At the listener prompt: |
|||
<pre>This is the TXR Lisp interactive listener of TXR 283. |
|||
Quit with :quit or Ctrl-D on an empty line. Ctrl-X ? for cheatsheet. |
Quit with :quit or Ctrl-D on an empty line. Ctrl-X ? for cheatsheet. |
||
TXR's no-spray organic production means every bug is carefully removed by hand. |
TXR's no-spray organic production means every bug is carefully removed by hand. |
||
1> ( |
1> (flow (getaddrinfo "www.kame.net") (mapcar .(str-addr)) uniq) |
||
| ⚫ | |||
(match-case addr |
|||
(@(struct sockaddr-in addr @a) (str-inaddr a)) |
|||
(@(struct sockaddr-in6 addr @a) (str-in6addr a))))) |
|||
| ⚫ | |||
=={{header|UNIX Shell}}== |
=={{header|UNIX Shell}}== |
||
===Using dig=== |
===Using dig=== |
||