diff options
Diffstat (limited to 'src/eris-decode.lisp')
| -rw-r--r-- | src/eris-decode.lisp | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/eris-decode.lisp b/src/eris-decode.lisp index 3d93312..806bd37 100644 --- a/src/eris-decode.lisp +++ b/src/eris-decode.lisp @@ -228,14 +228,13 @@ cache. It may be NIL to turn off caching entirely." :capacity cache-capacity :table (make-hash-table :size (1+ cache-capacity) :test #'equalp)) (reference key nonce) - (declare (type octet-vector reference key)) + (declare (type octet-vector reference key nonce)) (let ((block (execute-fetch-function fetch-function reference))) (declare (type octet-vector block)) (hash-check block reference) (decrypt-block block key nonce))) (lambda (reference key nonce) - (declare (type octet-vector reference key) - (optimize (debug 3))) + (declare (type octet-vector reference key nonce)) (let ((block (execute-fetch-function fetch-function reference))) (declare (type octet-vector block)) (hash-check block reference) |