diff options
| author | Guillaume LE VAILLANT <glv@posteo.net> | 2018-09-24 14:31:42 +0200 |
|---|---|---|
| committer | Guillaume LE VAILLANT <glv@posteo.net> | 2018-09-24 14:50:12 +0200 |
| commit | b9fe4b09e7f928f60b098c5f33a3cabdcccdf416 (patch) | |
| tree | ef00850396b253a7de683d29c2b4720210ef3263 /src/ciphers | |
| parent | d03b0e9ecd4961e668b46b7fd498cacf1390dd16 (diff) | |
Add optimized Chacha core function for ECL
Diffstat (limited to 'src/ciphers')
| -rw-r--r-- | src/ciphers/chacha.lisp | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/ciphers/chacha.lisp b/src/ciphers/chacha.lisp index c2c5e33..9e7a76d 100644 --- a/src/ciphers/chacha.lisp +++ b/src/ciphers/chacha.lisp @@ -18,9 +18,11 @@ (declare (type chacha-keystream-buffer buffer)) (declare (type chacha-state state)) (declare (optimize speed)) - #+(and sbcl x86-64 ironclad-assembly) + #+(or (and ecl ironclad-assembly) + (and sbcl x86-64 ironclad-assembly)) (x-chacha-core n-rounds buffer state) - #-(and sbcl x86-64 ironclad-assembly) + #-(or (and ecl ironclad-assembly) + (and sbcl x86-64 ironclad-assembly)) (let ((x (make-array 16 :element-type '(unsigned-byte 32)))) (declare (dynamic-extent x)) (replace x state) |