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

Switch to 16bit implementation for Lispworks8 64bit

Browse Source 
This avoids an optimization problem in keccak-state-merge-input and is
also slightly faster due to less consing in this variant.
This commit is contained in:
Pierre R. Mai
2023-08-21 22:29:49 +02:00
parent 92e0e0b916
commit a4baa05e72
2 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
NEWS
View File

@ -1,3 +1,10 @@
Release 1.1.2
=============
* Switch to 16bit implementation for 64bit LispWorks 8, to avoid
compiler optimization problems in keccak-state-merge-input, and
also slightly higher performance due to non-consing.
Release 1.1.1 Release 1.1.1
============= =============

12
sha3.asd
View File

@ -42,7 +42,7 @@
:author "Pierre R. Mai <pmai@pmsf.de>" :author "Pierre R. Mai <pmai@pmsf.de>"
:maintainer "Pierre R. Mai <pmai@pmsf.de>" :maintainer "Pierre R. Mai <pmai@pmsf.de>"
:licence "MIT/X11" :licence "MIT/X11"
:version "1.1.1" :version "1.1.2"
#+sbcl :depends-on #+sbcl ("sb-rotate-byte") #+sbcl :depends-on #+sbcl ("sb-rotate-byte")
:components ((:file "pkgdef") :components ((:file "pkgdef")
(:file "common" :depends-on ("pkgdef")) (:file "common" :depends-on ("pkgdef"))
@ -51,10 +51,10 @@
#+(or (and :sbcl (not (or :x86-64 :alpha))) #+(or (and :sbcl (not (or :x86-64 :alpha)))
:cmucl :cmucl
(and :ccl :64-bit-target) (and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit)) (and :lispworks :lispworks-64bit (not :lispworks8)))
(:file "keccak-32bit" :depends-on ("pkgdef" "common")) (:file "keccak-32bit" :depends-on ("pkgdef" "common"))
#-(or :sbcl :cmucl (and :ccl :64-bit-target) #-(or :sbcl :cmucl (and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit)) (and :lispworks :lispworks-64bit (not :lispworks8)))
(:file "keccak-16bit" :depends-on ("pkgdef" "common")) (:file "keccak-16bit" :depends-on ("pkgdef" "common"))
(:file "sha3" (:file "sha3"
:depends-on ("pkgdef" :depends-on ("pkgdef"
@ -64,8 +64,10 @@
#+(or (and :sbcl (not (or :x86-64 :alpha))) #+(or (and :sbcl (not (or :x86-64 :alpha)))
:cmucl :cmucl
(and :ccl :64-bit-target) (and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit)) (and :lispworks :lispworks-64bit
(not :lispworks8)))
"keccak-32bit" "keccak-32bit"
#-(or :sbcl :cmucl (and :ccl :64-bit-target) #-(or :sbcl :cmucl (and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit)) (and :lispworks :lispworks-64bit
(not :lispworks8)))
"keccak-16bit")))) "keccak-16bit"))))