Update for Racket 6.1.HEADmaster

1 files changed, 7 insertions, 0 deletions

diff --git a/hmac.rkt b/hmac.rkt
index b618537..3a23119 100644
--- a/hmac.rkt
+++ b/hmac.rkt
@@ -31,6 +31,13 @@
 ;;
 ;;  (hmac whirlpool 64 64 #"<secret key>" #"hello")
 ;;
+(: hmac ((Bytes -> Exact-Nonnegative-Integer)
+         Exact-Nonnegative-Integer
+         Exact-Nonnegative-Integer
+         Bytes
+         Bytes
+         ->
+         Exact-Nonnegative-Integer))
 (define (hmac hashfn blocksize hashsize key msg)
   (let ([opad (make-bytes blocksize #x5c)]
         [ipad (make-bytes blocksize #x36)]