sharplispers / ironclad

A cryptographic toolkit written in Common Lisp
BSD 3-Clause "New" or "Revised" License
166 stars 28 forks source link

invalid number of arguments: 5 #12

Closed erjoalgo closed 5 years ago

erjoalgo commented 5 years ago

On SBCL 1.3.14.debian,

> (ql:quickload :ironclad)

gives me:

invalid number of arguments: 5
   [Condition of type SB-INT:SIMPLE-PROGRAM-ERROR]

Restarts:
 0: [RETRY] Retry compiling #<IRONCLAD-SOURCE-FILE "ironclad" "src" "common">.
 1: [ACCEPT] Continue, treating compiling #<IRONCLAD-SOURCE-FILE "ironclad" "src" "common"> as having been successful.
 2: [RETRY] Retry ASDF operation.
 3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration.
 4: [ABORT] Give up on "ironclad"
 5: [RETRY] Retry SLIME REPL evaluation request.
 --more--

Backtrace:
  0: (SB-X86-64-ASM::|movzx| #<SB-ASSEM:SEGMENT :TYPE :REGULAR> #<SB-C::VOP :INFO NIBBLES:UB32REF/LE :ARGS #<SB-C:TN-REF :TN #<SB-C:TN IRONCLAD::INPUT-BLOCK1!1[RDI]> :WRITE-P NIL :VOP NIBBLES:UB32REF/LE> :..
  1: ((SB-C::VOP NIBBLES:UB32REF/LE) #<SB-C::VOP :INFO NIBBLES:UB32REF/LE :ARGS #<SB-C:TN-REF :TN #<SB-C:TN IRONCLAD::INPUT-BLOCK1!1[RDI]> :WRITE-P NIL :VOP NIBBLES:UB32REF/LE> :RESULTS #<SB-C:TN-REF :TN #..
  2: (SB-C::GENERATE-CODE #<SB-C:COMPONENT :NAME SB-IMPL::XSUBTRACT {1005546753}>)
  3: (SB-C::%COMPILE-COMPONENT #<SB-C:COMPONENT :NAME SB-IMPL::XSUBTRACT {1005546753}>)
  4: (SB-C::COMPILE-COMPONENT #<SB-C:COMPONENT :NAME SB-IMPL::XSUBTRACT {1005546753}>)
  5: (SB-C::%COMPILE (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2 IRONCLAD::INPUT-BLOCK2-START IRONCLAD::OUTPUT..
  6: (SB-C::FOPCOMPILE-FUNCTION #<SB-FASL:FASL-OUTPUT "/home/ealfonso/.cache/common-lisp/sbcl-1.3.14.debian-linux-x64/home/ealfonso/quicklisp/dists/quicklisp/software/ironclad-v0.44/src/common-TMP.fasl"> (..
  7: (SB-C::FOPCOMPILE (SB-IMPL::%DEFUN (QUOTE IRONCLAD::XOR-BLOCK) (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK..
  8: (SB-C::CONVERT-AND-MAYBE-COMPILE (SB-IMPL::%DEFUN (QUOTE IRONCLAD::XOR-BLOCK) (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IRONCL..
  9: ((FLET SB-C::DEFAULT-PROCESSOR :IN SB-C::PROCESS-TOPLEVEL-FORM) (SB-IMPL::%DEFUN (QUOTE IRONCLAD::XOR-BLOCK) (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRON..
 10: (SB-C::PROCESS-TOPLEVEL-FORM (SB-IMPL::%DEFUN (QUOTE IRONCLAD::XOR-BLOCK) (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IRONCLAD::..
 11: (SB-C::PROCESS-TOPLEVEL-PROGN ((EVAL-WHEN (:COMPILE-TOPLEVEL) (SB-C:%COMPILER-DEFUN # NIL T)) (SB-IMPL::%DEFUN (QUOTE IRONCLAD::XOR-BLOCK) (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK # # #) (SB-C:SOURCE-..
 12: (SB-C::PROCESS-TOPLEVEL-FORM (PROGN (EVAL-WHEN (:COMPILE-TOPLEVEL) (SB-C:%COMPILER-DEFUN # NIL T)) (SB-IMPL::%DEFUN (QUOTE IRONCLAD::XOR-BLOCK) (SB-INT:NAMED-LAMBDA IRONCLAD::XOR-BLOCK # # #) (SB-C:SO..
 13: ((FLET SB-C::DEFAULT-PROCESSOR :IN SB-C::PROCESS-TOPLEVEL-FORM) (DEFUN IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2 IRONCLAD::I..
 14: (SB-C::PROCESS-TOPLEVEL-FORM (DEFUN IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2 IRONCLAD::INPUT-BLOCK2-START IRONCLAD::OUTPUT-..
 15: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-SUB-COMPILE-FILE) (DEFUN IRONCLAD::XOR-BLOCK (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START IR..
 16: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-SUB-COMPILE-FILE) {222D358B}> #<SB-C::SOURCE-INFO {1004597D73}> SB-C::INPUT-ERROR-IN-..
 17: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO {1004597D73}>)
 18: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::SUB-COMPILE-FILE))
 19: ((FLET #:WITHOUT-INTERRUPTS-BODY-387 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
 --more--
glv2 commented 5 years ago

This comes from an incompatibility between the current version of the nibbles library and old versions of SBCL (see https://github.com/sharplispers/nibbles/issues/5).

You can either use a patched version of nibbles (see https://github.com/sharplispers/nibbles/pull/6) or use a more recent version of SBCL.

erjoalgo commented 5 years ago

Thanks.

freeduck commented 5 years ago

This comes from an incompatibility between the current version of the nibbles library and old versions of SBCL (see sharplispers/nibbles#5).

You can either use a patched version of nibbles (see sharplispers/nibbles#6) or use a more recent version of SBCL.

on debian you can install cl-nibbles it worked for me.