(index ("hmac" 0) ("hmac-primitive" 446))
(def (sig (procedure "(hmac key digest-primitive #!optional (result-form 'string))" (id hmac))) (p "Takes " (tt "key") " and " (tt "digest-primitive") " and returns a function that takes " (tt "message") " and produces an hmac.") (p "The " (tt "result-form") " parameter may be used to change the format of the resulting hash, please refer to the " (int-link "/eggref/4/message-digest" "message-digest documentation") " for more informations."))
(def (sig (procedure "(hmac-primitive key digest-primitive)" (id hmac-primitive))) (p "Takes " (tt "key") " and " (tt "digest-primitive") " and returns a " (b "message-digest-primitive") " that calculates the HMAC with the parameters given."))
