diff options
| author | Sam T <sta.cs.vsu@gmail.com> | 2013-04-07 05:50:18 +0400 |
|---|---|---|
| committer | Sam T <sta.cs.vsu@gmail.com> | 2013-04-07 05:50:18 +0400 |
| commit | 881418d201e2a58e413161991a7e8d113f50a191 (patch) | |
| tree | 77ddb28e91873c5e1926072bc535f7a145ca31cb /tests/encoding.hs | |
| parent | e333666cc7c4de24ec10b948afeeb3bfe1976ba1 (diff) | |
+ peer id test
Diffstat (limited to 'tests/encoding.hs')
| -rw-r--r-- | tests/encoding.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/encoding.hs b/tests/encoding.hs index 12278ed9..b820dc26 100644 --- a/tests/encoding.hs +++ b/tests/encoding.hs | |||
| @@ -62,6 +62,9 @@ main = do | |||
| 62 | [ testProperty "Message encode <-> decode" $ | 62 | [ testProperty "Message encode <-> decode" $ |
| 63 | prop_encoding (T :: T Message) | 63 | prop_encoding (T :: T Message) |
| 64 | 64 | ||
| 65 | , testProperty "PeerID encode <-> decode" $ | ||
| 66 | prop_encoding (T :: T PeerID) | ||
| 67 | |||
| 65 | , testProperty "Handshake encode <-> decode" $ | 68 | , testProperty "Handshake encode <-> decode" $ |
| 66 | prop_encoding (T :: T Handshake) | 69 | prop_encoding (T :: T Handshake) |
| 67 | ] \ No newline at end of file | 70 | ] \ No newline at end of file |