X-Git-Url: http://gitweb.michael.orlitzky.com/?p=hath.git;a=blobdiff_plain;f=src%2FCidr.hs;h=a07117d5382842b94d23f87fe469c6831c997aad;hp=826c8622819775cfb8976950eca3f1cb9c5d97f2;hb=b4397616550eff1141b094f3fe0c38a1b3caffb7;hpb=e8b41784eaa68049f7a7354916c9c9920050db70 diff --git a/src/Cidr.hs b/src/Cidr.hs index 826c862..a07117d 100644 --- a/src/Cidr.hs +++ b/src/Cidr.hs @@ -425,8 +425,7 @@ test_combine_all3 = where cidr1 = fromJust $ cidr_from_string "10.0.0.16/32" cidr2 = fromJust $ cidr_from_string "10.0.0.17/32" - - cidr3 = fromJust $ cidr_from_string "10.0.0.18/32" + cidr3 = fromJust $ cidr_from_string "10.0.0.18/32" cidr4 = fromJust $ cidr_from_string "10.0.0.19/32" expected_cidrs = [fromJust $ cidr_from_string "10.0.0.16/30"] test_cidrs = [cidr1, cidr2, cidr3, cidr4]