X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=haskell-dns.git;a=blobdiff_plain;f=Network%2FDNS%2FNamed%2FSanity.hs;fp=Network%2FDNS%2FNamed%2FSanity.hs;h=0000000000000000000000000000000000000000;hp=8d5c7939ee35273f78ee2c9f5ae4d2966fb960a4;hb=957d3f466cea2fa642f67f477ec4ad9a0d535a9b;hpb=68e58e5c4aaf0279f041c251e73e4aaccf616286 diff --git a/Network/DNS/Named/Sanity.hs b/Network/DNS/Named/Sanity.hs deleted file mode 100644 index 8d5c793..0000000 --- a/Network/DNS/Named/Sanity.hs +++ /dev/null @@ -1,23 +0,0 @@ -module Network.DNS.Named.Sanity - ( SaneAnswerType - , SaneAnswerClass - ) - where - -import Network.DNS.Message - - -class SaneAnswerType q ans -instance (RecordType q dt) => SaneAnswerType q q -instance (RecordType q dt) => SaneAnswerType q CNAME -instance (RecordType ans dt) => SaneAnswerType ANY ans -instance (RecordType ans dt) => SaneAnswerType AXFR ans -instance SaneAnswerType MAILB MR -instance SaneAnswerType MAILB MB -instance SaneAnswerType MAILB MG -instance SaneAnswerType MAILB MINFO - - -class SaneAnswerClass q ans -instance RecordClass q => SaneAnswerClass q q -instance RecordClass ans => SaneAnswerClass ANY ans