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

Use 32bit implementation for 64bit LispWorks.

Browse Source 
Quick and dirty benchmarks seem to imply that 32bit implementation is
faster for 64bit LispWorks than 16bit implementation, even though it
causes more consing.
This commit is contained in:
Pierre R. Mai
2013-03-11 21:07:01 +01:00
parent aca911af4a
commit a016c81cf4
1 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
sha3.asd
View File

@ -26,7 +26,7 @@
;;;; other dealings in this Software without prior written authorization
;;;; from the author.
;;;;
;;;; $Id$
;;;; $Id: 2cbc5857639b13160ef580514a78749c02b70c0b $
(cl:in-package #:cl-user)
@ -50,9 +50,11 @@
(:file "keccak-64bit" :depends-on ("pkgdef" "common"))
#+(or (and :sbcl (not (or :x86-64 :alpha)))
:cmucl
(and :ccl :64-bit-target))
(and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit))
(: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))
(:file "keccak-16bit" :depends-on ("pkgdef" "common"))
(:file "sha3"
:depends-on ("pkgdef"
@ -61,7 +63,9 @@
"keccak-64bit"
#+(or (and :sbcl (not (or :x86-64 :alpha)))
:cmucl
(and :ccl :64-bit-target))
(and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit))
"keccak-32bit"
#-(or :sbcl :cmucl (and :ccl :64-bit-target))
#-(or :sbcl :cmucl (and :ccl :64-bit-target)
(and :lispworks :lispworks-64bit))
"keccak-16bit"))))