From: Michael Orlitzky Date: Sun, 9 May 2010 19:27:41 +0000 (-0400) Subject: Switched the expected/actual order of assertions in IPv4Address. X-Git-Tag: 0.0.1~54 X-Git-Url: https://gitweb.michael.orlitzky.com/?a=commitdiff_plain;h=d1e7f72b70cfe4c1a5c5eb6e7773888506833131;p=hath.git Switched the expected/actual order of assertions in IPv4Address. --- diff --git a/src/IPv4Address.hs b/src/IPv4Address.hs index c79472c..29afa5f 100644 --- a/src/IPv4Address.hs +++ b/src/IPv4Address.hs @@ -356,11 +356,11 @@ mk_testaddr a b c d = test_most_sig_bit_different1 = - TestCase $ assertEqual "10.1.1.0 and 10.1.0.0 differ in bit 24" (most_sig_bit_different (mk_testaddr 10 1 1 0) (mk_testaddr 10 1 0 0)) TwentyFour + TestCase $ assertEqual "10.1.1.0 and 10.1.0.0 differ in bit 24" TwentyFour (most_sig_bit_different (mk_testaddr 10 1 1 0) (mk_testaddr 10 1 0 0)) test_most_sig_bit_different2 = - TestCase $ assertEqual "10.1.2.0 and 10.1.1.0 differ in bit 23" (most_sig_bit_different (mk_testaddr 10 1 2 0) (mk_testaddr 10 1 1 0)) TwentyThree + TestCase $ assertEqual "10.1.2.0 and 10.1.1.0 differ in bit 23" TwentyThree (most_sig_bit_different (mk_testaddr 10 1 2 0) (mk_testaddr 10 1 1 0))