OSCL/sha3
2
0
Fork 0
mirror of https://github.com/pmai/sha3.git synced 2025-12-21 23:34:29 +01:00
Code Issues Packages Projects Releases Wiki Activity

Fix erroneous buffer handling in sha3-update again (fixes #3).

Browse Source
This commit is contained in:
Pierre R. Mai
2016-09-14 16:48:31 +02:00
parent e57d7c32cd
commit abe192b75f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
sha3.lisp
View File

@ -110,7 +110,7 @@ and `end', which must be numeric bounding-indices."
#.*optimize-declaration*) #.*optimize-declaration*)
;; Handle potential remaining bytes ;; Handle potential remaining bytes
(unless (zerop buffer-index) (unless (zerop buffer-index)
(let ((remainder (- (length buffer) buffer-index)) (let ((remainder (- rate-bytes buffer-index))
(length (- end start))) (length (- end start)))
(declare (type fixnum remainder length)) (declare (type fixnum remainder length))
(replace buffer vector :start1 buffer-index :start2 start :end2 end) (replace buffer vector :start1 buffer-index :start2 start :end2 end)