Rename the "octet_from_int" test; that function is gone.

diff --git a/src/Octet.hs b/src/Octet.hs
index 248b3396c40f46ebac61dda9008dc8bb4e9b1ba0..34f9d4f821e61997ccbdb2f1438c10a06c71b49a 100644 (file)
--- a/src/Octet.hs
+++ b/src/Octet.hs
@@ -154,7 +154,7 @@ instance Read Octet where
 octet_tests :: TestTree
 octet_tests =
   testGroup "Octet Tests" [
-    test_octet_from_int1,
+    test_octet_to_enum1,
     test_octet_mask1,
     test_octet_mask2 ]
 
@@ -190,11 +190,11 @@ prop_read_show_inverses =
 
 
 -- HUnit Tests
-test_octet_from_int1 :: TestTree
-test_octet_from_int1 =
+test_octet_to_enum1 :: TestTree
+test_octet_to_enum1 =
   testCase desc $ actual @?= expected
   where
-    desc = "octet_from_int 128 should parse as 10000000"
+    desc = "toEnum 128 should parse as 10000000"
     expected = Octet B.One B.Zero B.Zero B.Zero B.Zero B.Zero B.Zero B.Zero
     actual = toEnum 128 :: Octet