From ea1648a0a1a63ef82c0159864e5efa4fc6297a1d Mon Sep 17 00:00:00 2001 From: Eugene Crosser Date: Thu, 5 Jun 2014 20:38:35 +0400 Subject: [PATCH] Scrap the plan to verify valid proto/port Desided that it is not up to the bridge to decide which values are valid for the proto and port and which are not (in SRV and TLSA RRs). --- NmcDom.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/NmcDom.hs b/NmcDom.hs index dac614b..505c543 100644 --- a/NmcDom.hs +++ b/NmcDom.hs @@ -120,7 +120,6 @@ takeTls o = where tmap2dmap :: Map String (Map String [NmcRRTlsa]) -> Parser (Maybe (Map String NmcDom)) - -- FIXME return parse error on invalid proto or port tmap2dmap m1 = return $ foldrWithKey addprotoelem (Just M.empty) m1 addprotoelem k1 m2 acc = protoelem k1 m2 `merge` acc protoelem k1 m2 = Just (M.singleton ("_" ++ k1) (pmap2dmap m2)) -- 2.39.2