Skip to content

Commit e54e4ac

Browse files
committed
Prepare changelog for 1.7.4, add tests
1 parent da1e6ab commit e54e4ac

File tree

2 files changed

+7
-1
lines changed

2 files changed

+7
-1
lines changed

changelog.md

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,7 @@ All notable changes to this project will be documented in this file.
44
The format is based on [Keep a Changelog](http://keepachangelog.com/en/1.0.0/)
55
and this project adheres to the [Haskell Package Versioning Policy](https://pvp.haskell.org/).
66

7-
## [1.7.4] - 2021-??-??
7+
## [1.7.4] - 2021-12-28
88

99
- Add `decodeUtf8Bytes` to `Net.IP`.
1010
- Fix IPv4 octet overflow bug (#74)

test/Test.hs

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -140,6 +140,12 @@ tests = testGroup "tests"
140140
, PH.testCase "S" $ IPv4.reserved (IPv4.ipv4 192 88 99 0) @=? True
141141
, PH.testCase "T" $ IPv4.reserved (IPv4.ipv4 192 0 1 0) @=? False
142142
]
143+
, testGroup "private"
144+
[ PH.testCase "A" $ IPv4.private (IPv4.ipv4 198 73 8 38) @=? False
145+
, PH.testCase "B" $ IPv4.private (IPv4.ipv4 192 168 100 5) @=? True
146+
, PH.testCase "C" $ IPv4.private (IPv4.ipv4 10 0 0 0) @=? True
147+
, PH.testCase "D" $ IPv4.private (IPv4.ipv4 10 255 255 255) @=? True
148+
]
143149
]
144150
, testGroup "IPv6 Range Operations"
145151
[ testProperty "Idempotence of normalizing IPv6 range"

0 commit comments

Comments
 (0)