X-Git-Url: http://gitweb.michael.orlitzky.com/?p=haeredes.git;a=blobdiff_plain;f=src%2FDNS.hs;h=b8e9cd0521e6baec631c56da2d4753e531e2ffc1;hp=3c89ff4a78a423de3b31848470d4b82165d88ae7;hb=c66c2d4fdf14e5b0fa54f39e6061eb4774c7b98a;hpb=2bdd52b5ee5c5eb268b1e38b0b629950b4665ff2 diff --git a/src/DNS.hs b/src/DNS.hs index 3c89ff4..b8e9cd0 100644 --- a/src/DNS.hs +++ b/src/DNS.hs @@ -31,9 +31,9 @@ type LookupResult = (Domain, Either DNSError [Domain]) -- Examples: -- -- >>> resolve_address "example.com" --- Right [93.184.216.119] --- >>> resolve_address "93.184.216.119" --- Right [93.184.216.119] +-- Right [93.184.216.34] +-- >>> resolve_address "93.184.216.34" +-- Right [93.184.216.34] -- resolve_address :: String -> IO (Either DNSError [IPv4]) resolve_address s =