From 8a0cc3a195024fb80c4c756e9ddb22e30e9ef229 Mon Sep 17 00:00:00 2001
From: Markus Pfeiffer <markus.pfeiffer@morphism.de>
Date: Sun, 20 Aug 2017 14:13:16 +0100
Subject: [PATCH] Also test long keys.

---
 tst/hmacsha256.tst | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tst/hmacsha256.tst b/tst/hmacsha256.tst
index 78062d5..ab25527 100644
--- a/tst/hmacsha256.tst
+++ b/tst/hmacsha256.tst
@@ -5,3 +5,5 @@ gap> Concatenation(List(CRYPTING_SHA256_HMAC("key", "The quick brown fox jumps o
 gap> str := RepeatedString("The quick brown fox jumps over the lazy dog.\n", 5000);;
 gap> Concatenation(List(CRYPTING_SHA256_HMAC("key", str), CRYPTING_HexStringIntPad8));
 "9319843BE4B7BBD7928B3DD7080B37E4CD46F9DC244812E3DD6783CF56C25AEE"
+gap> Concatenation(List(CRYPTING_SHA256_HMAC(str, str), CRYPTING_HexStringIntPad8));
+"9DC5FB7ECE7CC15F9DF778BA562ACAEDA325459C8CC0546AFB4A70EB6EE5E703"